Mercurial > hg > index.cgi

changeset 93:a4db504611e2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Handle tokenized signs parsing E notation
author William Astle <lost@l-w.ca>
date Tue, 17 Oct 2023 17:26:45 -0600
parents 6ac267da2216
children 5fa8c479dbf7
files src/number.s
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/number.s	Tue Oct 17 17:12:36 2023 -0600
+++ b/src/number.s	Tue Oct 17 17:26:45 2023 -0600
@@ -189,9 +189,13 @@
                 bcs val_parsenum9               ; brif digit
                 cmpa #'+                        ; positive?
                 beq val_parsenum8               ; brif no
+                cmpa #tok_plus                  ; tokenized plus?
+                beq val_parsenum8               ; brif so
                 cmpa #'-                        ; negative?
+                beq val_parsenum7a              ; brif so
+                cmpa #tok_minus                 ; tokenized minus?
                 lbne SNERROR                    ; brif not positive, negative, or digit
-                com fpaextra+5                  ; make sign of exponent negative
+val_parsenum7a  com fpaextra+5                  ; make sign of exponent negative
 val_parsenum8   jsr nextchar                    ; eat exponent sign/get next digit
                 bcc val_parsenum10              ; brif not a digit - done with number
 val_parsenum9   suba #0x30                      ; binary-ize the digit