summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci2
-rw-r--r--tests/unit_tests/test_double_OpExt.sci25
2 files changed, 26 insertions, 1 deletions
diff --git a/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci b/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci
index 4f1df8cd..bf121416 100644
--- a/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci
+++ b/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci
@@ -1861,7 +1861,7 @@ PrintStringInfo('z2d0d2'+ArgSeparator+'z2',ClassFileName,'file','y');
PrintStringInfo('z2d2d2'+ArgSeparator+'z2',ClassFileName,'file','y');
// --- Annotation Function And Function List Function. ---
-FunctionName = 'OpExt';
+FunctionName = 'OpExt'; // AS : Done
PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y');
INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun);
INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun);
diff --git a/tests/unit_tests/test_double_OpExt.sci b/tests/unit_tests/test_double_OpExt.sci
new file mode 100644
index 00000000..d924d35f
--- /dev/null
+++ b/tests/unit_tests/test_double_OpExt.sci
@@ -0,0 +1,25 @@
+function test_double_OpExt ()
+
+ a = [1 2 3 ; 4 5 6];
+
+
+ disp(a(2));
+ disp(a([3 5]));
+ disp(a(2,3));
+ disp(a(2,[2 3]));
+ disp(a ([1 2],1));
+ disp(a ([1 2],[2 3]));
+
+
+ b = [1 2 3 ; 4 5 6] * %i;
+
+
+ disp(b(2));
+ disp(b([3 5]));
+ disp(b(2,3));
+ disp(b(2,[2 3]));
+ disp(b ([1 2],1));
+ disp(b ([1 2],[2 3]));
+
+
+endfunction