Mercurial > hg > Members > kono > os9 > sbc09

diff src/d09.c @ 71:eb9be32c701c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix leval
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sun, 05 Aug 2018 22:17:44 +0900
parents 9779a34e1a92
children c29030b5e4b4
line wrap: on
line diff
--- a/src/d09.c	Sun Aug 05 16:12:30 2018 +0900
+++ b/src/d09.c	Sun Aug 05 22:17:44 2018 +0900
@@ -1453,9 +1453,9 @@
 
   offset = prog[pc+1];
   if (offset < 127 )
-	 disp   = pc + 2 + offset;
+	 disp   = pc + 2 + offset + adoffset;
   else
-	 disp   = pc + 2 - (256 - offset);
+	 disp   = pc + 2 - (256 - offset + adoffset);
   fprintf(fp,"%0.2X %0.2X       %s%s       $%0.4X",
 	code, offset, suffix, op->name, disp);
   return op->bytes;