From d129810e3307d7389ed3df49489c669ef9a017f1 Mon Sep 17 00:00:00 2001
From: pw <pw>
Date: Wed, 11 Apr 2001 20:05:08 +0000
Subject: [PATCH] Minor tweaks.

---
 pcl/low.lisp | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/pcl/low.lisp b/pcl/low.lisp
index f0250529a..491422957 100644
--- a/pcl/low.lisp
+++ b/pcl/low.lisp
@@ -1,4 +1,4 @@
-;;;-*-Mode:LISP; Package:(PCL LISP 1000); Base:10; Syntax:Common-lisp -*-
+;;;-*-Mode:LISP; Package: PCL -*-
 ;;;
 ;;; *************************************************************************
 ;;; Copyright (c) 1985, 1986, 1987, 1988, 1989, 1990 Xerox Corporation.
@@ -26,15 +26,18 @@
 ;;;
 
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/low.lisp,v 1.12 2001/04/10 22:37:23 pw Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/low.lisp,v 1.13 2001/04/11 20:05:08 pw Exp $")
+
+;;; 
+;;; This file contains optimized low-level constructs for PCL.
+;;; 
 
 (in-package :pcl)
 
-(eval-when (compile load eval)
 (defvar *optimize-speed*
   '(optimize (speed 3) (safety 0) (ext:inhibit-warnings 3) #+small (debug 0.5))
   "This variable is used in various places in PCL as an optimization
-declaration."))
+declaration.")
 
 ;;; Various macros that include necessary declarations for maximum
 ;;; performance.
-- 
GitLab