|
|
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 _envsetup(SB)
9: BSR main(SB)
10:
11: loop:
12: MOVL R0,TOS
13: BSR exit(SB)
14: LEA _profin(SB), A0 /* force loading of profile */
15: BRA loop
16:
17:
18: TEXT _savearg(SB), 1, $0
19: RTS
20:
21: TEXT _callpc(SB), 1, $0
22: MOVL argp+0(FP), A0
23: MOVL 4(A0), R0
24: RTS
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.