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         sta     sreg            ; Quotient is in sreg
  22         stx     sreg+1
  23         lda     ptr1            ; Unsigned remainder is in ptr1
  24         ldx     ptr1+1
  25
  26 ; Adjust the sign of the remainder.
  27 ; It must be the same as the sign of the dividend.
  28 ;
  29         bit     tmp1            ; Load high-byte of left argument
  30         bpl     Pos             ; Jump if sign-of-result is positive
  31         jmp     negax           ; Result is negative, adjust the sign
  32
  33 Pos:    rts
  34