|
|
1.1 root 1: # This program tests lib/esusp.s.
2:
3: procedure main()
4: every write(0 | foo(1) | foo(2) | foo(5 | 6 | 7))
5: end
6:
7: procedure foo(i)
8: if i % 2 = 1 then return i else fail
9: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.