Mercurial > hg > index.cgi

changeset 96:69af7224f614

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tweak exponent calculation in fp to ascii conversion
author William Astle <lost@l-w.ca>
date Sun, 22 Oct 2023 21:05:37 -0600
parents 25b44f1ac2aa
children b375a38b2b1a
files src/fps.s
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/fps.s	Sun Oct 22 21:03:24 2023 -0600
+++ b/src/fps.s	Sun Oct 22 21:05:37 2023 -0600
@@ -857,8 +857,8 @@
                 lda #'E                         ; output "E"
                 sta ,u+
                 tstb                            ; negative?
-                bpl fps_toascii10                ; brif not
-                negb                            ; positivize it
+                bpl fps_toascii10               ; brif not
+                comb                            ; positivize it, but also subtract 1?
                 lda #'-                         ; put a minus for the exponent
                 sta ,u+
 fps_toascii10   cmpb #10                        ; do we have two digits for exponent?