# HG changeset patch
# User William Astle <lost@l-w.ca>
# Date 1703660731 25200
# Node ID df803556bfaec2d1df6af9697651dbf4d6d302e1
# Parent  0aac264538491968b64dfc2a2934e80cdaac8472
Fix use of unsigned branch for signed comparison in floating point division

diff -r 0aac26453849 -r df803556bfae src/fps.s
--- a/src/fps.s	Tue Dec 26 23:37:45 2023 -0700
+++ b/src/fps.s	Wed Dec 27 00:05:31 2023 -0700
@@ -643,7 +643,7 @@
                 cmpa #64                        ; did we overflow upward?
                 lbge OVERROR                    ; brif so
                 cmpa #-64                       ; did we overflow downward (underflow)?
-                bls fps_div1                    ; brif we underflow
+                ble fps_div1                    ; brif we underflow
                 adda #64                        ; add back the bias
                 sta fpa0+fpa.exp                ; set result exponent
                 lda fpa0+fpa.sign               ; calculate result sign (XOR of argument signs)