13 lines
230 B
Text
13 lines
230 B
Text
|
declare
|
||
|
|
class Demo from BaseObject
|
||
|
|
meth test(...)=Msg
|
||
|
|
{Record.forAll Msg Show}
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
D = {New Demo noop}
|
||
|
|
Constructed = {List.toTuple test {List.number 1 10 1}}
|
||
|
|
in
|
||
|
|
{D test(1 2 3 4)}
|
||
|
|
{D Constructed}
|