20 lines
397 B
Scilab
20 lines
397 B
Scilab
|
module Soho
|
||
|
ofthen(3 , var)
|
||
|
int ofthen(int n,ref m )
|
||
|
return 44
|
||
|
end
|
||
|
end
|
||
|
-- -- --
|
||
|
s(:list, [s(:module, "Soho", [s(:call,
|
||
|
s(:name, "ofthen"),
|
||
|
s(:arguments,
|
||
|
s(:int, 3),
|
||
|
s(:name, "var"))), s(:function, :int,
|
||
|
s(:name, "ofthen"),
|
||
|
s(:parameters,
|
||
|
s(:field, :int, :n),
|
||
|
s(:field, :ref, :m)),
|
||
|
s(:expressions,
|
||
|
s(:return,
|
||
|
s(:int, 44))))])])
|