Mercurial > repo

diff interps/c-intercal/pit/tests/compucome.i @ 996:859f9b4339e6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<Gregor> tar xf egobot.tar.xz
author HackBot
date Sun, 09 Dec 2012 19:30:08 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/interps/c-intercal/pit/tests/compucome.i	Sun Dec 09 19:30:08 2012 +0000
@@ -0,0 +1,16 @@
+    	PLEASE NOTE THIS PROGRAM TESTS COMPUTED COME FROM
+	DO .2 <- #2
+(1)    	DO .1 <- #1
+(3)	DO READ OUT #5
+	DO COME FROM .1
+(256)	DO READ OUT #2
+	DO .2 <- '.2$#0'~#43691
+(5)	DO READ OUT #3
+	DO READ OUT #4
+	DO .1 <- #5
+	PLEASE DO (3) NEXT
+	PLEASE COME FROM .2
+	DO WRITE IN .1
+	DO WRITE IN .2
+(999)	DO NOTHING
+	PLEASE GIVE UP