# HG changeset patch
# User William Astle <lost@l-w.ca>
# Date 1703484500 25200
# Node ID 1a5da3594a9ee36b797e1d3c48105ce6a339e70e
# Parent  b1958992a66a9e926e825e3576a7343cb0ec23d1
Fix exponent calculation in floating point multplication

When comparing signed values, use a signed branch. Otherwise things
don't work as expected for some reason....

diff -r b1958992a66a -r 1a5da3594a9e src/fps.s
--- a/src/fps.s	Sun Dec 03 14:57:19 2023 -0700
+++ b/src/fps.s	Sun Dec 24 23:08:20 2023 -0700
@@ -474,7 +474,7 @@
                 cmpa #63                        ; did we overflow upward?
                 bgt OVERROR                     ; brif so
                 cmpa #-63                       ; did we underflow?
-                bhs fps_mul3                    ; brif not
+                bge fps_mul3                    ; brif not
 fps_mul2        clr fpa0+fpa.exp                ; return zero if we underflow
                 leax ,y
                 jmp fps_pack0