Mercurial > repo

view src/ploki/examples/goto.pk @ 12254:616be78bd12e draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<oerjan> revert
author HackEso <hackeso@esolangs.org>
date Fri, 06 Dec 2019 07:54:58 +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