[closure-cvs] CVS update: closure/src/renderer/renderer2.lisp closure/src/renderer/tables.lisp

Christophe Rhodes crhodes at common-lisp.net
Mon Aug 8 19:28:22 UTC 2005


Update of /project/closure/cvsroot/closure/src/renderer
In directory common-lisp.net:/tmp/cvs-serv22515/src/renderer

Modified Files:
	renderer2.lisp tables.lisp 
Log Message:
tables.lisp isn't loaded by the .asd file.  Move *debug-tables* to 
renderer2.lisp instead.

Date: Mon Aug  8 21:28:21 2005
Author: crhodes

Index: closure/src/renderer/renderer2.lisp
diff -u closure/src/renderer/renderer2.lisp:1.12 closure/src/renderer/renderer2.lisp:1.13
--- closure/src/renderer/renderer2.lisp:1.12	Tue Jul 19 22:42:09 2005
+++ closure/src/renderer/renderer2.lisp	Mon Aug  8 21:28:20 2005
@@ -4,7 +4,7 @@
 ;;;   Created: somewhen late 2002
 ;;;    Author: Gilbert Baumann <gilbert at base-engineering.com>
 ;;;   License: MIT style (see below)
-;;;       $Id: renderer2.lisp,v 1.12 2005/07/19 20:42:09 emarsden Exp $
+;;;       $Id: renderer2.lisp,v 1.13 2005/08/08 19:28:20 crhodes Exp $
 ;;; ---------------------------------------------------------------------------
 ;;;  (c) copyright 1997-2003 by Gilbert Baumann
 
@@ -368,6 +368,7 @@
   chunks)                               ;their chunks
 
 (defparameter *debug-tags* nil)
+(defparameter *debug-tables* t)
 
 (defun chunk-debug-name (chunk)
   (format nil (if (bounding-chunk-halfp chunk)
@@ -4968,6 +4969,10 @@
 
 
 ;; $Log: renderer2.lisp,v $
+;; Revision 1.13  2005/08/08 19:28:20  crhodes
+;; tables.lisp isn't loaded by the .asd file.  Move *debug-tables* to
+;; renderer2.lisp instead.
+;;
 ;; Revision 1.12  2005/07/19 20:42:09  emarsden
 ;; More removal of spurious debugging output, and conditionalization of
 ;; some output on *debug-tables*


Index: closure/src/renderer/tables.lisp
diff -u closure/src/renderer/tables.lisp:1.4 closure/src/renderer/tables.lisp:1.5
--- closure/src/renderer/tables.lisp:1.4	Mon Jul 11 17:57:56 2005
+++ closure/src/renderer/tables.lisp	Mon Aug  8 21:28:20 2005
@@ -49,8 +49,6 @@
     ;;fixme: doc
     nil)
 
-(defparameter *debug-tables* t)
-
 ;; We need to distinguish two models:
 ;;  a. tables with fixed width
 ;;  b. tables with dynamic width (width = :auto)




More information about the Closure-cvs mailing list