1
0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-14 15:36:34 +00:00

Convert from LADDR_from_68k to LAddrFromNative in uraid.c

This commit is contained in:
Nick Briggs 2022-08-28 18:05:45 -07:00
parent 02fa9a6b23
commit a448bd0329

View File

@ -477,9 +477,9 @@ LispPTR uraid_commands() {
case 'M': /* Machine States */
printf("TOS : 0x%x\n", TopOfStack);
printf("CSTKP : 0x%x\n", LADDR_from_68k(CurrentStackPTR));
printf("PVAR : 0x%x\n", LADDR_from_68k(PVar));
printf("IVAR : 0x%x\n", LADDR_from_68k(IVar));
printf("CSTKP : 0x%x\n", LAddrFromNative(CurrentStackPTR));
printf("PVAR : 0x%x\n", LAddrFromNative(PVar));
printf("IVAR : 0x%x\n", LAddrFromNative(IVar));
printPC();
putchar('\n');
break;
@ -649,7 +649,7 @@ LispPTR uraid_commands() {
endptr = ptr + num;
while (ptr < endptr) {
printf("0x%x : ", LADDR_from_68k(ptr));
printf("0x%x : ", LAddrFromNative(ptr));
for (i = 0; ((ptr < endptr) && (i < XDUMPW)); ptr++, i++) { printf("%4x ", *ptr); }
putchar('\n');