![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to std42.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 std42.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.