* cos.scm (/object-debug-classes): Delete.

	(/object-debug-elements, /object-debug-methods): Delete.

diff --git a/cgen/ChangeLog b/cgen/ChangeLog
index 9167bae..f478a74 100644 (file)
--- a/cgen/ChangeLog
+++ b/cgen/ChangeLog
@@ -1,5 +1,8 @@
 2009-09-27  Doug Evans  <dje@sebabeach.org>
 
+       * cos.scm (/object-debug-classes): Delete.
+       (/object-debug-elements, /object-debug-methods): Delete.
+
        * cos.scm (/method-lookup): Delete arg virtual?, all callers updated.
        (method-proc): Delete.
        (method-make-virtual!, method-make-virtual-forward!): Delete.

diff --git a/cgen/cos.scm b/cgen/cos.scm
index 50bf690..4ab0f1d 100644 (file)
--- a/cgen/cos.scm
+++ b/cgen/cos.scm
@@ -197,18 +197,6 @@
 (define /object-unspecified #:unspecified)
 (define /object-unbound #:unbound)
 
-; Associative list of classes to be traced.
-
-(define /object-debug-classes #f)
-
-; Associative list of elements to be traced.
-
-(define /object-debug-elements #f)
-
-; Associative list of messages to be traced.
-
-(define /object-debug-methods #f)
-
 ; True if error messages are verbose and debugging messages are printed.
 
 (define /object-verbose? #f)