diff options
Diffstat (limited to 'macros/ASTManagement/objectlist2string.sci')
| -rw-r--r-- | macros/ASTManagement/objectlist2string.sci | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/macros/ASTManagement/objectlist2string.sci b/macros/ASTManagement/objectlist2string.sci new file mode 100644 index 00000000..26a38962 --- /dev/null +++ b/macros/ASTManagement/objectlist2string.sci @@ -0,0 +1,13 @@ +function txt=objectlist2string(L) +//auxiliary function for conversion of a list of objects +//into a string vector + txt=[]; + for o=L, + if type(o)==15 then //EOL case + txt=[txt;'<'+o(1)+'>'], + else + txt=[txt; string(o)], + end + end + if txt==[] then txt='<empty>',end +endfunction |