git.sur5r.net Git - cc65/blob - libsrc/common/divt.s

   1 ; divt.s
   2 ;
   3 ; 2002-10-22, Greg King
   4 ;
   5 ; This signed-division function returns both the quotient and the remainder,
   6 ; in this structure:
   7 ;
   8 ; typedef struct {
   9 ;     int rem, quot;
  10 ; } div_t;
  11 ;
  12 ; div_t __fastcall__ div (int numer, int denom);
  13 ;
  14
  15         .export         _div
  16
  17         .import         tosdivax, negax
  18         .importzp       sreg, ptr1, tmp1
  19
  20 _div:   jsr     tosdivax        ; Division-operator does most of the work
  21         lda     sreg            ; Unsigned remainder is in sreg
  22         ldx     sreg+1
  23         ldy     ptr1            ; transfer quotient to sreg
  24         sty     sreg
  25         ldy     ptr1+1
  26         sty     sreg+1
  27
  28 ; Adjust the sign of the remainder.
  29 ; It must be the same as the sign of the dividend.
  30 ;
  31         bit     tmp1            ; Load high-byte of left argument
  32         bpl     Pos             ; Jump if sign-of-result is positive
  33         jmp     negax           ; Result is negative, adjust the sign
  34
  35 Pos:    rts
  36