Mercurial > repo

diff interps/clc-intercal/CLC-INTERCAL-Docs-1.-94.-2/doc/examples/syscall1.si @ 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/clc-intercal/CLC-INTERCAL-Docs-1.-94.-2/doc/examples/syscall1.si	Sun Dec 09 19:30:08 2012 +0000
@@ -0,0 +1,15 @@
+	PLEASE NOTE: EXAMPLE OF CALLING SYSTEM CALL #1 AND #2
+
+(666)	DO .1 <- #2
+	DO ,2 <- #3
+	DO ,2 SUB #1 <- #91
+	DO ,2 SUB #2 <- #95
+	DO ,2 SUB #3 <- #68
+(666)	DO .3 <- #1
+	DO ,4 <- #3
+	DO ,4 SUB #1 <- #91
+	DO ,4 SUB #2 <- #95
+	DO ,4 SUB #3 <- #66
+(666)   DO .1 <- #7
+	PLEASE READ OUT ,1 + ,2 + ,3 + ,4
+	PLEASE GIVE UP