a4df081547ef0e7268de409a37500940d516bda9
[cl-modlisp.git] / variables.lisp
1 ;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10; Package: modlisp -*-
2 ;;;; *************************************************************************
3 ;;;; FILE IDENTIFICATION
4 ;;;;
5 ;;;; Name:          base.lisp
6 ;;;; Purpose:       Base data and functions for modlisp package
7 ;;;; Programmer:    Kevin M. Rosenberg
8 ;;;; Date Started:  Dec 2002
9 ;;;;
10 ;;;; $Id: variables.lisp,v 1.7 2003/07/08 16:12:03 kevin Exp $
11 ;;;; *************************************************************************
12
13 (in-package #:modlisp)
14
15 (defconstant +default-apache-port+ 20123
16   "Default port for listen")
17
18 (defvar *apache-socket* nil
19   "the socket stream to apache")
20
21 (defvar *number-server-requests* 0)
22 (defvar *number-worker-requests* 0)
23 (defvar *close-apache-socket* t)
24
25
26
27
28