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