summaryrefslogtreecommitdiff
path: root/2.3-1/macros/ASTManagement/_for_string.sci
blob: 0ed9ca28148d1bb70f57f4ea50c85ded9bf65ce9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
function txt=%for_string(F)
//overloading function for "for" type tlist string function
//this is a node of the AST
//fields:
//   expression : "expression" type tlist (the loop expression)
//   statements : list of "equal" type tlist and list('EOL') (the
//                           for instructions list)
//NUT: raf cambiato ForExpression e ForStatements
  txt=['For'
       '  ForExpression:'
       '    '+string(F.expression)
       '  ForStatements:'
       '    '+objectlist2string(F.statements)
       'EndFor']
endfunction