![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to std41.icn CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSD / contrib / icon / test|
Return to std41.icn CVS log | Up to [CSRG BSD Unix] / 43BSD / contrib / icon / test |
1.1 root 1: record array(a,b,c,d,e,f,g)
2:
3: procedure dummy(u,v,x,y,z)
4: suspend u | v
5: return x
6: end
7:
8: procedure main()
9: write("i := 10 ----> ",image(i := 10) | "none")
10: write("i =:= 9 ----> ",image(i =:= 9) | "none")
11: write("i ----> ",image(i) | "none")
12: write("i := 10 ----> ",image(i := 10) | "none")
13: write("i =:= 10 ----> ",image(i =:= 10) | "none")
14: write("i ----> ",image(i) | "none")
15: write("i := 10 ----> ",image(i := 10) | "none")
16: write("i =:= 11 ----> ",image(i =:= 11) | "none")
17: write("i ----> ",image(i) | "none")
18: write("i := 10 ----> ",image(i := 10) | "none")
19: write("i >=:= 9 ----> ",image(i >=:= 9) | "none")
20: write("i ----> ",image(i) | "none")
21: write("i := 10 ----> ",image(i := 10) | "none")
22: write("i >=:= 10 ----> ",image(i >=:= 10) | "none")
23: write("i ----> ",image(i) | "none")
24: write("i := 10 ----> ",image(i := 10) | "none")
25: write("i >=:= 11 ----> ",image(i >=:= 11) | "none")
26: write("i ----> ",image(i) | "none")
27: write("i := 10 ----> ",image(i := 10) | "none")
28: write("i >:= 9 ----> ",image(i >:= 9) | "none")
29: write("i ----> ",image(i) | "none")
30: write("i := 10 ----> ",image(i := 10) | "none")
31: write("i >:= 10 ----> ",image(i >:= 10) | "none")
32: write("i ----> ",image(i) | "none")
33: write("i := 10 ----> ",image(i := 10) | "none")
34: write("i >:= 11 ----> ",image(i >:= 11) | "none")
35: write("i ----> ",image(i) | "none")
36: write("i := 10 ----> ",image(i := 10) | "none")
37: write("i <=:= 9 ----> ",image(i <=:= 9) | "none")
38: write("i ----> ",image(i) | "none")
39: write("i := 10 ----> ",image(i := 10) | "none")
40: write("i <=:= 10 ----> ",image(i <=:= 10) | "none")
41: write("i ----> ",image(i) | "none")
42: write("i := 10 ----> ",image(i := 10) | "none")
43: write("i <=:= 11 ----> ",image(i <=:= 11) | "none")
44: write("i ----> ",image(i) | "none")
45: write("i := 10 ----> ",image(i := 10) | "none")
46: write("i <:= 9 ----> ",image(i <:= 9) | "none")
47: write("i ----> ",image(i) | "none")
48: write("i := 10 ----> ",image(i := 10) | "none")
49: write("i <:= 10 ----> ",image(i <:= 10) | "none")
50: write("i ----> ",image(i) | "none")
51: write("i := 10 ----> ",image(i := 10) | "none")
52: write("i <:= 11 ----> ",image(i <:= 11) | "none")
53: write("i ----> ",image(i) | "none")
54: write("i := 10 ----> ",image(i := 10) | "none")
55: write("i ~=:= 9 ----> ",image(i ~=:= 9) | "none")
56: write("i ----> ",image(i) | "none")
57: write("i := 10 ----> ",image(i := 10) | "none")
58: write("i ~=:= 10 ----> ",image(i ~=:= 10) | "none")
59: write("i ----> ",image(i) | "none")
60: write("i := 10 ----> ",image(i := 10) | "none")
61: write("i ~=:= 11 ----> ",image(i ~=:= 11) | "none")
62: write("i ----> ",image(i) | "none")
63: write("i <= [] ----> ",image(i <= []) | "none")
64: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.