X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fpcl%2Ffngen.lisp;h=4bd35caa910d03845a7cb34b22b5dfcb4759f116;hb=8fc5fda05f92d69c95b47e4ad7561d91dab18c3e;hp=9c74f490936e202ea83adf1cc22202bf28b3dda4;hpb=a530bbe337109d898d5b4a001fc8f1afa3b5dc39;p=sbcl.git

diff --git a/src/pcl/fngen.lisp b/src/pcl/fngen.lisp
index 9c74f49..4bd35ca 100644
--- a/src/pcl/fngen.lisp
+++ b/src/pcl/fngen.lisp
@@ -109,10 +109,10 @@
     new))
 
 (defun fgen-test	     (fgen) (svref fgen 0))
-(defun fgen-gensyms	  (fgen) (svref fgen 1))
-(defun fgen-generator	(fgen) (svref fgen 2))
+(defun fgen-gensyms	     (fgen) (svref fgen 1))
+(defun fgen-generator	     (fgen) (svref fgen 2))
 (defun fgen-generator-lambda (fgen) (svref fgen 3))
-(defun fgen-system	   (fgen) (svref fgen 4))
+(defun fgen-system	     (fgen) (svref fgen 4))
 
 (defun get-function-generator (lambda test-converter code-converter)
   (let* ((test (compute-test lambda test-converter))