X-Git-Url: http://git.kpe.io/?p=uffi.git;a=blobdiff_plain;f=examples%2Frun-examples.lisp;h=3837db9e951065eb93db2b67ae660fd905931515;hp=79653f69f986681e77a71560ade83761e3512fd0;hb=b86fdf882156aa45dc6e8e93a158dedf506f4233;hpb=3ade95bab16abe09642554e9cbf56f117f01e507 diff --git a/examples/run-examples.lisp b/examples/run-examples.lisp index 79653f6..3837db9 100644 --- a/examples/run-examples.lisp +++ b/examples/run-examples.lisp @@ -7,9 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; $Id$ -;;;; -;;;; This file, part of UFFI, is Copyright (c) 2002-2005 by Kevin M. Rosenberg +;;;; This file, part of UFFI, is Copyright (c) 2002-2010 by Kevin M. Rosenberg ;;;; ;;;; ************************************************************************* @@ -18,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") @@ -33,4 +31,4 @@ (setq cl:*features* (remove :examples-uffi cl:*features*)) - +