Word wrap: Difference between revisions

Line 2,385:
 
=={{header|Klingphix}}==
<lang Klingphix>:wordwrap %long >!long
%ps 0 >!ps
split
len [ drop
pop swap len <$ps add+ >!ps
<$ps <$long great> [ len >!ps nl ] if
print " " print
<$ps 1 add+ >!ps
] for
drop
672

edits