From 0e2cda2328ffd2c70e92afaeae8ff095cc29a49b Mon Sep 17 00:00:00 2001 From: Nick Briggs Date: Sat, 19 Jul 2025 22:44:27 -0700 Subject: [PATCH] Cleans up releasingvmempage implementation Uses consistent naming (_np) for native pointer equivalents of Lisp addresses --- src/gcfinal.c | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/src/gcfinal.c b/src/gcfinal.c index 7a0e177..ec4d1cf 100644 --- a/src/gcfinal.c +++ b/src/gcfinal.c @@ -164,13 +164,13 @@ static LispPTR findptrsbuffer(LispPTR ptr) { /************************************************************************/ LispPTR releasingvmempage(LispPTR ptr) { - struct buf *bptr; - LispPTR bufferptr = findptrsbuffer(ptr); + LispPTR buffer = findptrsbuffer(ptr); + struct buf *buffer_np; - if (bufferptr == NIL) return (NIL); /* Not in use, OK to reclaim it */ + if (buffer == NIL) return (NIL); /* Not in use, OK to reclaim it */ - bptr = (struct buf *)NativeAligned4FromLAddr(bufferptr); - bptr->noreference = T; /* Mark the buffer free to use ?? */ + buffer_np = (struct buf *)NativeAligned4FromLAddr(buffer); + buffer_np->noreference = T; /* Mark the buffer free to use ?? */ return (ATOM_T); }