r8819: update package name

[clsql.git] / base / package.lisp

diff --git a/base/package.lisp b/base/package.lisp
index 18ce31b9889c02d60d44d16f00abcf187ab77225..ea9f93657cf56e4adfb07f3dd254f26b385955b7 100644 (file)
--- a/base/package.lisp
+++ b/base/package.lisp
@@ -8,7 +8,7 @@
 ;;;;                Original code by Pierre R. Mai 
 ;;;; Date Started:  Feb 2002
 ;;;;
-;;;; $Id: package.lisp,v 1.1 2002/09/30 10:19:01 kevin Exp $
+;;;; $Id$
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;; and Copyright (c) 1999-2001 by Pierre R. Mai
@@ -18,15 +18,14 @@
 ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
 ;;;; *************************************************************************
 
-(declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
-(in-package :cl-user)
+(in-package #:cl-user)
 
 ;;;; This file makes the required package definitions for CLSQL's
 ;;;; core packages.
 
 (eval-when (:compile-toplevel :load-toplevel :execute)
-(defpackage :clsql-base-sys
-  (:use :common-lisp)
+(defpackage #:clsql-base-sys
+  (:use #:cl)
   (:export
      ;; "Private" exports for use by interface packages
      #:check-connection-spec
@@ -49,7 +48,13 @@
      #:database-drop-sequence
      #:database-sequence-next
      #:sql-escape
-
+     #:database-sequence-last
+     #:database-set-sequence-position
+     #:database-list-attributes
+     #:database-list-sequences
+     #:database-list-indexes
+     #:database-list-views
+     
      ;; Support for pooled connections
      #:database-type
 
@@ -90,7 +95,9 @@
         #:clsql-exists-error
         #:clsql-closed-error
         #:clsql-closed-error-database
-        
+         #:clsql-sql-syntax-error
+         #:clsql-type-error
+         
         #:*loaded-database-types*
         #:reload-database-types
         #:*default-database-type*