[armedbear-cvs] r11628 - trunk/abcl/src/org/armedbear/lisp
Erik Huelsmann
ehuelsmann at common-lisp.net
Thu Feb 5 20:14:11 UTC 2009
Author: ehuelsmann
Date: Thu Feb 5 20:14:10 2009
New Revision: 11628
Log:
Remove commented-out lines.
Modified:
trunk/abcl/src/org/armedbear/lisp/trace.lisp
Modified: trunk/abcl/src/org/armedbear/lisp/trace.lisp
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/trace.lisp (original)
+++ trunk/abcl/src/org/armedbear/lisp/trace.lisp Thu Feb 5 20:14:10 2009
@@ -35,15 +35,10 @@
(require "FORMAT")
-;;(require "CLOS")
-
(defvar *trace-info-hashtable* (make-hash-table :test #'equal))
(defstruct trace-info name untraced-function breakp)
-;;(defmethod make-load-form ((object trace-info) &optional environment)
-;; (make-load-form-saving-slots object :environment environment))
-
(defvar *trace-depth* 0)
(defun list-traced-functions ()
More information about the armedbear-cvs
mailing list