Mercurial > hg > Members > kono > os9 > sbc09

changeset 166:a813c5ae58d5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Wed, 10 Apr 2019 12:09:08 +0900
parents 5aefcd52aba8
children 3f8bbec566b3
files TL1/TL1os9.asm
diffstat 1 files changed, 3 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/TL1/TL1os9.asm	Wed Apr 10 10:08:44 2019 +0900
+++ b/TL1/TL1os9.asm	Wed Apr 10 12:09:08 2019 +0900
@@ -104,7 +104,7 @@
 start    LEAY OBJECT,u
          STY PC
          lda   ,x
-         cmpa  '-'
+         cmpa  #'-'
          bne   run
          leax  1,x
          lda   ,x+
@@ -1423,7 +1423,6 @@
        pshs  x,y,u
        lda   #$ff
        sta   <runmod
-       puls  x,y,pc
        ldy   <pc
        ldd   #$87CD
        std   ,y++
@@ -1452,13 +1451,13 @@
        lbeq   ERROR    * no file name
 m0     lda    ,x+
        bne    m3
-       cmpa   '/'
+       cmpa   #'/'
        bne    m0
        tfr    x,u
        bra    m0
 m1     lda    ,u+
        beq    m3
-       cmpa   '.'
+       cmpa   #'.'
        beq    m3
        sta    ,y+
        bra    m1