RosettaCodeData/Task/Increment-a-numerical-string/Forth/increment-a-numerical-string-4.fth
2023-07-01 13:44:08 -04:00

3 lines
50 B
Forth

s" 123" pad place
pad 1 inc-string
pad count type