Added new data types. Support for few functions with new data types added. These changes requires proper testing

10 files changed, 133 insertions, 0 deletions

diff --git a/macros/FunctionAnnotation/FA_GetDefaultPrecision.sci b/macros/FunctionAnnotation/FA_GetDefaultPrecision.sci
index 3afe2648..da5486dc 100644
--- a/macros/FunctionAnnotation/FA_GetDefaultPrecision.sci
+++ b/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/macros/FunctionAnnotation/FA_TP_INT16.bin b/macros/FunctionAnnotation/FA_TP_INT16.bin
new file mode 100644
index 00000000..2ffc10e5
--- /dev/null
+++ b/macros/FunctionAnnotation/FA_TP_INT16.bin
diff --git a/macros/FunctionAnnotation/FA_TP_INT16.sci b/macros/FunctionAnnotation/FA_TP_INT16.sci
new file mode 100644
index 00000000..8971754d
--- /dev/null
+++ b/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/macros/FunctionAnnotation/FA_TP_INT8.bin b/macros/FunctionAnnotation/FA_TP_INT8.bin
new file mode 100644
index 00000000..3455174f
--- /dev/null
+++ b/macros/FunctionAnnotation/FA_TP_INT8.bin
diff --git a/macros/FunctionAnnotation/FA_TP_INT8.sci b/macros/FunctionAnnotation/FA_TP_INT8.sci
new file mode 100644
index 00000000..49c752bb
--- /dev/null
+++ b/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/macros/FunctionAnnotation/FA_TP_UINT16.bin b/macros/FunctionAnnotation/FA_TP_UINT16.bin
new file mode 100644
index 00000000..5c0ec30c
--- /dev/null
+++ b/macros/FunctionAnnotation/FA_TP_UINT16.bin
diff --git a/macros/FunctionAnnotation/FA_TP_UINT16.sci b/macros/FunctionAnnotation/FA_TP_UINT16.sci
new file mode 100644
index 00000000..5f1c98f7
--- /dev/null
+++ b/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/macros/FunctionAnnotation/FA_TP_UINT8.bin b/macros/FunctionAnnotation/FA_TP_UINT8.bin
new file mode 100644
index 00000000..69661391
--- /dev/null
+++ b/macros/FunctionAnnotation/FA_TP_UINT8.bin
diff --git a/macros/FunctionAnnotation/FA_TP_UINT8.sci b/macros/FunctionAnnotation/FA_TP_UINT8.sci
new file mode 100644
index 00000000..934f3540
--- /dev/null
+++ b/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/macros/FunctionAnnotation/names b/macros/FunctionAnnotation/names
index 83710bca..e95bff5f 100644
--- a/macros/FunctionAnnotation/names
+++ b/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