Return to mcount.s CVS log

Up to [CSRG BSD Unix] / 40BSD / cmd / lisp

Annotation of 40BSD/cmd/lisp/mcount.s, revision 1.1.1.1

1.1       root        1:        .asciz  "@(#)mcount.s   34.1    10/3/80"
                      2: # count subroutine called during profiling
                      3: 
                      4: .globl mcount
                      5: .globl _mcount
                      6: .comm  _countbase,4
                      7: 
                      8: _mcount:
                      9: mcount:
                     10:        movl    (r0),r1
                     11:        beql    init
                     12: incr:
                     13:        incl    (r1)
                     14: return:
                     15:        rsb
                     16: init:
                     17:        movl    _countbase,r1
                     18:        beql    return
                     19:        addl2   $8,_countbase
                     20:        movl    (sp),(r1)+
                     21:        movl    r1,(r0)
                     22:        brb     incr

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