RosettaCodeData/Task/Loops-While/Oforth/loops-while.oforth

2 lines
39 B
Text
Raw Permalink Normal View History

2016-12-05 23:44:36 +01:00
1024 while ( dup ) [ dup println 2 / ]