diff options
Diffstat (limited to 'macros/SymbolTable/ST_Load.sci')
-rw-r--r-- | macros/SymbolTable/ST_Load.sci | 72 |
1 files changed, 36 insertions, 36 deletions
diff --git a/macros/SymbolTable/ST_Load.sci b/macros/SymbolTable/ST_Load.sci index dbe53456..fc6dc5db 100644 --- a/macros/SymbolTable/ST_Load.sci +++ b/macros/SymbolTable/ST_Load.sci @@ -1,36 +1,36 @@ -function SCI2CSymbolTable = ST_Load(SymbolTableFileName)
-// function SCI2CSymbolTable = ST_Load(SymbolTableFileName)
-// -----------------------------------------------------------------
-// #RNU_RES_B
-// Load a symbol table stored into a .dat file.
-// #RNU_RES_E
-//
-// Input data:
-// //NUT: add description here
-//
-//
-// Output data:
-// //NUT: add description here
-//
-// Status:
-// 26-Oct-2007 -- Raffaele Nutricato: Author.
-// 26-Oct-2007 -- Alberto Morea: Test Ok.
-//
-// Copyright 2007 Raffaele Nutricato & Alberto Morea.
-// Contact: raffaele.nutricato@tiscali.it
-// -----------------------------------------------------------------
-
-// --------------------------
-// --- Load Symbol Table. ---
-// --------------------------
-[tmpnams,tmptyps,tmpdims,tmpvols]=listvarinfile(SymbolTableFileName);
-if (max(size(tmpnams)) > 1)
- error(9999, 'More than one variable found in ""'+SymbolTableFileName+'"".');
-end
-load(SymbolTableFileName,tmpnams);
-SCI2CSymbolTable = eval(tmpnams);
-// ------------------------------
-// --- End Load Symbol Table. ---
-// ------------------------------
-
-endfunction
+function SCI2CSymbolTable = ST_Load(SymbolTableFileName) +// function SCI2CSymbolTable = ST_Load(SymbolTableFileName) +// ----------------------------------------------------------------- +// #RNU_RES_B +// Load a symbol table stored into a .dat file. +// #RNU_RES_E +// +// Input data: +// //NUT: add description here +// +// +// Output data: +// //NUT: add description here +// +// Status: +// 26-Oct-2007 -- Raffaele Nutricato: Author. +// 26-Oct-2007 -- Alberto Morea: Test Ok. +// +// Copyright 2007 Raffaele Nutricato & Alberto Morea. +// Contact: raffaele.nutricato@tiscali.it +// ----------------------------------------------------------------- + +// -------------------------- +// --- Load Symbol Table. --- +// -------------------------- +[tmpnams,tmptyps,tmpdims,tmpvols]=listvarinfile(SymbolTableFileName); +if (max(size(tmpnams)) > 1) + error(9999, 'More than one variable found in ""'+SymbolTableFileName+'"".'); +end +load(SymbolTableFileName,tmpnams); +SCI2CSymbolTable = eval(tmpnams); +// ------------------------------ +// --- End Load Symbol Table. --- +// ------------------------------ + +endfunction |