RosettaCodeData/Task/Named-parameters/M2000-Interpreter/named-parameters.m2000

15 lines
286 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
module namedparam (x as decimal=10, y as integer=50) {
Print type$(x), x
Print type$(y), y
}
namedparam 10, 20
namedparam ?, ?
Push 1, 2 : namedparam
Stack New {
\\ it is empty
namedparam
namedparam %y=500
namedparam %x=20
}
namedparam %x=1, %y=1