From d95b82ac458fdbab2304d0d8b72c72b944f2ebd6 Mon Sep 17 00:00:00 2001 From: Nick Briggs Date: Sun, 8 Jan 2023 23:18:39 -0800 Subject: [PATCH] Add (LispPTR) cast to VAG2 macro as this would otherwise produce a signed integer --- inc/address.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/inc/address.h b/inc/address.h index cb75dbb..b1b57cf 100644 --- a/inc/address.h +++ b/inc/address.h @@ -35,7 +35,7 @@ #define HILOC(ptr) (LRSH(((unsigned int)(ptr) & SEGMASK),16)) #define LOLOC(ptr) ((unsigned int)(ptr) & 0x0ffff) -#define VAG2(hi,lo) (LLSH((hi),16) | (lo)) +#define VAG2(hi,lo) (LispPTR)(LLSH((hi),16) | (lo)) /* NOTE: argument off must be WORD offset */