Return to count.s CVS log

Up to [MW Coherent from dump] / coherent / b / lib / libc / crt / i8086

Annotation of coherent/b/lib/libc/crt/i8086/count.s, revision 1.1

1.1     ! root        1: ////////
        !             2: / Scount is called as follows:
        !             3: /      mov     bx, address of m_flst
        !             4: /      call    count
        !             5: / It simply increments the count field, and if it was not already
        !             6: / on the list pointed to by `_fnclst', it places it there.
        !             7: / We also compare the stack pointer to the lowest sp previously
        !             8: / encountered and save the lower.
        !             9: / Note that because of the strange calling sequence, and the need
        !            10: / for speed, the file scount.s is a hand modified version of the C
        !            11: / compiler output.  The modifications are as follows:
        !            12: /      Remove the epilog and prolog.
        !            13: /      Recode to use scratch registers.
        !            14: /      Change routine name from scount_ to scount.
        !            15: / The C source is as follows:
        !            16: /
        !            17: /      #include "mon.h"
        !            18: /      
        !            19: /      struct m_flst   *_fnclst;
        !            20: /      struct m_hdr    _mhdr;
        !            21: /      
        !            22: /      scount(pc, flp)
        !            23: /      vaddr_t pc;                     /* actually passed in (sp) */
        !            24: /      register struct m_flst  *flp;   /* actually passed in bx */
        !            25: /      {
        !            26: /              ++flp->m_data.m_ncalls;
        !            27: /              if (&pc < _mhdr.m_lowsp)
        !            28: /                      _mhdr.m_lowsp = &pc;
        !            29: /              if (flp->m_link == NULL) {
        !            30: /                      flp->m_link = _fnclst;
        !            31: /                      _fnclst = flp;
        !            32: /                      flp->m_data.m_addr = pc;
        !            33: /              }
        !            34: /      }
        !            35: 
        !            36:        .shri
        !            37: 
        !            38:        .globl  scount
        !            39: 
        !            40: scount:
        !            41:        add     0x02(bx), $0x01
        !            42:        adc     0x04(bx), $0x00
        !            43:        cmp     sp, _mhdr_+0x08
        !            44:        jae     L2
        !            45:        mov     _mhdr_+0x08, sp
        !            46: 
        !            47: L2:    cmp     0x06(bx), $0x00
        !            48:        jne     L1
        !            49:        mov     ax, _fnclst_
        !            50:        mov     0x06(bx), ax
        !            51:        mov     _fnclst_, bx
        !            52:        pop     ax
        !            53:        push    ax
        !            54:        mov     (bx), ax
        !            55: 
        !            56: L1:    ret

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