From 6a4ed88f379ac667cec0ebc4f3ed3715ad866322 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 allocmds.c --- src/allocmds.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/allocmds.c b/src/allocmds.c index c432538..209ffb6 100644 --- a/src/allocmds.c +++ b/src/allocmds.c @@ -26,7 +26,7 @@ /**********************************************************************/ #include "address.h" // for LOLOC -#include "adr68k.h" // for LADDR_from_68k, LPAGE_from_68k, Addr68k_fr... +#include "adr68k.h" // for LAddrFromNative, LPAGE_from_68k, Addr68k_fr... #include "allocmdsdefs.h" // for alloc_mdspage, initmdspage #include "commondefs.h" // for error #include "lispemul.h" // for DLword, LispPTR, DLWORDSPER_PAGE, MDSINCRE... @@ -94,7 +94,7 @@ LispPTR initmdspage(LispPTR *base, DLword size, LispPTR prev) used = 0; while ((used += size) <= limit) { *base = prev; /* write prev MDS address to the top of MDS page */ - prev = LADDR_from_68k(base); /* exchanging pointers */ + prev = LAddrFromNative(base); /* exchanging pointers */ base = (LispPTR *)((DLword *)base + size); } /* while end */ @@ -156,7 +156,7 @@ LispPTR *alloc_mdspage(short int type) { #else *Next_MDSpage_word = S_POSITIVE | LPAGE_from_68k(Next_MDSpage); #endif - newpage(newpage(LADDR_from_68k(ptr)) + DLWORDSPER_PAGE); + newpage(newpage(LAddrFromNative(ptr)) + DLWORDSPER_PAGE); } Make_MDSentry(LPAGE_from_68k(ptr), type);