Mercurial > hg > Members > kono > os9 > sbc09

changeset 85:4652761a60f9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
mmeu fix
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sun, 12 Aug 2018 12:34:56 +0900
parents 9b661787d5ed
children 4967d1acd34a
files src/engine.c src/v09.c
diffstat 2 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/engine.c	Sat Aug 11 18:16:04 2018 +0900
+++ b/src/engine.c	Sun Aug 12 12:34:56 2018 +0900
@@ -56,7 +56,7 @@
 #else
 
 int paddr(Word adr, Byte *immu) { 
-    if ((adr&0xfe00)==(IOPAGE&0xfe00)) return adr;
+    if ((adr&0xfe00)==(IOPAGE&0xfe00)) return 0x38*0x2000+adr;
     return  (immu[ (adr) >> 13 ] <<13 ) + ((adr) & 0x1fff ); 
 }
 
--- a/src/v09.c	Sat Aug 11 18:16:04 2018 +0900
+++ b/src/v09.c	Sun Aug 12 12:34:56 2018 +0900
@@ -58,8 +58,8 @@
  // ir=mem[pc++];
  // fprintf(tracefile,"i=%02x ",ir); if((ir&0xfe)==0x10) fprintf(tracefile,"%02x ",mem[pc]);else 
  // fprintf(tracefile,"   ");
- fprintf(tracefile,"x=%04x y=%04x u=%04x s=%04x a=%02x b=%02x cc=%02x pc=",
-                   xreg,yreg,ureg,sreg,*areg,*breg,ccreg);
+ fprintf(tracefile,"x=%04x y=%04x u=%04x s=%04x a=%02x b=%02x cc=%02x dp=%02x pc=",
+                   xreg,yreg,ureg,sreg,*areg,*breg,ccreg,dpreg);
  fp = tracefile;
  disasm(pc,pc);
 }