From e73e125cbf749229bb3d38082d04e699bf4f678e Mon Sep 17 00:00:00 2001 From: Bruce Mitchener Date: Tue, 5 Jan 2021 07:49:46 +0700 Subject: [PATCH] uraid: Suppress incompatible pointer type warnings. (#160) These pointers are pointers into the Lisp memory with a known layout represented by that struct type. --- src/uraid.c | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/src/uraid.c b/src/uraid.c index 565f6f9..8a8f311 100644 --- a/src/uraid.c +++ b/src/uraid.c @@ -432,24 +432,24 @@ LispPTR uraid_commands() { switch (URaid_arg1[0]) { case 'k': printf("IFP->KBDFXP :\n"); - bt1(Addr68k_from_StkOffset(InterfacePage->kbdfxp)); + bt1((FX*)Addr68k_from_StkOffset(InterfacePage->kbdfxp)); break; case 'm': printf("IFP->MISCFXP :\n"); - bt1(Addr68k_from_StkOffset(InterfacePage->miscfxp)); + bt1((FX*)Addr68k_from_StkOffset(InterfacePage->miscfxp)); break; case 'r': printf("IFP->RESETFXP :\n"); - bt1(Addr68k_from_StkOffset(InterfacePage->resetfxp)); + bt1((FX*)Addr68k_from_StkOffset(InterfacePage->resetfxp)); break; case 'g': printf("IFP->GCFXP :\n"); - bt1(Addr68k_from_StkOffset(InterfacePage->gcfxp)); + bt1((FX*)Addr68k_from_StkOffset(InterfacePage->gcfxp)); break; case 'p': printf("IFP->FAULTFXP :\n"); - bt1(Addr68k_from_StkOffset(InterfacePage->faultfxp)); + bt1((FX*)Addr68k_from_StkOffset(InterfacePage->faultfxp)); break; case 'u': bt(); break; @@ -587,7 +587,7 @@ LispPTR uraid_commands() { printf("0x%x\n", address); break; default: { - struct dtd *dtd = GetDTD(GetTypeNumber(address)); + struct dtd *dtd = (struct dtd*)GetDTD(GetTypeNumber(address)); #ifdef BIGVM index = dtd->dtd_name; #else