2.9BSD - /usr/src/ucb/pascal/px/06add.s

   1: /
   2: / ADDITION
   3: /
   4: _ADD42:
   5:         mov     (sp)+,r0
   6:         mov     (sp)+,r1
   7:         br      1f
   8: _ADD2:
   9:         mov     (sp)+,r1
  10:         sxt     r0
  11: 1:
  12:         mov     (sp)+,r3
  13:         sxt     r2
  14:         add     r1,r3
  15:         adc     r2
  16:         add     r0,r2
  17:         mov     r3,-(sp)
  18:         mov     r2,-(sp)
  19:         return
  20: _ADD24:
  21:         mov     (sp)+,r1
  22:         sxt     r0
  23:         add     r1,2(sp)
  24:         adc     r0
  25:         add     r0,(sp)
  26:         return
  27: _ADD4:
  28:         add     (sp)+,2(sp)
  29:         add     (sp)+,2(sp)
  30:         adc     (sp)
  31:         return
  32: _ADD8:
  33:         movf    (sp)+,fr0
  34:         addf    (sp)+,fr0
  35:         cfcc
  36:         bvs     9f
  37:         movf    fr0,-(sp)
  38:         return
  39: _ADD28:
  40:         tst     (sp)
  41:         sxt     -(sp)
  42: _ADD48:
  43:         movif   (sp)+,fr0
  44:         addf    (sp)+,fr0
  45:         cfcc
  46:         bvs     9f
  47:         movf    fr0,-(sp)
  48:         return
  49: _ADD82:
  50:         movf    (sp)+,fr0
  51:         tst     (sp)
  52:         sxt     -(sp)
  53:         br      1f
  54: _ADD84:
  55:         movf    (sp)+,fr0
  56: 1:
  57:         movif   (sp)+,fr2
  58:         addf    fr0,fr2
  59:         cfcc
  60:         bvs     9f
  61:         movf    fr2,-(sp)
  62:         return
  63: 9:
  64: fpovflo:
  65:         mov     $EFPOVFLO,_perrno
  66:         error   EFPOVFLO

Defined functions