view src/ploki/examples/goto.pk @ 7335:b44bc1611031

<zgrep> misle/rn @/|@| = -1
author HackBot
date Fri, 01 Apr 2016 00:06:24 +0000
parents ac0403686959
children
line wrap: on
line source

#!../ploki
WUNT "1..3
GOTO 0
01 WUNT "ERROR MESSAGE
10 END
10 WUNT "ERROR MESSAGE
WUNT "ok 1
0  GOTO 10
20 WUNT "ok 3
20 GOTO 20
20 GOTO 0
20 WUNT "ERROR MESSAGE
10 WUNT "ok 2
10 GOTO 20
00 GOTO 10