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

   1 ;
   2 ; 2014-03-27, Oliver Schmidt
   3 ; 2014-05-08, Greg King
   4 ;
   5 ; CC65 library: 8x8 => 16 signed multiplication
   6 ;
   7
   8         .export         _imul8x8r16
   9         .import         imul8x8r16, popa, ptr1:zp
  10
  11
  12 ;---------------------------------------------------------------------------
  13 ; 8x8 => 16 signed multiplication routine.
  14
  15
  16 .proc   _imul8x8r16
  17
  18         sta     ptr1
  19         jsr     popa
  20         jmp     imul8x8r16
  21
  22 .endproc