summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/Scilab2C/Scilab2C/ASTManagement/SciFile2ASTFile.sci7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/Scilab2C/Scilab2C/ASTManagement/SciFile2ASTFile.sci b/src/Scilab2C/Scilab2C/ASTManagement/SciFile2ASTFile.sci
index 943b8e58..40bf7605 100644
--- a/src/Scilab2C/Scilab2C/ASTManagement/SciFile2ASTFile.sci
+++ b/src/Scilab2C/Scilab2C/ASTManagement/SciFile2ASTFile.sci
@@ -2,7 +2,7 @@ function SciFile2ASTFile(SciFile,ASTFile);
// function SciFile2ASTFile(SciFile,ASTFile);
// -----------------------------------------------------------------
// This function makes use of the macr2tree function to generate
-// the ASTFile containing the AST (Abstract Syntactic Tree) of the
+// the ASTFile containing the AST (Abstract Syntactic Tree) of the
// input Scilab function (SciFile).
//
// Input data:
@@ -28,6 +28,9 @@ AST=eval('macr2tree('+ScilabFunName+')');
if ASTierr == 0
mdelete(ASTFile);
end
-write(ASTFile,string(AST));
+
+fd = mopen(ASTFile, "wt");
+mputl(string(AST), fd);
+mclose(fd);
endfunction