diff options
author | Sandeep Gupta | 2017-07-05 12:41:25 +0530 |
---|---|---|
committer | Sandeep Gupta | 2017-07-05 12:41:25 +0530 |
commit | dd50e95a8193fb0faa846ccaa971a115ba69e71c (patch) | |
tree | 8d66abedd68dc5255ad323b95a16c9b592657f35 /2.3-1/macros/ASTManagement/AST_HandleCC.sci | |
parent | 3308ea7a973e2c1e1c8bea99ac7cc783ce8e8b06 (diff) | |
download | Scilab2C-dd50e95a8193fb0faa846ccaa971a115ba69e71c.tar.gz Scilab2C-dd50e95a8193fb0faa846ccaa971a115ba69e71c.tar.bz2 Scilab2C-dd50e95a8193fb0faa846ccaa971a115ba69e71c.zip |
LinearAlgebra and MatrixOperation Update
Diffstat (limited to '2.3-1/macros/ASTManagement/AST_HandleCC.sci')
-rw-r--r-- | 2.3-1/macros/ASTManagement/AST_HandleCC.sci | 69 |
1 files changed, 0 insertions, 69 deletions
diff --git a/2.3-1/macros/ASTManagement/AST_HandleCC.sci b/2.3-1/macros/ASTManagement/AST_HandleCC.sci deleted file mode 100644 index cc411549..00000000 --- a/2.3-1/macros/ASTManagement/AST_HandleCC.sci +++ /dev/null @@ -1,69 +0,0 @@ -// Copyright (C) 2017 - IIT Bombay - FOSSEE - -// This file must be used under the terms of the CeCILL. -// This source file is licensed as described in the file COPYING, which -// you should have received as part of this distribution. The terms -// are also available at -// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt -// Author: Ukasha Noor -// Organization: FOSSEE, IIT Bombay -// Email: toolbox@scilab.in - -function [RhsNames,RhsScope,NRhs] = AST_HandleCC(FileInfo,SharedInfo) - -SCI2CNInArgCheck(argn(2),2,2) - -ReportFileName = FileInfo.Funct(nxtscifunnumber).ReportFileName; - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ - - -global SCI2CSTACK -global StackPosition; -global STACKDEDUG -// --------------------------- -// --- End Initialization. --- -// --------------------------- - - -// ------------------------------ -// --- Read input parameters. --- -// ------------------------------ -cntpop = 1; -NRhs = 0; -RhsField(cntpop) = AST_PopASTStack(); -RhsNames = []; -while (RhsField(cntpop) ~= 'Expression:') - if RhsField(cntpop) <> 'Operands:' & RhsField(cntpop) <> 'Begin:' - NRhs = NRhs + 1; - - [RhsNames(NRhs),RhsScope(NRhs)] = AST_ExtractNameAndScope(RhsField(cntpop)); - end - cntpop = cntpop + 1; - RhsField(cntpop) = AST_PopASTStack(); -end -RhsNames = SCI2Cflipud(RhsNames); -RhsScope = SCI2Cflipud(RhsScope); - -// --- Repush everything into the stack. --- -for cntpush = cntpop:-1:1 - if RhsField(cntpush) <> 'Operands:' & RhsField(cntpush) <> 'Begin:' - PrintStringInfo(' ' + RhsField(cntpush),ReportFileName,'file','y'); - AST_PushASTStack(RhsField(cntpush)); - end -end - - -//for counterinputargs = 1:NRhs - //#RNU_RES_B - //disp(counterinputargs); - //PrintStringInfo('Input Argument Number '+string(counterinputargs)+': '+RhsNames(counterinputargs).Name,... - // ReportFileName,'file','y'); - //PrintStringInfo(' Scope: '+RhsNames(counterinputargs).Scope,... - // ReportFileName,'file','y'); - //#RNU_RES_E -//end - -endfunction |