Merge branch 'master' of /home/mdw/public-git/lisp

[lisp] / factorial.lisp

diff --git a/factorial.lisp b/factorial.lisp
index 0155e07cf032c2e0ca59a39161c193675eb958f8..59892fe82544c81cfc5ad0315b03ef97150b764b 100644 (file)
--- a/factorial.lisp
+++ b/factorial.lisp
@@ -28,7 +28,7 @@ (in-package #:mdw.factorial)
 
 (defun factorial (n)
   "Compute a factorial.  This is a little bit optimized: we try to multiply
-values which are similar in size."
+   values which are similar in size."
   (when (minusp n)
     (error "negative factorial argument ~A" n))
   (let ((stack nil))