Stair-climbing puzzle: Difference between revisions

Line 696:
=={{header|Perl 6}}==
<lang perl6>sub step_up { step_up until step; }</lang>
 
=={{header|Phix}}==
<lang Phix>procedure step_up()
while not step() do step_up() end while
end procedure</lang>
 
=={{header|PicoLisp}}==
7,813

edits