; CC65 runtime: 16x16 => 32 unsigned multiplication
;
- .export _cc65_umul16x16r32, umul16x16r32, umul16x16r32m
- .import popax
- .importzp ptr1, ptr3, sreg
+ .export umul16x16r32, umul16x16r32m
+
+ .include "zeropage.inc"
;---------------------------------------------------------------------------
; 16x16 => 32 unsigned multiplication routine.
;
-; lhs rhs result result also in
-; -------------------------------------------------------------
-; ptr1 ax ax:sreg ptr1:sreg
+; routine lhs rhs result result also in
+; -----------------------------------------------------------------------
+; umul16x16r32 ptr1 ax ax:sreg ptr1:sreg
+; umul16x16r32m ptr1 ptr3 ax:sreg ptr1:sreg
+;
+; ptr3 is left intact by the routine.
;
-
-_cc65_umul16x16r32:
- sta ptr1
- stx ptr1+1
- jsr popax
umul16x16r32:
sta ptr3