# HG changeset patch
# User William Astle <lost@l-w.ca>
# Date 1703730619 25200
# Node ID 053fd2fb92e8a46b2003a88c6366c98ac8b6c2fa
# Parent  e72cda5e5ee267f77bbc3cc28dd0eb305e511464
Check the correct extra precision byte for rounding during fp normalization

diff -r e72cda5e5ee2 -r 053fd2fb92e8 src/fps.s
--- a/src/fps.s	Wed Dec 27 15:57:59 2023 -0700
+++ b/src/fps.s	Wed Dec 27 19:30:19 2023 -0700
@@ -402,7 +402,7 @@
 fps_normalize3  addb fpa0+fpa.exp               ; adjust exponent
                 stb fpa0+fpa.exp
                 ble fps_normalize4              ; brif we underflowed to zero
-                ldb fpaextra                    ; get extra precision digit
+                ldb fpa0+fpa.extra              ; get extra precision digit
                 andb #0xf0                      ; keep only the highest extra precision digit
                 cmpb #0x50                      ; do we need to round?
                 blo fps_normalize5              ; brif not