Mercurial > repo

view src/ploki/examples/goto.pk @ 11950:2b46edb21685 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<ais523> ` printf \'#include <stdio.h>\\nint main(void) { float C = 4.0; printf("%f", C/C++); }\' | gcc -Wall -Wextra -x c /dev/stdin
author HackEso <hackeso@esolangs.org>
date Thu, 19 Sep 2019 17:55:31 +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