improved and moved command object up to clsql (out of cl-postgres-socket3)

[clsql.git] / db-postgresql-socket3 / command-object.lisp

diff --git a/db-postgresql-socket3/command-object.lisp b/db-postgresql-socket3/command-object.lisp
deleted file mode 100644 (file)
index 47dad33..0000000
--- a/db-postgresql-socket3/command-object.lisp
+++ /dev/null
@@ -1,37 +0,0 @@
-;;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Base: 10 -*-
-;;;; *************************************************************************
-;;;; FILE IDENTIFICATION
-;;;;
-;;;; Name:     postgresql-socket-sql.sql
-;;;; Purpose:  High-level PostgreSQL interface using socket
-;;;; Authors:  Russ Tyndall (at Acceleration.net) based on original code by
-;;;;           Kevin M. Rosenberg based on original code by Pierre R. Mai
-;;;; Created:  Sep 2009
-;;;;
-;;;;
-;;;; $Id$
-;;;;
-;;;; This file, part of CLSQL, is Copyright (c) 2002-2007 by Kevin M. Rosenberg
-;;;; and Copyright (c) 1999-2001 by Pierre R. Mai
-;;;;
-;;;; 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 #:clsql-sys)
-
-(defclass command-object ()
-  ((expression :accessor expression :initarg :expression :initform nil)
-   (parameters :accessor parameters :initarg :parameters :initform nil)
-   (prepared-name :accessor prepared-name :initarg :prepared-name :initform ""
-    :documentation "If we want this to be a prepared statement, give it a name
-       to identify it to this session")
-   (has-been-prepared :accessor has-been-prepared :initarg :has-been-prepared :initform nil
-                     :documentation "Have we already prepared this command object")
-   ))
-
-(export '(expression parameters prepared-name has-been-prepared command-object))
-
-