X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=src%2Fpackage.lisp;h=abaad4655e0851e2f16132a77ed538684324fbad;hb=1eef42e18bc87785aec91ce4710085d30898b160;hp=54af538ab25ed8c781247cd464b6f0c0b06cee8b;hpb=db166e2970e1aaabd611e243eb899ae4d2f5f5ff;p=uffi.git diff --git a/src/package.lisp b/src/package.lisp index 54af538..abaad46 100644 --- a/src/package.lisp +++ b/src/package.lisp @@ -7,11 +7,8 @@ ;;;; 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) @@ -45,12 +42,16 @@ #:deref-pointer #:ensure-char-character #:ensure-char-integer + #:ensure-char-storable #:null-pointer-p #:make-null-pointer + #:make-pointer + #:pointer-address #:+null-cstring-pointer+ #:char-array-to-pointer #:with-cast-pointer #:def-foreign-var + #:convert-from-foreign-usb8 ;; string functions #:convert-from-cstring @@ -62,6 +63,7 @@ #:convert-to-foreign-string #:allocate-foreign-string #:with-foreign-string + #:foreign-string-length ;; function call #:def-function @@ -70,9 +72,11 @@ #:find-foreign-library #:load-foreign-library #:default-foreign-library-type + #:foreign-library-types ;; OS #:run-shell-command + #:getenv ))