X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=examples%2Frun-examples.lisp;h=3837db9e951065eb93db2b67ae660fd905931515;hb=b96ebc61e49dde6a96978e17c3ed375bea8c1672;hp=c6414e8e26742c81cae0daaaf23a5fcd05b1f1e2;hpb=ebedde4e67b858b1f65c5eb4dc7bc45978ed1e40;p=uffi.git diff --git a/examples/run-examples.lisp b/examples/run-examples.lisp index c6414e8..3837db9 100644 --- a/examples/run-examples.lisp +++ b/examples/run-examples.lisp @@ -7,13 +7,8 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; $Id$ +;;;; This file, part of UFFI, is Copyright (c) 2002-2010 by Kevin M. Rosenberg ;;;; -;;;; This file, part of UFFI, is Copyright (c) 2002 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. ;;;; ************************************************************************* #-uffi (asdf:oos 'asdf:load-op :uffi) @@ -21,7 +16,7 @@ (pushnew :examples-uffi cl:*features*) (flet ((load-test (name) - (load (make-pathname :defaults *load-truename* :name name)))) + (load (make-pathname :defaults *load-truename* :name name)))) (load-test "c-test-fns") (load-test "arrays") (load-test "union") @@ -36,4 +31,4 @@ (setq cl:*features* (remove :examples-uffi cl:*features*)) - +