;; 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")
"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"
"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")