File: testcreate.i

package info (click to toggle)
intercal 30%3A0.30-6
  • links: PTS
  • area: main
  • in suites: sid, trixie
  • size: 4,044 kB
  • sloc: ansic: 8,936; sh: 1,274; yacc: 1,073; lex: 518; lisp: 460; makefile: 438; perl: 295
file content (13 lines) | stat: -rw-r--r-- 234 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
	DO .3 <- #5
	DO .4 <- #6
	DO CREATE (5) SWITCH .1 WITH .2
	DO SWITCH .3 WITH .4
	DO READ OUT .3
	DO READ OUT .4
	PLEASE GIVE UP
(5)	PLEASE STASH :1
	DO :1 <- :1601
	DO :1601 <- :1602
	DO :1602 <- :1
	DO RETRIEVE :1
	PLEASE RESUME #1