|
|
1.1 ! root 1: # This program tests the "basis" of the Icon system: iconx/start.s, ! 2: # rt/setbound.s, lib/invoke.s, iconx/interp.s, lib/efail.s, and ! 3: # lib/pfail.s ! 4: ! 5: procedure main() ! 6: foo() ! 7: end ! 8: ! 9: procedure foo() ! 10: write(&level) ! 11: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.