X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=uffi%2Fclsql-uffi-loader.lisp;h=c667746e0f3a6034cf044aeedf8e269ba2b7c2f9;hp=ab6702ab3c0e9c7089a6e0dddb61f80888f8964c;hb=bada52b7a8fd2cc484dee33cccd64ca09a52ec3d;hpb=a7ef1fce8c272e0502b0d45bbe2d1b8a05de796d

diff --git a/uffi/clsql-uffi-loader.lisp b/uffi/clsql-uffi-loader.lisp
index ab6702a..c667746 100644
--- a/uffi/clsql-uffi-loader.lisp
+++ b/uffi/clsql-uffi-loader.lisp
@@ -7,7 +7,7 @@
 ;;;; Programmers:   Kevin M. Rosenberg
 ;;;; Date Started:  Mar 2002
 ;;;;
-;;;; $Id: clsql-uffi-loader.lisp,v 1.3 2002/10/17 22:13:20 kevin Exp $
+;;;; $Id$
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -16,8 +16,7 @@
 ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
 ;;;; *************************************************************************
 
-(declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
-(in-package :clsql-uffi)
+(in-package #:clsql-uffi)
 
 (defvar *clsql-uffi-library-filename* 
   (uffi:find-foreign-library
@@ -26,7 +25,7 @@
      "/usr/lib/clsql/"
      "/opt/lisp/clsql/uffi/"
      "/home/kevin/debian/src/clsql/uffi/")
-   :drive-letters '("C" "D" "E" "F" "G")))
+   :drive-letters '("C")))
 
 (defvar *clsql-uffi-supporting-libraries* '("c")
   "Used only by CMU. List of library flags needed to be passed to ld to