Plan 9 from Bell Labs’s /usr/web/sources/contrib/fgb/root/sys/src/cmd/4th/examples/bench/misty.4th
: INNER 10000 0 DO 34 DROP LOOP ; : OUTER 10000 0 DO INNER LOOP ; \ OUTER QUIT VARIABLE TEMP : INNER2 10000 0 DO 34 TEMP ! LOOP ; : OUTER2 10000 0 DO INNER2 LOOP ; OUTER2