From d28f05f79dfa2bf36f795fa10331349e3300beef Mon Sep 17 00:00:00 2001 From: Nick Briggs Date: Fri, 26 Aug 2022 21:26:00 -0700 Subject: [PATCH] Convert to NativeAligned2FromLAddr, NativeAligned4FromLAddr in main.c --- src/main.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/main.c b/src/main.c index 5640d45..2cd69c9 100644 --- a/src/main.c +++ b/src/main.c @@ -571,7 +571,7 @@ void start_lisp() { /*******************************/ #ifndef INIT { - INTSTAT *intstate = ((INTSTAT *)Addr68k_from_LADDR(*INTERRUPTSTATE_word)); + INTSTAT *intstate = ((INTSTAT *)NativeAligned4FromLAddr(*INTERRUPTSTATE_word)); intstate->ETHERInterrupt = 0; intstate->LogFileIO = 0; intstate->IOInterrupt = 0; @@ -583,9 +583,9 @@ void start_lisp() { TopOfStack = 0; Error_Exit = 0; - MState->pvar = (DLword *)Addr68k_from_LADDR(STK_OFFSET | InterfacePage->currentfxp) + FRAMESIZE; + MState->pvar = (DLword *)NativeAligned2FromLAddr(STK_OFFSET | InterfacePage->currentfxp) + FRAMESIZE; - freeptr = next68k = Addr68k_from_LADDR(STK_OFFSET | CURRENTFX->nextblock); + freeptr = next68k = NativeAligned2FromLAddr(STK_OFFSET | CURRENTFX->nextblock); if (GETWORD(next68k) != STK_FSB_WORD) error("Starting Lisp: Next stack block isn't free!");