Fix indirect call address TO_UWORD

This commit is contained in:
David Schmenk 2014-04-29 17:29:10 -07:00
parent def38e3c3a
commit 1c569ff909

View File

@ -731,7 +731,7 @@ void interp(code *ip)
call(UWORD_PTR(ip)); call(UWORD_PTR(ip));
break; break;
case 0x56: // ICALL : TOFP = IP, IP = (TOS) ; indirect call case 0x56: // ICALL : TOFP = IP, IP = (TOS) ; indirect call
val = POP; val = TO_UWORD(POP);
ea = mem_data[val] | (mem_data[val + 1] << 8); ea = mem_data[val] | (mem_data[val + 1] << 8);
call(ea); call(ea);
break; break;