|
|
1.1 root 1: getlog = 64+3
2:
3: .globl _getlogname
4: _getlogname:
5: pea 0
6: 1:
7: movl sp@(8),sp@-
8: pea getlog
9: trap #0
10: bcc noerror
11: addql #8,sp
12: jmp cerror
13: noerror:
14: addql #8,sp
15: clrl d0
16: rts
17:
18: .globl _setlogname
19: _setlogname:
20: pea 1
21: bra 1b
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.