RosettaCodeData/Task/Dynamic-variable-names/Oforth/dynamic-variable-names.oforth

8 lines
94 B
Text
Raw Permalink Normal View History

2016-12-05 23:44:36 +01:00
: createVar(varname)
"tvar: " varname + eval ;
"myvar" createVar
12 myvar put
myvar at .