|
|
1.1 ! root 1: # C library -- dup ! 2: ! 3: # f = dup(of [ ,nf]) ! 4: # f == -1 for error ! 5: ! 6: dup = 41 ! 7: .globl _dup ! 8: .globl _dup2 ! 9: .globl cerror ! 10: ! 11: _dup2: ! 12: bset #6,sp@(7) ! 13: _dup: ! 14: pea dup ! 15: trap #0 ! 16: bcc noerror ! 17: jmp cerror ! 18: noerror: ! 19: rts
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.