X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=data-structures.lisp;fp=data-structures.lisp;h=0000000000000000000000000000000000000000;hb=1bb49e27c591c846849c80b6e543a8b207f9dad4;hp=4bab96209ebc25d2c50d76544657e5581d8facfe;hpb=118ee93d69e2b09d12eb317f6db3fbda113be82f;p=cl-modlisp.git

diff --git a/data-structures.lisp b/data-structures.lisp
deleted file mode 100644
index 4bab962..0000000
--- a/data-structures.lisp
+++ /dev/null
@@ -1,39 +0,0 @@
-;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10; Package: modlisp -*-
-;;;; *************************************************************************
-;;;; FILE IDENTIFICATION
-;;;;
-;;;; Name:          base.lisp
-;;;; Purpose:       Base data and functions for modlisp package
-;;;; Programmer:    Kevin M. Rosenberg
-;;;; Date Started:  Dec 2002
-;;;;
-;;;; $Id: data-structures.lisp,v 1.1 2003/07/04 19:52:32 kevin Exp $
-;;;; *************************************************************************
-
-(in-package #:modlisp)
-
-(defvar *listener-count* 0
-  "used to name listeners")
-
-(defvar *worker-count* 0
-  "used to name workers")
-
-(defvar *listener-socket*
-  "Socket for the listener")
-
-(defvar *listener-proc* nil
-  "Process for the listener")
-
-(defconstant +default-apache-port+ 13244
-  "Default port for listen")
-
-(defvar *apache-socket* nil
-  "the socket stream to apache")
-
-(defvar *close-apache-socket* nil
-  "set to T if you want to close the socket to apache after
-the current command")
-
-(defvar *apache-nb-use-socket* 0
-  "the number of requests sent in this socket")
-