X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fpcl%2Fcombin.lisp;h=47b78446c99352969bde5b23591da34fdfcc3480;hb=a260738d7a71680079d972b102b4e4db4e8dc3ae;hp=395d32fa6b5be8f66968ec7d1ea824ec07436640;hpb=6ff8c9d8fa5770038489d40d1993c7a1156b9811;p=sbcl.git diff --git a/src/pcl/combin.lisp b/src/pcl/combin.lisp index 395d32f..47b7844 100644 --- a/src/pcl/combin.lisp +++ b/src/pcl/combin.lisp @@ -344,8 +344,8 @@ `(error "There is no primary method for the generic function ~S." ',generic-function)) ((and (null before) (null after) (null around)) - ;; By returning a single call-method `form' here we enable an - ;; important implementation-specific optimization. + ;; By returning a single call-method `form' here we enable + ;; an important implementation-specific optimization. `(call-method ,(first primary) ,(rest primary))) (t (let ((main-effective-method