modal/examples/hello.modal

<> (?x dup) (?x ?x)
<> (?x ?y swap) (?y ?x)
<> ( ?x pop) ()

(1 2 3) (4 5 6) swap pop dup
Do not skip first token 2024-04-04 19:31:10 -04:00			`<> (?x dup) (?x ?x)`
			`<> (?x ?y swap) (?y ?x)`
Register reassignment 2024-04-05 13:34:46 -04:00			`<> ( ?x pop) ()`
Do not skip first token 2024-04-04 19:31:10 -04:00
Register reassignment 2024-04-05 13:34:46 -04:00			`(1 2 3) (4 5 6) swap pop dup`