Return to dup.s CVS log

Up to [Research Unix] / researchv10dc / libc / sys

Annotation of researchv10dc/libc/sys/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:        .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.