mirror of
https://github.com/KarolS/millfork.git
synced 2024-10-31 14:04:58 +00:00
Use local labels in m6809_math
This commit is contained in:
parent
22bd6ac443
commit
f01879e4a3
@ -31,16 +31,16 @@ noinline asm word __divmod_u8u8u8u8(word register(a) p, word register(b) q) {
|
||||
ldb #8
|
||||
stb ,-s
|
||||
clrb
|
||||
__divmod_u8u8u8u8_loop:
|
||||
.__divmod_u8u8u8u8_loop:
|
||||
asla
|
||||
rolb
|
||||
cmpb 2,s
|
||||
blo __divmod_u8u8u8u8_skip
|
||||
blo .__divmod_u8u8u8u8_skip
|
||||
subb 2,s
|
||||
inca
|
||||
__divmod_u8u8u8u8_skip:
|
||||
.__divmod_u8u8u8u8_skip:
|
||||
dec ,s
|
||||
bne __divmod_u8u8u8u8_loop
|
||||
bne .__divmod_u8u8u8u8_loop
|
||||
stb 2,s
|
||||
leas 1,s
|
||||
puls pc,b,cc
|
||||
@ -53,18 +53,18 @@ noinline asm word __divmod_u16u16u16u16(word register(x) p, word register(d) q)
|
||||
pshs b
|
||||
clrb
|
||||
clra
|
||||
__divmod_u16u16u16u16_loop:
|
||||
.__divmod_u16u16u16u16_loop:
|
||||
asl 5,s
|
||||
rol 4,s
|
||||
rolb
|
||||
rola
|
||||
cmpd 2,s
|
||||
blo __divmod_u16u16u16u16_skip
|
||||
blo .__divmod_u16u16u16u16_skip
|
||||
subd 2,s
|
||||
inc 5,s
|
||||
__divmod_u16u16u16u16_skip:
|
||||
.__divmod_u16u16u16u16_skip:
|
||||
dec ,s
|
||||
bne __divmod_u16u16u16u16_loop
|
||||
bne .__divmod_u16u16u16u16_loop
|
||||
std 2,s
|
||||
leas 1,s
|
||||
puls pc,x,d,cc
|
||||
|
Loading…
Reference in New Issue
Block a user