X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Fuffi-c-test-lib.lisp;h=928b073ecabd948dc00b501424698c9126c5f064;hb=77fd04d570b9ae1fd40c1f7b0134af826576210b;hp=20f4ccb443db01d6aef3de9b06b6afcdf93bb865;hpb=bdb966b22ea563a7dfa1f464a1b6cb6d8b5a712c;p=uffi.git

diff --git a/tests/uffi-c-test-lib.lisp b/tests/uffi-c-test-lib.lisp
index 20f4ccb..928b073 100644
--- a/tests/uffi-c-test-lib.lisp
+++ b/tests/uffi-c-test-lib.lisp
@@ -2,28 +2,19 @@
 ;;;; *************************************************************************
 ;;;; FILE IDENTIFICATION
 ;;;;
-;;;; Name:          c-test-fns.cl
+;;;; Name:          uffi-c-test-lib.lisp
 ;;;; Purpose:       UFFI Example file for zlib compression
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Mar 2002
 ;;;;
-;;;; $Id: uffi-c-test-lib.lisp,v 1.1 2003/04/29 14:08:02 kevin Exp $
+;;;; $Id: uffi-c-test-lib.lisp,v 1.3 2003/08/13 18:53:42 kevin Exp $
 ;;;;
-;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
+;;;; This file, part of UFFI, is Copyright (c) 2002-2003 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 :uffi-tests)
+(in-package #:uffi-tests)
 
-(unless (uffi:load-foreign-library 
-	 (uffi:find-foreign-library "uffi-c-test-lib" 
-				    (list *load-truename*
-					  "/usr/lib/"))
-	 :supporting-libraries '("c"))
-  (warn "Unable to load uffi-c-test-lib library"))
 
 (uffi:def-function ("cs_to_upper" cs-to-upper)
   ((input (* :unsigned-char)))