|
|
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.