X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=src%2Fpackage.lisp;h=b6cd204e22b8145fa69e637395214fc76eb14175;hb=27073cc090c29aa5dcf9ed9becdf3e73b937b0bb;hp=3c22730a3f73e7735f9d0701915f0fd184879f42;hpb=3e1ab6ebfcf56e76edffaff284aca937e8152408;p=uffi.git diff --git a/src/package.lisp b/src/package.lisp index 3c22730..b6cd204 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-external-format* + #:*external-formats* ))