|
|
1.1 ! root 1: TEXT _mainp(SB), 1, $16 ! 2: MOVL $a6base(SB), A6 ! 3: MOVL R0, _clock(SB) /* return value of sys exec!! */ ! 4: BSR _profmain(SB) ! 5: MOVL __prof+4(SB), __prof+0(SB) ! 6: PEA inargv+0(FP) ! 7: MOVL inargc-4(FP), TOS ! 8: BSR main(SB) ! 9: ! 10: loop: ! 11: MOVL $_exits<>+0(SB), R0 ! 12: MOVL R0,TOS ! 13: BSR exits(SB) ! 14: LEA _profin(SB), A0 /* force loading of profile */ ! 15: BRA loop ! 16: ! 17: TEXT _savearg(SB), 1, $0 ! 18: RTS ! 19: ! 20: TEXT _callpc(SB), 1, $0 ! 21: MOVL argp+0(FP), A0 ! 22: MOVL 4(A0), R0 ! 23: RTS ! 24: ! 25: DATA _exits<>+0(SB)/4, $"main" ! 26: GLOBL _exits<>+0(SB), $5
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.