blob: c0ecb47824e2ebf68ce8d0594722a911e4908090 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
function txt=%operatio_string(O)
//overloading function for "operation" type tlist string function
//this is a node of the AST
//fields:
// operands: a list
// operator: a string
if O.operator <> 'rc'
txt=['Operation'
' Operands:'
' '+objectlist2string(O.operands)
' Operator: '+O.operator
'EndOperation'
]
else
txt=[' Operands:'
' '+objectlist2string(O.operands)
'Endrc'
]
end
endfunction
|
