From 02b663aaba3227e4541572337b3d4105a30c1768 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Sun, 15 Dec 2002 17:11:08 +0000 Subject: [PATCH] r3631: *** empty log message *** --- debian/changelog | 6 ++++++ src/primitives.lisp | 10 +++++----- 2 files changed, 11 insertions(+), 5 deletions(-) diff --git a/debian/changelog b/debian/changelog index 909f9d2..df12f9e 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,9 @@ +cl-uffi (1.2.4-1) unstable; urgency=low + + * Fix syntax error from last version + + -- Kevin M. Rosenberg Fri, 13 Dec 2002 18:54:41 -0700 + cl-uffi (1.2.3-1) unstable; urgency=low * More external format changes for lispworks (thanks Marc Battyani) diff --git a/src/primitives.lisp b/src/primitives.lisp index 06dd030..0353066 100644 --- a/src/primitives.lisp +++ b/src/primitives.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; $Id: primitives.lisp,v 1.7 2002/12/13 22:49:09 kevin Exp $ +;;;; $Id: primitives.lisp,v 1.8 2002/12/15 17:11:08 kevin Exp $ ;;;; ;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -180,11 +180,11 @@ supports takes advantage of this optimization." (:short . :short) (:pointer-void . (:pointer :void)) (:cstring . (:reference-pass (:ef-mb-string :external-format - (:latin-1 :eol-style :lf) - :allow-null t)) + (:latin-1 :eol-style :lf)) + :allow-null t)) (:cstring-returning . (:reference (:ef-mb-string :external-format - (:latin-1 :eol-style :lf) - :allow-null t)) + (:latin-1 :eol-style :lf)) + :allow-null t)) (:byte . :byte) (:unsigned-byte . (:unsigned :byte)) (:char . :char) -- 2.34.1