Mercurial > repo

diff src/ploki/examples/reset.pk @ 4223:ac0403686959

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<oerjan> rm -rf src/ploki; mv ploki src
author HackBot
date Fri, 20 Dec 2013 22:18:50 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/ploki/examples/reset.pk	Fri Dec 20 22:18:50 2013 +0000
@@ -0,0 +1,14 @@
+#!../ploki
+IF @NOT ("foo" ~ "{.}0!") | (\0 ; "o")
+	"error
+	END -1
+FI
+IF "foo" ~ "b"
+	"error
+	END -1
+FI
+IF @DEF-P \0
+	"ARGH: match variable not reset
+	END -1
+FI
+"ok