1 ;;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Base: 10 -*-
2 ;;;; *************************************************************************
3 ;;;; FILE IDENTIFICATION
6 ;;;; Purpose: Package definition for high-level SQL 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.9 2002/04/27 21:48:08 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)))
24 ;;;; This file makes the required package definitions for CLSQL's
28 (eval-when (:compile-toplevel :load-toplevel :execute)
29 (defpackage :clsql-sys
32 ;; "Private" exports for use by interface packages
33 #:check-connection-spec
34 #:database-type-load-foreign
35 #:database-type-library-loaded ;; KMR - Tests if foreign library okay
36 #:database-initialize-database-type
40 #:database-execute-command
41 #:database-query-result-set
42 #:database-dump-result-set
43 #:database-store-next-row
45 ;; For UncommonSQL support
46 #:database-list-tables
47 #:database-list-attributes
48 #:database-attribute-type
49 #:database-create-sequence
50 #:database-drop-sequence
51 #:database-sequence-next
55 ;; Large objects (Marc B)
56 #:database-create-large-object
57 #:database-write-large-object
58 #:database-read-large-object
59 #:database-delete-large-object
61 ;; Shared exports for re-export by CLSQL
67 #:clsql-simple-warning
68 #:clsql-invalid-spec-error
69 #:clsql-invalid-spec-error-connection-spec
70 #:clsql-invalid-spec-error-database-type
71 #:clsql-invalid-spec-error-template
73 #:clsql-connect-error-database-type
74 #:clsql-connect-error-connection-spec
75 #:clsql-connect-error-errno
76 #:clsql-connect-error-error
78 #:clsql-sql-error-database
79 #:clsql-sql-error-expression
80 #:clsql-sql-error-errno
81 #:clsql-sql-error-error
82 #:clsql-database-warning
83 #:clsql-database-warning-database
84 #:clsql-database-warning-message
85 #:clsql-exists-condition
86 #:clsql-exists-condition-new-db
87 #:clsql-exists-condition-old-db
88 #:clsql-exists-warning
91 #:clsql-closed-error-database
92 #:*loaded-database-types*
93 #:reload-database-types
94 #:*default-database-type*
95 #:*initialized-database-types*
96 #:initialize-database-type
104 #:database-name-from-spec
120 #:number-to-sql-string
121 #:float-to-sql-string
124 ;; For UncommonSQL support
136 ;; Pooled connections
142 ;; Large objects (Marc B)
143 #:create-large-object
146 #:delete-large-object
148 (:documentation "This is the INTERNAL SQL-Interface package of CLSQL."))
151 (:import-from #:clsql-sys . #1#)
153 (:documentation "This is the SQL-Interface package of CLSQL."))
156 (defpackage #:clsql-user
157 (:use #:common-lisp #:clsql)
158 (:documentation "This is the user package for experimenting with CLSQL."))