Return to dup.s CVS log

Up to [Research Unix] / researchv9 / libc / nsys

Annotation of researchv9/libc/nsys/dup.s, revision 1.1.1.1

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:        linkw   a6,#0
                     15:        pea     dup
                     16:        trap    #0
                     17:        bcc     noerror
                     18:        jmp     cerror
                     19: noerror:
                     20:        unlk    a6
                     21:        rts

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.