1: / 2: / 32-bit multiplication routine for fixed pt hardware. 3: / Implements * operator 4: / Credit to an unknown author who slipped it under the door. 5: .globl lmul 6: .globl csv, cret 7: 8: lmul: 9: jsr r5,csv 10: mov 6(r5),r2 11: sxt r1 12: sub 4(r5),r1 13: mov 10.(r5),r0 14: sxt r3 15: sub 8.(r5),r3 16: mul r0,r1 17: mul r2,r3 18: add r1,r3 19: mul r2,r0 20: sub r3,r0 21: jmp cret