blob: 7d5e6223ed32fd4007362ae00c6fc9e02211677a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
function txt=%while_string(W)
//overloading function for "while" 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
// while instructions list)
txt=['While'
' WhileExpression:'
' '+string(W.expression)
' WhileStatements:'
' '+objectlist2string(W.statements)
'EndWhile']
endfunction
|
