Reverse words in a string: Difference between revisions

Content added Content deleted
Line 856: Line 856:
buf to pp \ initialize pointer to buffer address
buf to pp \ initialize pointer to buffer address
collect
collect
depth 2/ 0 ?do type bl emit loop \ print strings with a space
depth 2/ 0 ?do type space loop \ print strings with a space
cr ; \ final new line
cr ; \ final new line