[Z88dk-commits] CVS: z88dk/libsrc/_DEVELOPMENT/l/z80/ascii/txt_to_nu

Bridge to the z88dk-commits mailing list
Post Reply
alvin

[Z88dk-commits] CVS: z88dk/libsrc/_DEVELOPMENT/l/z80/ascii/txt_to_nu

Post by alvin »

Update of /cvsroot/z88dk/z88dk/libsrc/_DEVELOPMENT/l/z80/ascii/txt_to_num/fast
In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv6019

Modified Files:
l_atou.asm
Log Message:
was not computing the overflow byte properly when 16-bits too small for conversion

Index: l_atou.asm
===================================================================
RCS file: /cvsroot/z88dk/z88dk/libsrc/_DEVELOPMENT/l/z80/ascii/txt_to_num/fast/l_atou.asm,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** l_atou.asm 22 Mar 2014 06:13:24 -0000 1.2
--- l_atou.asm 29 Mar 2014 05:06:44 -0000 1.3
***************
*** 74,77 ****
--- 74,87 ----
oflow_1:

+ ; tricky -- bc is actually 17-bits here
+ ; so must come back and increment the top byte
+
+ call oflow_1a
+
+ inc a
+ ret
+
+ oflow_1a:
+
push de
ld e,1
***************
*** 88,92 ****

add hl,bc
! rl e

oflow_4a:
--- 98,103 ----

add hl,bc
! jr nc, oflow_4a
! inc e

oflow_4a:


------------------------------------------------------------------------------
Post Reply