Mercurial > hg > Members > kono > nitros9-code

changeset 3287:2996c407889b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
display: Fixed bug with '0' characters in decimal conversion
author L. Curtis Boyle <curtisboyle@sasktel.net>
date Sun, 05 Jul 2020 23:12:42 +0200
parents b9d9e3e53107
children a418110ecb44
files level1/cmds/display.asm
diffstat 1 files changed, 6 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/level1/cmds/display.asm	Thu Jun 18 23:55:13 2020 +0200
+++ b/level1/cmds/display.asm	Sun Jul 05 23:12:42 2020 +0200
@@ -1,7 +1,7 @@
 ********************************************************************
 * Display - Character display utility
 *
-* $Id$
+* $Id: display.asm,v 1.5 2003/09/04 23:06:16 boisy Exp $
 *
 * Edt/Rev  YYYY/MM/DD  Modified by
 * Comment
@@ -11,6 +11,8 @@
 *
 *   3      ????/??/??  Alan DeKok
 * Added decimal, text features.
+*   4      2020/07/04  L.Curtis Boyle
+* Fixed bug with '0' characters in decimal conversion
 
          nam   Display
          ttl   Character display utility
@@ -24,9 +26,9 @@
 tylg     set   Prgrm+Objct   
 atrv     set   ReEnt+rev
 rev      set   $01
-edition  set   3
+edition  set   4
 
-         mod   eom,name,tylg,atrv,start,size
+         mod   eom,name,tylg,atrv,Start,size
 
          org   0
 T.Delim  rmb   1          text delimiter
@@ -155,7 +157,7 @@
          beq   D.CR       yes, output the characters and then exit
 
          cmpa  #'0        smaller than zero?
-         bls   D.Done0    yes, we're done this decimal digit
+         blo   D.Done0    yes, we're done this decimal digit
          cmpa  #'9
          bhi   Error
          suba  #'0        convert ascii to number