Return to getlog.s CVS log

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

Annotation of researchv10no/libc/sys/getlog.s, revision 1.1.1.1

1.1       root        1:        .set    getlog,64+3
                      2: 
                      3:        .globl  _getlogname
                      4: _getlogname:
                      5:        .word   0
                      6:        clrl    -(sp)
                      7: 1:
                      8:        pushl   4(ap)
                      9:        pushl   $2
                     10:        movl    sp,ap
                     11:        chmk    $getlog
                     12:        bcc     noerror
                     13:        jmp     cerror
                     14: noerror:
                     15:        clrl    r0
                     16:        ret
                     17: 
                     18:        .globl  _setlogname
                     19: _setlogname:
                     20:        .word   0
                     21:        pushl   $1
                     22:        brb     1b

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