Mercurial > repo

comparison interps/clc-intercal/CLC-INTERCAL-Docs-1.-94.-2/doc/examples/syscall3.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
comparison
equal deleted inserted replaced
995:6883f5911eb7 996:859f9b4339e6
1 PLEASE NOTE: EXAMPLE OF CALLING SYSTEM CALL #3, OPEN FILE
2
3 PLEASE :5 <- #114
4 PLEASE ,5 <- #14
5 DO ,5 SUB #1 <- #95
6 DO ,5 SUB #2 <- #91
7 DO ,5 SUB #3 <- #93
8 DO ,5 SUB #4 <- #95
9 DO ,5 SUB #5 <- #95
10 DO ,5 SUB #6 <- #80
11 DO ,5 SUB #7 <- #92
12 DO ,5 SUB #8 <- #86
13 DO ,5 SUB #9 <- #91
14 DO ,5 SUB #10 <- #93
15 DO ,5 SUB #11 <- #95
16 DO ,5 SUB #12 <- #95
17 DO ,5 SUB #13 <- #80
18 DO ,5 SUB #14 <- #77
19 (666) DO .5 <- #3
20 PLEASE READ OUT @5 + :5 + ,5
21 PLEASE GIVE UP