From 48ae7e1071f3732fa3df164e7073581af299a7b5 Mon Sep 17 00:00:00 2001
From: nutricato
Date: Fri, 20 Apr 2007 12:19:52 +0000
Subject: 

---
 src/Scilab2C/FunctionTableManagement/GenerateLibTrees.sci | 13 +++++++++++--
 src/Scilab2C/FunctionTableManagement/GetCFunCall.sci      |  7 ++++---
 src/Scilab2C/FunctionTableManagement/Pass1ASTReader.txt   | 13 -------------
 3 files changed, 15 insertions(+), 18 deletions(-)
 delete mode 100644 src/Scilab2C/FunctionTableManagement/Pass1ASTReader.txt

diff --git a/src/Scilab2C/FunctionTableManagement/GenerateLibTrees.sci b/src/Scilab2C/FunctionTableManagement/GenerateLibTrees.sci
index 0ccd9f43..32e1648b 100644
--- a/src/Scilab2C/FunctionTableManagement/GenerateLibTrees.sci
+++ b/src/Scilab2C/FunctionTableManagement/GenerateLibTrees.sci
@@ -1,5 +1,5 @@
-function GenerateLibTrees(FileInfoDatFile,SharedInfoDatFile);
-// function GenerateLibTrees(FileInfoDatFile,SharedInfoDatFile);
+function GenerateLibTrees(FileInfoDatFile);
+// function GenerateLibTrees(FileInfoDatFile);
 // -----------------------------------------------------------------
 // This function generates the SCI2C and USER2C library trees.
 // Library trees contain detailed information of the DSP functions
@@ -19,6 +19,15 @@ function GenerateLibTrees(FileInfoDatFile,SharedInfoDatFile);
 // 11-Apr-2007 -- Nutricato Raffaele: Author.
 // -----------------------------------------------------------------
 
+// ---------------------
+// --- Load section. ---
+// ---------------------
+// --- Load File Info Structure. ---
+load(FileInfoDatFile,'FileInfo');
+// -------------------------
+// --- End load section. ---
+// -------------------------
+
 [SCI2CLibTree, USER2CLibTree] = InitializeLibraryTrees(FileInfoDatFile);
 
 load(FileInfoDatFile,'FileInfo');
diff --git a/src/Scilab2C/FunctionTableManagement/GetCFunCall.sci b/src/Scilab2C/FunctionTableManagement/GetCFunCall.sci
index d95c7493..8d3958ce 100644
--- a/src/Scilab2C/FunctionTableManagement/GetCFunCall.sci
+++ b/src/Scilab2C/FunctionTableManagement/GetCFunCall.sci
@@ -19,7 +19,7 @@ for counterinput = 1:NInputs
    else 
       TreeAccessString = TreeAccessString+".A";   
    end
-   
+
    if InArg(counterinput).Type == "s"
       TreeAccessString = TreeAccessString+".R.F";
    elseif InArg(counterinput).Type == "d"
@@ -29,13 +29,14 @@ for counterinput = 1:NInputs
    elseif InArg(counterinput).Type == "z"
       TreeAccessString = TreeAccessString+".C.D";
    else
-      error("Unknown input argument type");
+      SCI2Cerror("Unknown input argument type");
    end
 end
 
 CFunName = FunTree+"."+TreeAccessString+".CINFO("+mtlb_num2str(NOutputs)+").NAME";
 CFunArgList = FunTree+"."+TreeAccessString+".CINFO("+mtlb_num2str(NOutputs)+").ARGLIST";
 
-CFunCall = [eval(CFunName),"(",eval(eval(CFunArgList)),")"];
+CFunCall = [eval(CFunName),'(',eval(eval(CFunArgList)),');'];
+
 // CFunCall = [execstr(CFunName),"(",eval(eval(CFunArgList)),")"];
 endfunction
diff --git a/src/Scilab2C/FunctionTableManagement/Pass1ASTReader.txt b/src/Scilab2C/FunctionTableManagement/Pass1ASTReader.txt
deleted file mode 100644
index c235731b..00000000
--- a/src/Scilab2C/FunctionTableManagement/Pass1ASTReader.txt
+++ /dev/null
@@ -1,13 +0,0 @@
- 
- 
-__temp1 = x * 2;
-__temp1 = 3 + __temp1;
-y = __temp1;
- 
-Result = return(<empty>)
- 
-zcoss
-zcoss
-zcoss
-zcosa
-zcosa
-- 
cgit