summaryrefslogtreecommitdiff
path: root/2.3-1/macros/ASTManagement
diff options
context:
space:
mode:
authorsiddhu89902016-06-06 09:18:33 +0530
committersiddhu89902016-06-06 09:18:33 +0530
commitf08e63e652a564b3f805b69c05948e497c7b28f6 (patch)
treed8f4bcc4dc02c668ec38745eaf867dd365fd9992 /2.3-1/macros/ASTManagement
parent49003250e69e4e500742614888e47db789bbe451 (diff)
downloadScilab2C-f08e63e652a564b3f805b69c05948e497c7b28f6.tar.gz
Scilab2C-f08e63e652a564b3f805b69c05948e497c7b28f6.tar.bz2
Scilab2C-f08e63e652a564b3f805b69c05948e497c7b28f6.zip
File handling functions added
Diffstat (limited to '2.3-1/macros/ASTManagement')
-rw-r--r--2.3-1/macros/ASTManagement/AST_HandleEndGenFun.binbin88688 -> 90028 bytes
-rw-r--r--2.3-1/macros/ASTManagement/AST_HandleEndGenFun.sci16
2 files changed, 13 insertions, 3 deletions
diff --git a/2.3-1/macros/ASTManagement/AST_HandleEndGenFun.bin b/2.3-1/macros/ASTManagement/AST_HandleEndGenFun.bin
index 414942c3..82599f35 100644
--- a/2.3-1/macros/ASTManagement/AST_HandleEndGenFun.bin
+++ b/2.3-1/macros/ASTManagement/AST_HandleEndGenFun.bin
Binary files differ
diff --git a/2.3-1/macros/ASTManagement/AST_HandleEndGenFun.sci b/2.3-1/macros/ASTManagement/AST_HandleEndGenFun.sci
index 41c4cb40..0bc12992 100644
--- a/2.3-1/macros/ASTManagement/AST_HandleEndGenFun.sci
+++ b/2.3-1/macros/ASTManagement/AST_HandleEndGenFun.sci
@@ -205,6 +205,10 @@ global STACKDEDUG
SharedInfo.ODElist($+1) = InArg(4).Name;
//Add ode function in list. this will be used to add corresponding
//header file in main function.
+ elseif NInArg == 5
+ ODEFunName = InArg(5).Name;
+ InArg(5).Name = 'odefn'+ InArg(5).Name
+ SharedInfo.ODElist($+1) = InArg(5).Name;
end
end
[InArg,SharedInfo] = ST_GetInArgInfo(InArg,NInArg,FileInfo,SharedInfo,ASTFunName);
@@ -362,9 +366,15 @@ global STACKDEDUG
ST_InsOutArg(OutArg,NOutArg,FileInfo,SharedInfo,'all');
end
if ASTFunName == 'ode' then
- ODE_InArg(1) = InArg(3)
- ODE_InArg(2) = InArg(1)
- ODE_OutArg(1) = OutArg(1)
+ if NInArg == 4
+ ODE_InArg(1) = InArg(3)
+ ODE_InArg(2) = InArg(1)
+ ODE_OutArg(1) = OutArg(1)
+ elseif NInArg == 5 then
+ ODE_InArg(1) = InArg(4)
+ ODE_InArg(2) = InArg(2)
+ ODE_OutArg(1) = OutArg(1)
+ end
ODE_CFunName = C_GenerateFunName('odefn'+ODEFunName,ODE_InArg,2,ODE_OutArg,1);
//Functions containing differential equations that are used with 'ode'
//function need to be handled differently.