|
|
1.1 root 1: # This program tests rt/arith.s.
2:
3: procedure main()
4: write(1 + 2)
5: write(1 + "2")
6: write(3 * 2e10)
7: write(5e8 - 4e8)
8: i := 0
9: if i = 0 then write("conditional checks")
10: write(1 / 1)
11: write(-7 % 3)
12: write(10 ^ 3)
13: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.