Mercurial > hg > Members > kono > nitros9-code

changeset 1135:9960b6258374

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixed problem where program exited with error, also rearranged position of text within module.
author boisy
date Fri, 18 Apr 2003 12:25:46 +0000
parents 8b0ecedcdbfb
children de922d952820
files level1/cmds/cputype.asm
diffstat 1 files changed, 9 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/level1/cmds/cputype.asm	Wed Apr 16 05:15:02 2003 +0000
+++ b/level1/cmds/cputype.asm	Fri Apr 18 12:25:46 2003 +0000
@@ -6,7 +6,7 @@
 * Ed.    Comments                                       Who YY/MM/DD
 * ------------------------------------------------------------------
 *   1    Started                                        ADK ??/??/??
-*   2    Fixed a crash bug on 6809, now just reports    BGP 03/04/02
+*   2r1  Fixed a crash bug on 6809, now just reports    BGP 03/04/02
 *        6809 message on a 6809
 
          nam   CPUType
@@ -18,7 +18,7 @@
 
 tylg     set   Prgrm+Objct
 atrv     set   Reent+Rev
-rev      set   0
+rev      set   1
 edition  set   2
 
          org   0
@@ -36,10 +36,17 @@
          fcb   C$CR
 L6809    equ   *-c.6809
 
+m.6809   fcc   /running in 6809 mode./
+         fcb   C$CR
+
+m.6309   fcc   /running in 6309 native mode./
+         fcb   C$CR
+
 is.6809  leax  c.6809,pc
          ldy   #L6809
          lda   #1
          os9   I$WritLn
+         clrb
          os9   F$Exit
 
 * Entry of program
@@ -83,12 +90,6 @@
          clrb             no errors
          OS9   F$Exit
 
-m.6809   fcc   /running in 6809 mode./
-         fcb   C$CR
-
-m.6309   fcc   /running in 6309 native mode./
-         fcb   C$CR
-
          emod
 eom      equ   *
          end