diff --git a/compiler/profile.lisp b/compiler/profile.lisp
index 2aa4d3cb56c3cb5845acc175c19dd4eda76004f0..52496bab267b3c953fedb684ebd8dc08357fcc5c 100644
--- a/compiler/profile.lisp
+++ b/compiler/profile.lisp
@@ -38,7 +38,8 @@
 	 clear-ir2-info
 	 macerate-ir1-component
 	 merge-top-level-lambdas
-	 ir1-finalize
+	 check-free-function
+	 note-failed-optimization
 	 clear-stuff
 	 read-source-form
 	 fasl-dump-source-info