db-postgresql-socket/postgresql-socket-package.cl

   1 ;;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Base: 10 -*-
   2 ;;;; *************************************************************************
   3 ;;;; FILE IDENTIFICATION
   4 ;;;;
   5 ;;;; Name:          postgresql-socket-package.cl
   6 ;;;; Purpose:       Package definition for PostgreSQL interface using sockets
   7 ;;;; Programmers:   Kevin M. Rosenberg
   8 ;;;; Date Started:  Feb 2002
   9 ;;;;
  10 ;;;; $Id: postgresql-socket-package.cl,v 1.1 2002/09/18 07:43:41 kevin Exp $
  11 ;;;;
  12 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
  13 ;;;;
  14 ;;;; CLSQL users are granted the rights to distribute and use this software
  15 ;;;; as governed by the terms of the Lisp Lesser GNU Public License
  16 ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
  17 ;;;; *************************************************************************
  18
  19 (declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
  20 (in-package :cl-user)
  21
  22 #+lispworks (require "comm")
  23
  24 (defpackage :postgresql-socket
  25   (:use :common-lisp)
  26   (:export #:pgsql-ftype
  27            #:pgsql-ftype#bytea
  28            #:pgsql-ftype#int2
  29            #:pgsql-ftype#int4
  30            #:pgsql-ftype#int8
  31            #:pgsql-ftype#float4
  32            #:pgsql-ftype#float8
  33
  34            #:+crypt-library+
  35            #:postgresql-condition
  36            #:postgresql-condition-connection
  37            #:postgresql-condition-message
  38            #:postgresql-error
  39            #:postgresql-fatal-error
  40            #:postgresql-login-error
  41            #:postgresql-warning
  42            #:postgresql-notification
  43            #:postgresql-connection
  44            #:postgresql-connection-p
  45            #:postgresql-cursor
  46            #:postgresql-cursor-p
  47            #:postgresql-cursor-connection
  48            #:postgresql-cursor-name
  49            #:postgresql-cursor-fields
  50            #:+postgresql-server-default-port+
  51            #:open-postgresql-connection
  52            #:reopen-postgresql-connection
  53            #:close-postgresql-connection
  54            #:postgresql-connection-open-p
  55            #:ensure-open-postgresql-connection
  56            #:start-query-execution
  57            #:wait-for-query-results
  58            #:read-cursor-row
  59            #:copy-cursor-row
  60            #:skip-cursor-row
  61            ))
  62