Return to rover.s CVS log

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

Annotation of researchv10dc/cmd/icon/setup/vax_sysv/rover.s, revision 1.1

1.1     ! root        1: .globl _ckadd
        !             2: .globl _cksub
        !             3: .globl _ckmul
        !             4: 
        !             5:  .text
        !             6:  .align        1
        !             7: _ckadd:        .word   0
        !             8:        addl3   4(ap),8(ap),r0  # Perform addition
        !             9:        jvs     oflow           # Branch if overflow
        !            10:        ret                     # Return result in r0
        !            11: 
        !            12:  .align        1
        !            13: _cksub: .word  0
        !            14:        subl3   8(ap),4(ap),r0  # Perform subtraction
        !            15:        jvs     oflow           # Branch if overflow
        !            16:        ret                     # Return result in r0
        !            17: 
        !            18:  .align        1
        !            19: _ckmul:        .word   0
        !            20:        mull3   4(ap),8(ap),r0  # Perform multiplication
        !            21:        jvs     oflow           # Branch if overflow
        !            22:        ret                     # Return result in r0
        !            23: 
        !            24: oflow:                         # Got overflow on an operation
        !            25:        pushl   $0
        !            26:        pushl   $203
        !            27:        calls   $1,_runerr              # runerr(203,0)

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