From e6a4defeedc65126598fb820cef577055c80b5c2 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Mon, 11 Mar 2002 18:20:10 +0000 Subject: [PATCH] r1547: *** empty log message *** --- src/objects.cl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/objects.cl b/src/objects.cl index a4b4a6e..c8d219b 100644 --- a/src/objects.cl +++ b/src/objects.cl @@ -9,7 +9,7 @@ ;;;; ;;;; Copyright (c) 2002 Kevin M. Rosenberg ;;;; -;;;; $Id: objects.cl,v 1.3 2002/03/10 11:13:07 kevin Exp $ +;;;; $Id: objects.cl,v 1.4 2002/03/11 18:20:10 kevin Exp $ ;;;; ;;;; This file is part of the UFFI. ;;;; @@ -60,7 +60,7 @@ #+cmu `(system:int-sap 0) #+allegro 0 - #+lispworks `(fli:make-pointer :address 0 :type ',type) + #+lispworks `(fli:make-pointer :address 0 :type ,type) ) (defmacro deref-pointer (ptr type) -- 2.34.1