RosettaCodeData/Task/Substring-Top-and-tail/Amazing-Hopper/substring-top-and-tail.hopper

15 lines
206 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
#include <hopper.h>
#proto showmessage(_X_)
main:
s="message", t=s
++s, _show message(s)
s=t
--s, _show message(s)
++s, _show message(s)
{0}return
.locals
showmessage(_S_)
{_S_,"\n"}print
back