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