|
|
1.1 ! root 1: # C library -- dup ! 2: ! 3: # f = dup(of [ ,nf]) ! 4: # f == -1 for error ! 5: ! 6: .set dup,41 ! 7: .globl _dup ! 8: .globl _dup2 ! 9: .globl cerror ! 10: ! 11: _dup2: ! 12: .word 0x0000 ! 13: bisb2 $0100,4(ap) ! 14: brb L1 ! 15: _dup: ! 16: .word 0x0000 ! 17: L1: ! 18: chmk $dup ! 19: bcc noerror ! 20: jmp cerror ! 21: noerror: ! 22: ret
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.