4 lines
88 B
Forth
4 lines
88 B
Forth
|
s" VARIABLE " pad swap move
|
||
|
|
." Variable name: " pad 9 + 80 accept
|
||
|
|
pad swap 9 + evaluate
|