X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=src%2Fprimitives.cl;fp=src%2Fprimitives.cl;h=7a57a949aa4c5d7352fd01f472b92977a4f8a354;hb=c57456a61454df74d1724d13010322ca606d070a;hp=d5e1e367b0b07262b45220e46dc5379d1a2a1821;hpb=826fbd8d3eb045be638e1bead7eb24464073314d;p=uffi.git diff --git a/src/primitives.cl b/src/primitives.cl index d5e1e36..7a57a94 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.19 2002/06/27 05:46:39 kevin Exp $ +;;;; $Id: primitives.cl,v 1.20 2002/06/27 14:35:24 kevin Exp $ ;;;; ;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -109,7 +109,7 @@ supports takes advantage of this optimization." (:cstring . (:reference-pass (:ef-mb-string :external-format :latin-1) :allow-null t)) (:cstring-returning . (:reference (:ef-mb-string :external-format :latin-1) :allow-null t)) - (:byte . :byte)) + (:byte . :byte) (:unsigned-byte . (:unsigned :byte)) (:char . :char) (:unsigned-char . (:unsigned :char))