diff --git a/compiler/profile.lisp b/compiler/profile.lisp
index a1f73cd47dd037174a8ed81c81111fc424a184a8..50e3f2918b0a983dfa2fd181c638d420d78d653b 100644
--- a/compiler/profile.lisp
+++ b/compiler/profile.lisp
@@ -22,19 +22,24 @@
 	 ir2-convert
 	 copy-propagate
 	 select-representations
+
+	 lifetime-analyze
+#|
 	 lifetime-pre-pass
 	 lifetime-flow-analysis
 	 reset-current-conflict
 	 lifetime-post-pass
+|#
 	 delete-unreferenced-tns
-
+	 pack
+#|
 	 pack-wired-tn
 	 pack-tn
 	 pack-load-tns
 	 assign-tn-costs
 	 optimized-emit-saves
 	 emit-saves
-
+|#
 	 generate-code
 	 fasl-dump-component
 	 clear-ir2-info