X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=src%2Fpackage.lisp;h=4d3832a65b9e35917dc36945637386885d824fde;hb=2bb9a36070147d6c21e4a99d699ec3563c021a70;hp=3c22730a3f73e7735f9d0701915f0fd184879f42;hpb=3e1ab6ebfcf56e76edffaff284aca937e8152408;p=uffi.git diff --git a/src/package.lisp b/src/package.lisp index 3c22730..4d3832a 100644 --- a/src/package.lisp +++ b/src/package.lisp @@ -7,25 +7,23 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg +;;;; This file, part of UFFI, is Copyright (c) 2002-2005 by Kevin M. Rosenberg ;;;; -;;;; UFFI users are granted the rights to distribute and use this software -;;;; as governed by the terms of the Lisp Lesser GNU Public License -;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL. ;;;; ************************************************************************* (in-package #:cl-user) (defpackage #:uffi (:use #:cl) - (:export - + (:export + ;; immediate types + #:no-long-long #:def-constant #:def-foreign-type #:def-type #:null-char-p - + ;; aggregate types #:def-enum #:def-struct @@ -34,7 +32,7 @@ #:def-array-pointer #:deref-array #:def-union - + ;; objects #:allocate-foreign-object #:free-foreign-object @@ -54,7 +52,9 @@ #:char-array-to-pointer #:with-cast-pointer #:def-foreign-var - + #:convert-from-foreign-usb8 + #:def-pointer-var + ;; string functions #:convert-from-cstring #:convert-to-cstring @@ -65,8 +65,9 @@ #:convert-to-foreign-string #:allocate-foreign-string #:with-foreign-string + #:with-foreign-strings #:foreign-string-length - + ;; function call #:def-function @@ -74,9 +75,16 @@ #:find-foreign-library #:load-foreign-library #:default-foreign-library-type + #:foreign-library-types ;; OS #:run-shell-command + #:getenv + + ;; Internatialization + #:no-i18n + #:*default-foreign-encoding* + #:*foreign-encodings* ))