20 lines
405 B
Scilab
20 lines
405 B
Scilab
int retvar(Object n)
|
|
int i = n.layout
|
|
return i
|
|
end
|
|
-- -- --
|
|
s(:statements,
|
|
s(:function, :Integer,
|
|
s(:name, :retvar),
|
|
s(:parameters,
|
|
s(:parameter, :Object, :n)),
|
|
s(:statements,
|
|
s(:field_def, :Integer, :i,
|
|
s(:field_access,
|
|
s(:receiver,
|
|
s(:name, :n)),
|
|
s(:field,
|
|
s(:name, :layout)))),
|
|
s(:return,
|
|
s(:name, :i)))))
|