Return to getgid.s CVS log

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

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

1.1       root        1: # C library -- getgid
                      2: 
                      3: # gid = getgid();
                      4: #
                      5: 
                      6:        getgid = 47
                      7: .globl _getgid
                      8: 
                      9: _getgid:
                     10:        linkw   a6,#0
                     11:        pea     getgid
                     12:        trap    #0
                     13:        unlk    a6
                     14:        rts
                     15: 
                     16: # C library -- getegid
                     17: 
                     18: # gid = getegid();
                     19: # returns effective gid
                     20: 
                     21: .globl _getegid
                     22: 
                     23: _getegid:
                     24:        linkw   a6,#0
                     25:        pea     getgid
                     26:        trap    #0
                     27:        movl    d1,d0
                     28:        unlk    a6
                     29:        rts

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