source:
trunk/libs/newlib/src/newlib/libc/machine/w65/smulhi3.S
@
444
Last change on this file since 444 was 444, checked in by , 6 years ago | |
---|---|
File size: 153 bytes |
Rev | Line | |
---|---|---|
[444] | 1 | .global ___smulhi3 |
2 | ___smulhi3: | |
3 | ||
4 | ||
5 | ||
6 | lda #0 | |
7 | mult1: ldx <r4 | |
8 | beq done | |
9 | lsr <r4 | |
10 | bcc mult2 | |
11 | clc | |
12 | adc <r5 | |
13 | ||
14 | mult2: asl <r5 | |
15 | bra mult1 | |
16 | ||
17 | done: sta <r0 | |
18 | rtl | |
19 | ||
20 |
Note: See TracBrowser
for help on using the repository browser.