X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcompiler%2Fphysenvanal.lisp;h=ca8d927b7033739449c1a27e91f92bf86b856584;hb=c716f6ea5255afeb33a1181535b5c067aa9d6aaa;hp=120133f8fc28a7e65271eb4a5cc2b6bdce6a31c3;hpb=85f9c92558538b85540ff420fa8970af91e241a2;p=sbcl.git

diff --git a/src/compiler/physenvanal.lisp b/src/compiler/physenvanal.lisp
index 120133f..ca8d927 100644
--- a/src/compiler/physenvanal.lisp
+++ b/src/compiler/physenvanal.lisp
@@ -402,8 +402,8 @@
 	      (emit-cleanups block1 block2)))))))
   (values))
 
-;;; Mark optimizable tail-recursive uses of function result continuations with
-;;; the corresponding TAIL-SET. 
+;;; Mark optimizable tail-recursive uses of function result
+;;; continuations with the corresponding TAIL-SET.
 (defun tail-annotate (component)
   (declare (type component component))
   (dolist (fun (component-lambdas component))