RosettaCodeData/Task/Variables/Oforth/variables.fth

7 lines
70 B
Forth

import: date
: testVariable
| a b c |
Date now ->a
a println ;