r2949: *** empty log message ***

diff --git a/attrib-class.lisp b/attrib-class.lisp
index 4d88e66addc17ae0f1dbe6367c359fcce0049767..215089f03a0e3d3e868334005ec794294dfd98a2 100644 (file)
--- a/attrib-class.lisp
+++ b/attrib-class.lisp
@@ -7,18 +7,18 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: attrib-class.lisp,v 1.1 2002/10/06 13:21:47 kevin Exp $
+;;;; $Id: attrib-class.lisp,v 1.2 2002/10/06 13:30:17 kevin Exp $
 ;;;;
-;;;; This file, part of Genutils, is Copyright (c) 2002 by Kevin M. Rosenberg
+;;;; This file, part of Kmrcl, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
-;;;; Genutils users are granted the rights to distribute and use this software
+;;;; Kmrcl users are granted the rights to distribute and use this software
 ;;;; as governed by the terms of the GNU General Public License.
 ;;;; *************************************************************************
 
 ;;;; Defines a metaclass that allows the use of attributes (or subslots)
 ;;;; on slots. Based on example in AMOP, but modified to use ACL's MOP.
 
-(in-package :genutils)
+(in-package :kmrcl)
 
 (defclass attributes-dsd (mop::standard-direct-slot-definition)
   ((attributes :initarg :attributes :initform nil 
@@ -98,12 +98,12 @@
 
 
 #||
-(in-package :genutils)
+(in-package :kmrcl)
 
 (defclass credit-rating ()
   ((level :attributes (date-set time-set))
    (id :attributes (person-setting)))
-  (:metaclass genutils:attributes-class))
+  (:metaclass kmrcl:attributes-class))
 (defparameter cr (make-instance 'credit-rating))
 
 (format t "~&date-set: ~a" (gu:slot-attribute cr 'level 'date-set))

diff --git a/buff-input.lisp b/buff-input.lisp
index fe3f3115146a40d10e2e1b0a748f61f8e53d91cb..53f76e018d538471b8cff0d139f941b0c2fc3710 100644 (file)
--- a/buff-input.lisp
+++ b/buff-input.lisp
@@ -7,15 +7,15 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: buff-input.lisp,v 1.1 2002/10/06 13:21:47 kevin Exp $
+;;;; $Id: buff-input.lisp,v 1.2 2002/10/06 13:30:17 kevin Exp $
 ;;;;
-;;;; This file, part of Genutils, is Copyright (c) 2002 by Kevin M. Rosenberg
+;;;; This file, part of Kmrcl, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
-;;;; Genutils users are granted the rights to distribute and use this software
+;;;; Kmrcl users are granted the rights to distribute and use this software
 ;;;; as governed by the terms of the GNU General Public License.
 ;;;; *************************************************************************
 
-(in-package :genutils)
+(in-package :kmrcl)
 
 (declaim (optimize (speed 3) (safety 0) (space 0) (debug 0)))
 

diff --git a/cl-symbols.lisp b/cl-symbols.lisp
index 3da0a0aab36f9eaa89b4610d048037fe7c6a0402..80d9b41792228e56a4311014635acecbb600f626 100644 (file)
--- a/cl-symbols.lisp
+++ b/cl-symbols.lisp
@@ -7,15 +7,15 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: cl-symbols.lisp,v 1.1 2002/10/06 13:21:47 kevin Exp $
+;;;; $Id: cl-symbols.lisp,v 1.2 2002/10/06 13:30:17 kevin Exp $
 ;;;;
-;;;; This file, part of Genutils, is Copyright (c) 2002 by Kevin M. Rosenberg
+;;;; This file, part of Kmrcl, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
-;;;; Genutils users are granted the rights to distribute and use this software
+;;;; Kmrcl users are granted the rights to distribute and use this software
 ;;;; as governed by the terms of the GNU General Public License.
 ;;;; *************************************************************************
 
-(in-package :genutils)
+(in-package :kmrcl)
 
 (defun cl-symbols ()
   (append (cl-variables) (cl-functions)))

diff --git a/genutils.lisp b/genutils.lisp
index e35f23d51c9f73c7447ba47440a9319e1942c191..0a47a733988ed4f674cf4e4dce2bf5242fe46055 100644 (file)
--- a/genutils.lisp
+++ b/genutils.lisp
@@ -3,20 +3,20 @@
 ;;;; FILE IDENTIFICATION
 ;;;;
 ;;;; Name:          genutils.lisp
-;;;; Purpose:       Main general utility functions for GENUTILS package
+;;;; Purpose:       Main general utility functions for KMRCL package
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: genutils.lisp,v 1.1 2002/10/06 13:21:47 kevin Exp $
+;;;; $Id: genutils.lisp,v 1.2 2002/10/06 13:30:17 kevin Exp $
 ;;;;
-;;;; This file, part of Genutils, is Copyright (c) 2002 by Kevin M. Rosenberg
+;;;; This file, part of Kmrcl, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
-;;;; Genutils users are granted the rights to distribute and use this software
+;;;; Kmrcl users are granted the rights to distribute and use this software
 ;;;; as governed by the terms of the GNU General Public License.
 ;;;; *************************************************************************
 
 
-(in-package :genutils)
+(in-package :kmrcl)
 
 (declaim (optimize (speed 3) (safety 1)))
 

diff --git a/ml-class.lisp b/ml-class.lisp
index cfe2ab7455d26a3f12bcba792d63de393ffaf2a1..740e610d9a1e935e9feb22592ea59ff5e1082ef9 100644 (file)
--- a/ml-class.lisp
+++ b/ml-class.lisp
@@ -11,15 +11,15 @@
 ;;;; in Text, HTML, and XML formats. This includes hyperlinking
 ;;;; capability and sub-objects.
 ;;;;
-;;;; $Id: ml-class.lisp,v 1.1 2002/10/06 13:21:47 kevin Exp $
+;;;; $Id: ml-class.lisp,v 1.2 2002/10/06 13:30:17 kevin Exp $
 ;;;;
-;;;; This file, part of Webutils, is Copyright (c) 2002 by Kevin M. Rosenberg
+;;;; This file, part of Kmrcl, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
-;;;; Webutils users are granted the rights to distribute and use this software
+;;;; Kmrcl users are granted the rights to distribute and use this software
 ;;;; as governed by the terms of the GNU General Public License.
 ;;;; *************************************************************************
  
-(in-package :webutils)
+(in-package :kmrcl)
 
 (declaim (optimize (speed 3) (safety 1)))
 

diff --git a/pipes.lisp b/pipes.lisp
index b97ff07d1f939a383c7486a00000fc86f8a7a15f..bd5f93e04221963d93ec17ef75ee12c2eefd6f0f 100644 (file)
--- a/pipes.lisp
+++ b/pipes.lisp
@@ -7,15 +7,15 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: pipes.lisp,v 1.1 2002/10/06 13:21:47 kevin Exp $
+;;;; $Id: pipes.lisp,v 1.2 2002/10/06 13:30:17 kevin Exp $
 ;;;;
-;;;; This file, part of Genutils, is Copyright (c) 2002 by Kevin M. Rosenberg
+;;;; This file, part of Kmrcl, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
-;;;; Genutils users are granted the rights to distribute and use this software
+;;;; Kmrcl users are granted the rights to distribute and use this software
 ;;;; as governed by the terms of the GNU General Public License.
 ;;;; *************************************************************************
 
-(in-package :genutils)
+(in-package :kmrcl)
 
 (defmacro make-pipe (head tail)
   "create a pipe by eval'ing head and delaying tail."

diff --git a/random.lisp b/random.lisp
index cf173fc83b74ee36cbc2aa57451c7954eeb92c3a..80d387fbc51907ca212c2986791d5e5971733378 100644 (file)
--- a/random.lisp
+++ b/random.lisp
@@ -3,19 +3,19 @@
 ;;;; FILE IDENTIFICATION
 ;;;;
 ;;;; Name:          random.lisp
-;;;; Purpose:       Random number functions for GENUTILS package
+;;;; Purpose:       Random number functions for KMRCL package
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: random.lisp,v 1.1 2002/10/06 13:21:47 kevin Exp $
+;;;; $Id: random.lisp,v 1.2 2002/10/06 13:30:17 kevin Exp $
 ;;;;
-;;;; This file, part of Genutils, is Copyright (c) 2002 by Kevin M. Rosenberg
+;;;; This file, part of Kmrcl, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
-;;;; Genutils users are granted the rights to distribute and use this software
+;;;; Kmrcl users are granted the rights to distribute and use this software
 ;;;; as governed by the terms of the GNU General Public License.
 ;;;; *************************************************************************
 
-(in-package :genutils)
+(in-package :kmrcl)
 
 (defun seed-random-generator ()
   "Evaluate a random number of items"

diff --git a/telnet-server.lisp b/telnet-server.lisp
index c285f0e8e68f9a4bf2dfa3d7aa79077b7a6adcf2..e3a403c2d0a8dd0b3510b68795a1a48f2d26e336 100644 (file)
--- a/telnet-server.lisp
+++ b/telnet-server.lisp
@@ -7,15 +7,15 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: telnet-server.lisp,v 1.1 2002/10/06 13:21:47 kevin Exp $
+;;;; $Id: telnet-server.lisp,v 1.2 2002/10/06 13:30:17 kevin Exp $
 ;;;;
-;;;; This file, part of Genutils, is Copyright (c) 2002 by Kevin M. Rosenberg
+;;;; This file, part of Kmrcl, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
-;;;; Genutils users are granted the rights to distribute and use this software
+;;;; Kmrcl users are granted the rights to distribute and use this software
 ;;;; as governed by the terms of the GNU General Public License.
 ;;;; *************************************************************************
 
-(in-package :genutils)
+(in-package :kmrcl)
 
 (defvar *default-telnet-server-port* 4000)
 

diff --git a/web-utils-aserve.lisp b/web-utils-aserve.lisp
index 92a89bdaa702d6cb72ee6f170b06c7dca06aa5d7..13782e36b02026f3b3f3cceab72daf75a2ab4e23 100644 (file)
--- a/web-utils-aserve.lisp
+++ b/web-utils-aserve.lisp
@@ -7,17 +7,17 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: web-utils-aserve.lisp,v 1.1 2002/10/06 13:21:47 kevin Exp $
+;;;; $Id: web-utils-aserve.lisp,v 1.2 2002/10/06 13:30:17 kevin Exp $
 ;;;;
-;;;; This file, part of Webutils, is Copyright (c) 2002 by Kevin M. Rosenberg
+;;;; This file, part of Kmrcl, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
-;;;; Webutils users are granted the rights to distribute and use this software
+;;;; Kmrcl users are granted the rights to distribute and use this software
 ;;;; as governed by the terms of the GNU General Public License.
 ;;;; *************************************************************************
 
 
 
-(in-package :webutils)
+(in-package :kmrcl)
 (declaim (optimize (speed 3) (safety 1)))
 
 

diff --git a/web-utils.lisp b/web-utils.lisp
index c6b9cc8996346ee6956e5d7c562ea8021adf92de..52d94fb41dffdc907cfef6c9e6e533602ae7de14 100644 (file)
--- a/web-utils.lisp
+++ b/web-utils.lisp
@@ -7,15 +7,15 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: web-utils.lisp,v 1.1 2002/10/06 13:21:47 kevin Exp $
+;;;; $Id: web-utils.lisp,v 1.2 2002/10/06 13:30:17 kevin Exp $
 ;;;;
-;;;; This file, part of Webutils, is Copyright (c) 2002 by Kevin M. Rosenberg
+;;;; This file, part of Kmrcl, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
-;;;; Webutils users are granted the rights to distribute and use this software
+;;;; Kmrcl users are granted the rights to distribute and use this software
 ;;;; as governed by the terms of the GNU General Public License.
 ;;;; *************************************************************************
 
-(in-package :webutils)
+(in-package :kmrcl)
 (declaim (optimize (speed 3) (safety 1)))
 
 

diff --git a/xml-utils.lisp b/xml-utils.lisp
index bf3b4de63370bffeb9f2f23898df5e0a017abf93..3214d06d0d17d05bc8573b3c61f3d6448ca65a97 100644 (file)
--- a/xml-utils.lisp
+++ b/xml-utils.lisp
@@ -7,15 +7,15 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: xml-utils.lisp,v 1.1 2002/10/06 13:21:47 kevin Exp $
+;;;; $Id: xml-utils.lisp,v 1.2 2002/10/06 13:30:17 kevin Exp $
 ;;;;
-;;;; This file, part of Webutils, is Copyright (c) 2002 by Kevin M. Rosenberg
+;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
-;;;; Webutils users are granted the rights to distribute and use this software
+;;;; Kmrcl users are granted the rights to distribute and use this software
 ;;;; as governed by the terms of the GNU General Public License.
 ;;;; *************************************************************************
 
-(in-package :webutils)
+(in-package :kmrcl)
 
 (declaim (optimize (speed 3) (safety 1)))