X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fppc%2Fsanctify.lisp;h=feee980f170339762fac6314079e0c3cc761513b;hb=8902b8b6bd2e9285749dd39d313b33b6c69c5213;hp=490dc5161d16b93861ddae1fb26eb9682ce474c8;hpb=bc46c8bcdd6ac8918df8ea9e9db49808e4924fcf;p=sbcl.git

diff --git a/src/compiler/ppc/sanctify.lisp b/src/compiler/ppc/sanctify.lisp
index 490dc51..feee980 100644
--- a/src/compiler/ppc/sanctify.lisp
+++ b/src/compiler/ppc/sanctify.lisp
@@ -16,12 +16,9 @@
 
 
 
-;;; SANCTIFY-FOR-EXECUTION -- Interface.
-;;;
 ;;; Do whatever is necessary to make the given code component executable.
 ;;; On the 601, we have less to do than on some other PowerPC chips.
-;;; This should what needs to be done in the general case.
-;;; 
+;;; This should be what needs to be done in the general case.
 (defun sanctify-for-execution (component)
   (without-gcing
     (alien-funcall (extern-alien "ppc_flush_icache"