From 86b47a485e46a06517008bb919bde5d78a339e4d Mon Sep 17 00:00:00 2001 Message-Id: <86b47a485e46a06517008bb919bde5d78a339e4d.1713522588.git.mdw@distorted.org.uk> From: Mark Wooding Date: Tue, 29 Apr 2008 22:12:32 +0000 Subject: [PATCH] Exporting UNBOXED-VECTOR Organization: Straylight/Edgeware From: espen --- gffi/defpackage.lisp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/gffi/defpackage.lisp b/gffi/defpackage.lisp index 082ebcc..55b6390 100644 --- a/gffi/defpackage.lisp +++ b/gffi/defpackage.lisp @@ -20,7 +20,7 @@ ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. -;; $Id: defpackage.lisp,v 1.12 2007-09-07 07:28:42 espen Exp $ +;; $Id: defpackage.lisp,v 1.13 2008-04-29 22:12:32 espen Exp $ (defpackage "GFFI" (:use "COMMON-LISP" "AUTOEXPORT" "PKG-CONFIG" "CLG-UTILS") @@ -50,7 +50,7 @@ (defpackage "GFFI" "REF-DOUBLE-FLOAT" "REF-SINGLE-FLOAT" "ALLOCATE-MEMORY" "DEALLOCATE-MEMORY" "COPY-MEMORY" "CLEAR-MEMORY" "MEMORY-CLEAR-P" "WITH-MEMORY" "WITH-POINTER" "*MEMORY-ALLOCATOR*" - "*MEMORY-DEALLOCATOR*") + "*MEMORY-DEALLOCATOR*" #+cmu"WITH-PINNED-OBJECTS") ;; Symbols from interface.lisp (:export "DEFBINDING" "MKBINDING" "USE-PREFIX" "PACKAGE-PREFIX" "DEFINE-CALLBACK" "CALLBACK" "CALLBACK-ADDRESS" @@ -74,7 +74,7 @@ (defpackage "GFFI" "VECTOR-WRITER-FUNCTION" "VECTOR-REF-BYTE" "VECTOR-REF-INT-16" "VECTOR-REF-UINT-16" "VECTOR-REF-INT-32" "VECTOR-REF-UINT-32" "VECTOR-REF-INT-64" "VECTOR-REF-UINT-64" "VECTOR-REF-DOUBLE-FLOAT" - "VECTOR-REF-SINGLE-FLOAT") + "VECTOR-REF-SINGLE-FLOAT" "UNBOXED-VECTOR") ;; Symbols from enums.lisp (:export "ENUM" "ENUM-INT" "INT-ENUM" "ENUM-MAPPING" "DEFINE-ENUM-TYPE" "FLAGS" "DEFINE-FLAGS-TYPE") -- [mdw]