diff --git a/code/ntrace.lisp b/code/ntrace.lisp index 4ebb069a08959b588c0a04bdcccb431f6ac4b62e..6b2fe383ee46c0193a573780273f795ba2d42211 100644 --- a/code/ntrace.lisp +++ b/code/ntrace.lisp @@ -5,7 +5,7 @@ ;;; Carnegie Mellon University, and has been placed in the public domain. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/ntrace.lisp,v 1.30 2005/02/25 17:11:52 rtoy Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/ntrace.lisp,v 1.31 2005/10/07 14:20:12 rtoy Exp $") ;;; ;;; ********************************************************************** ;;; @@ -34,7 +34,7 @@ "If the trace indentation exceeds this value, then indentation restarts at 0.") -(defvar *trace-encapsulate-default* :default +(defvar *trace-encapsulate-default* #-ppc :default #+ppc t "The default value for the :ENCAPSULATE option to trace.") (defvar *trace-encapsulate-package-names*