diff --git a/code/alieneval.lisp b/code/alieneval.lisp
index b8040db100641e5ff731834b8bec8ce0a1c536d5..7ae8085c12e20013ad7a5d168ef6b63ff0b56c6b 100644
--- a/code/alieneval.lisp
+++ b/code/alieneval.lisp
@@ -811,9 +811,9 @@
 						',n-sap ',n-offset ',n-size
 						body decls)))
 	      ,@body)))
-       #-new-compile
+       #-new-compiler
        (eval-when (compile)
-	 (clc::clc-mumble "alien-access ~S compiled.~%" lisp-type)))))
+	 (clc::clc-mumble "alien-access ~S compiled.~%" ',lisp-type)))))
 
 
 (eval-when (compile load eval)