Mercurial > repo

view src/ploki/examples/throw.pk @ 11952:bf859c78a439 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<kmc> addquote <ais523> (one nice thing about asking in #esoteric rather than #perl is that you don\'t have to attempt to justify what you\'re doing)
author HackEso <hackeso@esolangs.org>
date Sun, 22 Sep 2019 02:09:55 +0000
parents ac0403686959
children
line wrap: on
line source

#!../ploki
LET a @EVAL @foo 2
a_priv_"
LET a @EVAL @foo 0
a_", "_\__priv_"
END
FOR foo LEET priv " ERROR MESSAGE"
	IF \@ > 0
		KTHX \@ * 2
	ELSE
		IACS "error"
	FI