From 059d750c751a6d84a5e3c7ccc09af29657f4cb6b Mon Sep 17 00:00:00 2001 From: Nick Briggs Date: Sun, 28 Aug 2022 18:05:45 -0700 Subject: [PATCH] Convert from LADDR_from_68k to LAddrFromNative in gchtfind.c --- src/gchtfind.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/gchtfind.c b/src/gchtfind.c index c2c4d27..300ebe3 100644 --- a/src/gchtfind.c +++ b/src/gchtfind.c @@ -11,7 +11,7 @@ #include "version.h" #include "address.h" // for LOLOC -#include "adr68k.h" // for LADDR_from_68k +#include "adr68k.h" // for LAddrFromNative #include "commondefs.h" // for error #include "gcdata.h" // for GETGC, GCENTRY, ADDREF, DELREF, gc_ovfl #include "gchtfinddefs.h" // for enter_big_reference_count, htfind, modify_... @@ -234,9 +234,9 @@ void enter_big_reference_count(LispPTR ptr) { }; if (tmp == NIL) { - if (Evenp(LADDR_from_68k(oventry + 1), DLWORDSPER_PAGE)) { + if (Evenp(LAddrFromNative(oventry + 1), DLWORDSPER_PAGE)) { if ((UNSIGNED)oventry + 1 >= (UNSIGNED)HTcoll) error("GC big reference count table overflow"); - newpage(LADDR_from_68k(oventry + 1)); + newpage(LAddrFromNative(oventry + 1)); } }