From a831d46a26cd75fe1d6884191a3a08b54185138b Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Sat, 23 Mar 2002 09:32:43 +0000 Subject: [PATCH] r1632: Fixed error in LW with :pointer-void --- src/primitives.cl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/primitives.cl b/src/primitives.cl index 0b5f055..8a29b21 100644 --- a/src/primitives.cl +++ b/src/primitives.cl @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; $Id: primitives.cl,v 1.12 2002/03/21 11:38:07 kevin Exp $ +;;;; $Id: primitives.cl,v 1.13 2002/03/23 09:32:43 kevin Exp $ ;;;; ;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -100,7 +100,7 @@ supports takes advantage of this optimization." (defconstant +type-conversion-list+ '((* . :pointer) (:void . :void) (:short . :short) - (:pointer-void . (:pointer :unsigned :void)) + (:pointer-void . (:pointer :void)) (:cstring . (:reference-pass :ef-mb-string :allow-null t)) (:cstring-returning . (:reference :ef-mb-string :allow-null t)) (:char . :char) -- 2.34.1