1 ;;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Base: 10 -*-
2 ;;;; *************************************************************************
3 ;;;; FILE IDENTIFICATION
6 ;;;; Purpose: Package definition for CLSQL (high-level) interface
7 ;;;; Programmers: Kevin M. Rosenberg based on
8 ;;;; Original code by Pierre R. Mai
9 ;;;; Date Started: Feb 2002
11 ;;;; $Id: package.cl,v 1.1 2002/08/01 03:06:26 kevin Exp $
13 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
14 ;;;; and Copyright (c) 1999-2001 by Pierre R. Mai
16 ;;;; CLSQL users are granted the rights to distribute and use this software
17 ;;;; as governed by the terms of the Lisp Lesser GNU Public License
18 ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
19 ;;;; *************************************************************************
21 (declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
25 (eval-when (:compile-toplevel :load-toplevel :execute)
26 (defpackage :clsql-sys
28 (:use :common-lisp :clsql-base-sys)
37 #:clsql-simple-warning
38 #:clsql-invalid-spec-error
39 #:clsql-invalid-spec-error-connection-spec
40 #:clsql-invalid-spec-error-database-type
41 #:clsql-invalid-spec-error-template
43 #:clsql-connect-error-database-type
44 #:clsql-connect-error-connection-spec
45 #:clsql-connect-error-errno
46 #:clsql-connect-error-error
48 #:clsql-sql-error-database
49 #:clsql-sql-error-expression
50 #:clsql-sql-error-errno
51 #:clsql-sql-error-error
52 #:clsql-database-warning
53 #:clsql-database-warning-database
54 #:clsql-database-warning-message
55 #:clsql-exists-condition
56 #:clsql-exists-condition-new-db
57 #:clsql-exists-condition-old-db
58 #:clsql-exists-warning
61 #:clsql-closed-error-database
63 #:*loaded-database-types*
64 #:reload-database-types
65 #:*default-database-type*
66 #:*initialized-database-types*
67 #:initialize-database-type
72 #:database-name-from-spec
75 #:number-to-sql-string
98 ;; For High-level UncommonSQL compatibility
107 ;; Pooled connections
109 #:find-or-create-connection-pool
114 #:rollback-transaction
115 #:add-transaction-commit-hook
116 #:add-transaction-rollback-hook
118 ;; Large objects (Marc B)
119 #:create-large-object
122 #:delete-large-object
127 (:documentation "This is the INTERNAL SQL-Interface package of CLSQL."))
131 (defpackage #:clsql-user
132 (:use #:common-lisp #:clsql)
133 (:documentation "This is the user package for experimenting with CLSQL."))