Welcome to mirror list, hosted at ThFree Co, Russian Federation.

smulhi3.s « w65 « machine « libc « newlib - cygwin.com/git/newlib-cygwin.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
blob: 6ccbfba013ee7d92a8a4f44787db59fb9c1da980 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
	.global	___smulhi3
___smulhi3:	


	
	lda	#0
mult1:	ldx	<r4
	beq	done
	lsr	<r4
	bcc	mult2
	clc
	adc	<r5

mult2:	asl	<r5
	bra	mult1

done:	sta	<r0
	rtl