diff --git a/src/new-cmp/sysfun.lsp b/src/new-cmp/sysfun.lsp
index 7c4d19e57..d6a11f784 100644
--- a/src/new-cmp/sysfun.lsp
+++ b/src/new-cmp/sysfun.lsp
@@ -2194,3 +2194,4 @@
      ;; method.lsp
      clos::pop-next-method
      )))
+;(trace c::c1expr c::c1call-global c::c1if c::cmp-macroexpand c::cmp-expand-macro)