;;;; *************************************************************************
;;;; FILE IDENTIFICATION
;;;;
-;;;; Name: package.cl
+;;;; Name: package.lisp
;;;; Purpose: Defines UFFI package
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Feb 2002
;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
;;;; *************************************************************************
-(declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
-(in-package :cl-user)
+(in-package #:cl-user)
-(defpackage :uffi
- (:use :cl)
+(defpackage #:uffi
+ (:use #:cl)
(:export
;; immediate types
#:make-null-pointer
#:+null-cstring-pointer+
#:char-array-to-pointer
+ #:with-cast-pointer
+ #:def-foreign-var
;; string functions
#:convert-from-cstring
;; OS
#:run-shell-command
))
+
+