diff options
| author | Abhinav Dronamraju | 2017-09-29 22:00:40 +0530 |
|---|---|---|
| committer | Abhinav Dronamraju | 2017-09-29 22:00:40 +0530 |
| commit | 9bc7ad78e8d7d7acc4b9387aa592542832e80b31 (patch) | |
| tree | 7fce060665a91de5e5adb12d02003351c3d1fdfc /macros/ASTManagement/_cste_string.sci | |
| parent | 33755eb085a3ca8154cf83773b23fbb8aac4ba3e (diff) | |
| parent | ac0045f12ad3d0938758e9742f4107a334e1afaa (diff) | |
| download | scilab2c-9bc7ad78e8d7d7acc4b9387aa592542832e80b31.tar.gz scilab2c-9bc7ad78e8d7d7acc4b9387aa592542832e80b31.tar.bz2 scilab2c-9bc7ad78e8d7d7acc4b9387aa592542832e80b31.zip | |
NEW FEATURES AND NEW FUNCTIONS
Diffstat (limited to 'macros/ASTManagement/_cste_string.sci')
| -rw-r--r-- | macros/ASTManagement/_cste_string.sci | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/macros/ASTManagement/_cste_string.sci b/macros/ASTManagement/_cste_string.sci new file mode 100644 index 00000000..ba9971d2 --- /dev/null +++ b/macros/ASTManagement/_cste_string.sci @@ -0,0 +1,26 @@ +function txt=%cste_string(c) +//overloading function for "cste" type tlist string function +//this is a leaf of the AST +//fields: +// value : a number or a string +//NUT: added cste I also need "" for strings in order to be sure that the blanks are +//NUT: correctly considered and not mistaken with additional blanks present in the ast text file. + stringcvalue = string(c.value); + if (stringcvalue == "%T" | ... + stringcvalue == "%t" | ... + stringcvalue == "%F" | ... + stringcvalue == "%f" | ... + stringcvalue == "%nan" | ... + stringcvalue == "%inf" | ... + stringcvalue == "%e" | ... + stringcvalue == "%pi") + txt=['Number_x: '+stringcvalue]; + elseif (isnum(stringcvalue)) + //NUT needed to convert format 1D-14 into 1d-14 + txt=['Number_x: '+strsubst(stringcvalue,'D','e')]; + elseif (stringcvalue == "%i") + txt=['Number_X: '+stringcvalue]; + else + txt=['String: ""'+stringcvalue+'""']; + end +endfunction
\ No newline at end of file |