ea6472c28f
also field to field_def (wip) and lots of whitespace due to ws fix
26 lines
477 B
Scilab
26 lines
477 B
Scilab
ref ofthen(int n)
|
|
if(0)
|
|
isit = 42
|
|
else
|
|
maybenot = 667
|
|
end
|
|
end
|
|
-- -- --
|
|
s(:expressions,
|
|
s(:function, :ref,
|
|
s(:name, :ofthen),
|
|
s(:parameters,
|
|
s(:parameter, :int, :n)),
|
|
s(:expressions,
|
|
s(:if,
|
|
s(:condition,
|
|
s(:int, 0)),
|
|
s(:if_true,
|
|
s(:assign,
|
|
s(:name, :isit),
|
|
s(:int, 42))),
|
|
s(:if_false,
|
|
s(:assign,
|
|
s(:name, :maybenot),
|
|
s(:int, 667)))))))
|