X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=src%2Fpackage.lisp;h=4d3832a65b9e35917dc36945637386885d824fde;hb=2bb9a36070147d6c21e4a99d699ec3563c021a70;hp=e25c9cef71b1403544324b2e506ae5e16e22c6cb;hpb=d0a074275862d6458963f9ad4a835cb03e50ebbf;p=uffi.git

diff --git a/src/package.lisp b/src/package.lisp
index e25c9ce..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
@@ -55,7 +53,8 @@
    #:with-cast-pointer
    #:def-foreign-var
    #:convert-from-foreign-usb8
-   
+   #:def-pointer-var
+
    ;; string functions
    #:convert-from-cstring
    #:convert-to-cstring
@@ -66,8 +65,9 @@
    #:convert-to-foreign-string
    #:allocate-foreign-string
    #:with-foreign-string
+   #:with-foreign-strings
    #:foreign-string-length
-   
+
    ;; function call
    #:def-function
 
@@ -75,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*
    ))