pop-11

;;; Hello World in pop-11

define hello();
vars i;
0 -> i;
until i > 0
do "Hello World" =>
enduntil;
enddefine;


: hello()