;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: July 2003
;;;;
-;;;; $Id: classes.lisp,v 1.6 2003/08/08 23:40:13 kevin Exp $
+;;;; $Id: classes.lisp,v 1.7 2003/08/10 07:38:37 kevin Exp $
;;;;
;;;; This file and Wol are Copyright (c) 2001-2003 by Kevin M. Rosenberg
;;;; *************************************************************************
"The output stream for the current request")
(defconstant +length-session-id+ 24)
+
+(defvar *req* nil "Current request")
+(defvar *ent* nil "Current entity")