;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Feb 2002
;;;;
-;;;; $Id: libraries.cl,v 1.8 2002/04/01 04:40:08 kevin Exp $
+;;;; $Id: libraries.cl,v 1.9 2002/04/01 05:12:02 kevin Exp $
;;;;
;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
(string
(pathname-directory
(parse-namestring dir)))))))
- (print path)
(when (probe-file path)
(return-from find-foreign-library path))))))
nil)