diff options
| author | Ankit Raj | 2017-06-21 10:26:59 +0530 |
|---|---|---|
| committer | Ankit Raj | 2017-06-21 10:26:59 +0530 |
| commit | 958577cac90a99124cd673fde1926781d966d91f (patch) | |
| tree | 134d9fe7f5b97a647cb055bb7b4c21820a749f49 /macros/ASTManagement/AST_PushASTStack.sci | |
| download | scilab2c-958577cac90a99124cd673fde1926781d966d91f.tar.gz scilab2c-958577cac90a99124cd673fde1926781d966d91f.tar.bz2 scilab2c-958577cac90a99124cd673fde1926781d966d91f.zip | |
Updated Scilab2C
Diffstat (limited to 'macros/ASTManagement/AST_PushASTStack.sci')
| -rw-r--r-- | macros/ASTManagement/AST_PushASTStack.sci | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/macros/ASTManagement/AST_PushASTStack.sci b/macros/ASTManagement/AST_PushASTStack.sci new file mode 100644 index 00000000..34cd883b --- /dev/null +++ b/macros/ASTManagement/AST_PushASTStack.sci @@ -0,0 +1,36 @@ +function AST_PushASTStack(stackelement) +// function AST_PushASTStack(stackelement) +// ----------------------------------------------------------------- +// Push the AST stack. +// +// Input data: +// --- +// +// Output data: +// //NUT: add description here +// +// Status: +// 11-Aug-2007 -- Raffaele Nutricato: Author. +// +// Copyright 2007 Raffaele Nutricato. +// Contact: raffaele.nutricato@tiscali.it +// ----------------------------------------------------------------- + +// ------------------------------ +// --- Check input arguments. --- +// ------------------------------ +SCI2CNInArgCheck(argn(2),1,1); + + +global SCI2CSTACK +global StackPosition; +global STACKDEDUG + +StackPosition = StackPosition + 1; +SCI2CSTACK(StackPosition,1) = stackelement; + +if (STACKDEDUG == 1) + AST_DisplayStack(); +end + +endfunction |