RosettaCodeData/Task/Increment-a-numerical-string/Oforth/increment-a-numerical-strin...

3 lines
55 B
Forth

"999" 1 + println
"999" asInteger 1 + asString println