;;;; -*- 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: variables.lisp,v 1.7 2003/07/08 16:12:03 kevin Exp $ ;;;; ************************************************************************* (in-package #:modlisp) (defconstant +default-apache-port+ 20123 "Default port for listen") (defvar *apache-socket* nil "the socket stream to apache") (defvar *number-server-requests* 0) (defvar *number-worker-requests* 0) (defvar *close-apache-socket* t)