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