;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Dec 2002
;;;;
-;;;; $Id: variables.lisp,v 1.5 2003/07/08 06:40:00 kevin Exp $
+;;;; $Id: variables.lisp,v 1.6 2003/07/08 14:00:53 kevin Exp $
;;;; *************************************************************************
(in-package #:modlisp)
:documentation "list of worker threads")
(name :initform "" :accessor name :initarg :name)
(wait :initform nil :accessor wait :initarg :wait)
+ (catch-errors :initform nil :accessor catch-errors :initarg :catch-errors)
(format :initform :text :accessor listener-format :initarg :format)))
(defvar *active-listeners* nil