Return to rover.s CVS log

Up to [Research Unix] / researchv10dc / cmd / icon / setup / pc_pcix

Annotation of researchv10dc/cmd/icon/setup/pc_pcix/rover.s, revision 1.1.1.1

1.1       root        1: 
                      2:        .globl  _runerr
                      3:        .globl  _ckadd
                      4:        .globl  _cksub
                      5:        .globl  _ckmul
                      6:        .globl  lmul
                      7: 
                      8:        .text
                      9: _ckadd:
                     10:        push    bp
                     11:        mov     bp,sp
                     12:        mov     dx,*6(bp)
                     13:        mov     ax,*4(bp)
                     14:        add     ax,*8(bp)
                     15:        adc     dx,10(bp)
                     16:        jo      oflow
                     17:        pop     bp
                     18:        ret
                     19: _cksub:
                     20:        push    bp
                     21:        mov     bp,sp
                     22:        mov     dx,*6(bp)
                     23:        mov     ax,*4(bp)
                     24:        sub     ax,*8(bp)
                     25:        sbb     dx,*10(bp)
                     26:        jo      oflow
                     27:        pop     bp
                     28:        ret
                     29: _ckmul:
                     30:        push    bp
                     31:        mov     bp,sp
                     32:        push    *10(bp)
                     33:        push    *8(bp)
                     34:        push    *6(bp)
                     35:        push    *4(bp)
                     36:        call    lmul
                     37:        jo      oflow
                     38:        pop     bp
                     39:        ret
                     40: oflow:
                     41:        mov     cx,#0
                     42:        push    cx
                     43:        mov     cx,#203
                     44:        push    cx
                     45:         call   _runerr

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