2 files changed, 24 insertions, 8 deletions
diff --git a/macros/FunctionAnnotation/FA_GetDefaultPrecision.sci b/macros/FunctionAnnotation/FA_GetDefaultPrecision.sci
index 3603c572..f4e321aa 100644
--- a/macros/FunctionAnnotation/FA_GetDefaultPrecision.sci
+++ b/macros/FunctionAnnotation/FA_GetDefaultPrecision.sci
@@ -1,5 +1,5 @@
-function defaultprecision = FA_GetDefaultPrecision(scifilename,ReportFileName)
-// function defaultprecision = FA_GetDefaultPrecision(scifilename,ReportFileName)
+function defaultprecision = FA_GetDefaultPrecision(scifilename,scifileid,ReportFileName)
+// function defaultprecision = FA_GetDefaultPrecision(scifilename,scifileid,ReportFileName)
 // -----------------------------------------------------------------
 // #RNU_RES_B
 // Extracts the default precision for the file .sci passed in input.
@@ -28,7 +28,7 @@ function defaultprecision = FA_GetDefaultPrecision(scifilename,ReportFileName)
 // ------------------------------
 // --- Check input arguments. ---
 // ------------------------------
-SCI2CNInArgCheck(argn(2),2,2);
+SCI2CNInArgCheck(argn(2),3,3);
 
 // -----------------------
 // --- Initialization. ---
@@ -43,7 +43,11 @@ PrintStringInfo('***Get default precision from: '+scifilename,ReportFileName,'fi
 // ---------------------------
 
 // --- Open the .sci file (read only). ---
-scifid = SCI2COpenFileRead(scifilename);
+if scifileid == [] then
+    scifid = SCI2COpenFileRead(scifilename);
+else
+    scifid = scifileid;
+end
 
 // #RNU_RES_B
 // --- Loop over the lines of the input file. ---
@@ -93,5 +97,9 @@ else
    end
 end
 
-mclose(scifid);
+if scifileid == [] then
+    mclose(scifid);
+else
+    mseek(0, scifid);
+end
 endfunction
diff --git a/macros/FunctionAnnotation/FA_GetResizeApproach.sci b/macros/FunctionAnnotation/FA_GetResizeApproach.sci
index 95427001..4db6054c 100644
--- a/macros/FunctionAnnotation/FA_GetResizeApproach.sci
+++ b/macros/FunctionAnnotation/FA_GetResizeApproach.sci
@@ -1,4 +1,4 @@
-function ResizeApproach = FA_GetResizeApproach(scifilename,ReportFileName)
+function ResizeApproach = FA_GetResizeApproach(scifilename,scifileid,ReportFileName)
 
 // function ResizeApproach = FA_GetResizeApproach(scifilename,ReportFileName)
 // -----------------------------------------------------------------
@@ -30,7 +30,7 @@ function ResizeApproach = FA_GetResizeApproach(scifilename,ReportFileName)
 // ------------------------------
 // --- Check input arguments. ---
 // ------------------------------
-SCI2CNInArgCheck(argn(2),2,2);
+SCI2CNInArgCheck(argn(2),3,3);
 
 // -----------------------
 // --- Initialization. ---
@@ -43,7 +43,11 @@ PrintStringInfo('***Get resize approach from: '+scifilename,ReportFileName,'file
 // ---------------------------
 
 // --- Open the .sci file (read only). ---
-scifid = SCI2COpenFileRead(scifilename);
+if scifileid == [] then
+    scifid = SCI2COpenFileRead(scifilename);
+else
+    scifid = scifileid;
+end
 
 // --- Loop over the lines of the input file. ---
 // Position file pointer to the desired NInArg/NOutArg section,
@@ -75,5 +79,9 @@ if (foundannotation == 0)
 else
    ResizeApproach = tmpresize;
 end
+if scifileid == [] then
 mclose(scifid);
+else
+mseek(0, scifid)
+end
 endfunction