X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=interfaces%2Fpostgresql-socket%2Fpostgresql-socket-package.cl;h=9097a454e439d6e3e01608bb5f86f4de8c805297;hb=0fe44ce81f47c779d9695c9211668b4780bf4216;hp=ec8634b09c48a9c8af40b6e7009e72c4b59c88d1;hpb=68a2a2bd6a380a61dce06a0510dab3441400d795;p=clsql.git

diff --git a/interfaces/postgresql-socket/postgresql-socket-package.cl b/interfaces/postgresql-socket/postgresql-socket-package.cl
index ec8634b..9097a45 100644
--- a/interfaces/postgresql-socket/postgresql-socket-package.cl
+++ b/interfaces/postgresql-socket/postgresql-socket-package.cl
@@ -7,7 +7,7 @@
 ;;;; Programmers:   Kevin M. Rosenberg
 ;;;; Date Started:  Feb 2002
 ;;;;
-;;;; $Id: postgresql-socket-package.cl,v 1.2 2002/03/25 23:22:07 kevin Exp $
+;;;; $Id: postgresql-socket-package.cl,v 1.5 2002/04/06 20:47:29 kevin Exp $
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -19,7 +19,7 @@
 (declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
 (in-package :cl-user)
 
-(in-package :cl-user)
+#+lispworks (require "comm")
 
 (defpackage :postgresql-socket
   (:use :common-lisp)
@@ -27,6 +27,7 @@
 	   #:pgsql-ftype#bytea
 	   #:pgsql-ftype#int2
 	   #:pgsql-ftype#int4
+	   #:pgsql-ftype#int8
 	   #:pgsql-ftype#float4
    	   #:pgsql-ftype#float8