Mercurial > hg > Members > kono > os9 > sbc09
comparison src/d09.c @ 71:eb9be32c701c
fix leval
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Sun, 05 Aug 2018 22:17:44 +0900 |
parents | 9779a34e1a92 |
children | c29030b5e4b4 |
comparison
equal
deleted
inserted
replaced
70:a200fa7d5b70 | 71:eb9be32c701c |
---|---|
1451 int offset; | 1451 int offset; |
1452 int disp; | 1452 int disp; |
1453 | 1453 |
1454 offset = prog[pc+1]; | 1454 offset = prog[pc+1]; |
1455 if (offset < 127 ) | 1455 if (offset < 127 ) |
1456 disp = pc + 2 + offset; | 1456 disp = pc + 2 + offset + adoffset; |
1457 else | 1457 else |
1458 disp = pc + 2 - (256 - offset); | 1458 disp = pc + 2 - (256 - offset + adoffset); |
1459 fprintf(fp,"%0.2X %0.2X %s%s $%0.4X", | 1459 fprintf(fp,"%0.2X %0.2X %s%s $%0.4X", |
1460 code, offset, suffix, op->name, disp); | 1460 code, offset, suffix, op->name, disp); |
1461 return op->bytes; | 1461 return op->bytes; |
1462 } | 1462 } |
1463 | 1463 |