From 5143aa25b08f1ef508baf9d93cc6fb9c26419cc0 Mon Sep 17 00:00:00 2001
From: Nick Briggs <nicholas.h.briggs@gmail.com>
Date: Thu, 1 Sep 2022 14:15:36 -0700
Subject: [PATCH] Replace Addr68k related macros with NativeAligned inline
 functions

---
 src/gcfinal.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/gcfinal.c b/src/gcfinal.c
index f3ccaf8..5b6cf96 100644
--- a/src/gcfinal.c
+++ b/src/gcfinal.c
@@ -497,7 +497,7 @@ LispPTR reclaimstackp(LispPTR ptr) /* This is the entry function */
   STACKP *stkp;
   FX *fxp;
   stkp = (STACKP *)NativeAligned4FromLAddr(ptr);
-  fxp = (FX *)Addr68k_from_StkOffset(stkp->edfxp);
+  fxp = (FX *)NativeAligned4FromStackOffset(stkp->edfxp);
   decusecount68k(fxp); /* decrement the use-count for the frame it uses */
   return (NIL);        /* and let the normal reclaimer reclaim it */
 }