10 files changed, 133 insertions, 0 deletions
diff --git a/2.3-1/macros/FunctionAnnotation/FA_GetDefaultPrecision.sci b/2.3-1/macros/FunctionAnnotation/FA_GetDefaultPrecision.sci
index 3afe2648..da5486dc 100644
--- a/2.3-1/macros/FunctionAnnotation/FA_GetDefaultPrecision.sci
+++ b/2.3-1/macros/FunctionAnnotation/FA_GetDefaultPrecision.sci
@@ -79,6 +79,15 @@ else
       defaultprecision = 's';
    elseif (tmpprecision == 'DOUBLE')
       defaultprecision = 'd';
+   elseif (tmpprecision == 'UINT8')
+      defaultprecision = 'u8';
+   elseif (tmpprecision == 'INT8')
+      defaultprecision = 'i8';
+   elseif (tmpprecision == 'UINT16')
+      defaultprecision = 'u16';
+   elseif (tmpprecision == 'INT16')
+      defaultprecision = 'i16';
+   
    end
 end
 
diff --git a/2.3-1/macros/FunctionAnnotation/FA_TP_INT16.bin b/2.3-1/macros/FunctionAnnotation/FA_TP_INT16.bin
new file mode 100644
index 00000000..2ffc10e5
--- /dev/null
+++ b/2.3-1/macros/FunctionAnnotation/FA_TP_INT16.bin
diff --git a/2.3-1/macros/FunctionAnnotation/FA_TP_INT16.sci b/2.3-1/macros/FunctionAnnotation/FA_TP_INT16.sci
new file mode 100644
index 00000000..8971754d
--- /dev/null
+++ b/2.3-1/macros/FunctionAnnotation/FA_TP_INT16.sci
@@ -0,0 +1,30 @@
+function typeout = FA_TP_INT16()
+// function typeout = FA_TP_INT16()
+// -----------------------------------------------------------------
+// Returns the "uint8" type specifier 
+// for Function Annotations.
+//
+// Input data:
+// ---
+//
+// Output data:
+// typeout: string containing the type specifier.
+//
+// Status:
+//
+// Copyright 2007 Raffaele Nutricato & Alberto Morea.
+// Contact: raffaele.nutricato@tiscali.it
+// -----------------------------------------------------------------
+
+// ------------------------------
+// --- Check input arguments. ---
+// ------------------------------
+SCI2CNInArgCheck(argn(2),0,0);
+
+
+// ------------------------
+// --- Generate Output. ---
+// ------------------------
+typeout = 'i16';
+
+endfunction
diff --git a/2.3-1/macros/FunctionAnnotation/FA_TP_INT8.bin b/2.3-1/macros/FunctionAnnotation/FA_TP_INT8.bin
new file mode 100644
index 00000000..3455174f
--- /dev/null
+++ b/2.3-1/macros/FunctionAnnotation/FA_TP_INT8.bin
diff --git a/2.3-1/macros/FunctionAnnotation/FA_TP_INT8.sci b/2.3-1/macros/FunctionAnnotation/FA_TP_INT8.sci
new file mode 100644
index 00000000..49c752bb
--- /dev/null
+++ b/2.3-1/macros/FunctionAnnotation/FA_TP_INT8.sci
@@ -0,0 +1,30 @@
+function typeout = FA_TP_INT8()
+// function typeout = FA_TP_INT8()
+// -----------------------------------------------------------------
+// Returns the "int8" type specifier 
+// for Function Annotations.
+//
+// Input data:
+// ---
+//
+// Output data:
+// typeout: string containing the type specifier.
+//
+// Status:
+//
+// Copyright 2007 Raffaele Nutricato & Alberto Morea.
+// Contact: raffaele.nutricato@tiscali.it
+// -----------------------------------------------------------------
+
+// ------------------------------
+// --- Check input arguments. ---
+// ------------------------------
+SCI2CNInArgCheck(argn(2),0,0);
+
+
+// ------------------------
+// --- Generate Output. ---
+// ------------------------
+typeout = 'i8';
+
+endfunction
diff --git a/2.3-1/macros/FunctionAnnotation/FA_TP_UINT16.bin b/2.3-1/macros/FunctionAnnotation/FA_TP_UINT16.bin
new file mode 100644
index 00000000..5c0ec30c
--- /dev/null
+++ b/2.3-1/macros/FunctionAnnotation/FA_TP_UINT16.bin
diff --git a/2.3-1/macros/FunctionAnnotation/FA_TP_UINT16.sci b/2.3-1/macros/FunctionAnnotation/FA_TP_UINT16.sci
new file mode 100644
index 00000000..5f1c98f7
--- /dev/null
+++ b/2.3-1/macros/FunctionAnnotation/FA_TP_UINT16.sci
@@ -0,0 +1,30 @@
+function typeout = FA_TP_UINT16()
+// function typeout = FA_TP_UINT16()
+// -----------------------------------------------------------------
+// Returns the "uint16" type specifier 
+// for Function Annotations.
+//
+// Input data:
+// ---
+//
+// Output data:
+// typeout: string containing the type specifier.
+//
+// Status:
+//
+// Copyright 2007 Raffaele Nutricato & Alberto Morea.
+// Contact: raffaele.nutricato@tiscali.it
+// -----------------------------------------------------------------
+
+// ------------------------------
+// --- Check input arguments. ---
+// ------------------------------
+SCI2CNInArgCheck(argn(2),0,0);
+
+
+// ------------------------
+// --- Generate Output. ---
+// ------------------------
+typeout = 'u16';
+
+endfunction
diff --git a/2.3-1/macros/FunctionAnnotation/FA_TP_UINT8.bin b/2.3-1/macros/FunctionAnnotation/FA_TP_UINT8.bin
new file mode 100644
index 00000000..69661391
--- /dev/null
+++ b/2.3-1/macros/FunctionAnnotation/FA_TP_UINT8.bin
diff --git a/2.3-1/macros/FunctionAnnotation/FA_TP_UINT8.sci b/2.3-1/macros/FunctionAnnotation/FA_TP_UINT8.sci
new file mode 100644
index 00000000..934f3540
--- /dev/null
+++ b/2.3-1/macros/FunctionAnnotation/FA_TP_UINT8.sci
@@ -0,0 +1,30 @@
+function typeout = FA_TP_UINT8()
+// function typeout = FA_TP_UINT8()
+// -----------------------------------------------------------------
+// Returns the "uint8" type specifier 
+// for Function Annotations.
+//
+// Input data:
+// ---
+//
+// Output data:
+// typeout: string containing the type specifier.
+//
+// Status:
+//
+// Copyright 2007 Raffaele Nutricato & Alberto Morea.
+// Contact: raffaele.nutricato@tiscali.it
+// -----------------------------------------------------------------
+
+// ------------------------------
+// --- Check input arguments. ---
+// ------------------------------
+SCI2CNInArgCheck(argn(2),0,0);
+
+
+// ------------------------
+// --- Generate Output. ---
+// ------------------------
+typeout = 'u8';
+
+endfunction
diff --git a/2.3-1/macros/FunctionAnnotation/names b/2.3-1/macros/FunctionAnnotation/names
index 83710bca..e95bff5f 100644
--- a/2.3-1/macros/FunctionAnnotation/names
+++ b/2.3-1/macros/FunctionAnnotation/names
@@ -49,3 +49,7 @@ FA_SUB
 FA_SZ_OPLOGNOT
 FA_SZ_OPLOGLE
 FA_SZ_OPAPEX
+FA_TP_UINT8
+FA_TP_INT8
+FA_TP_UINT8
+FA_TP_INT16