diff --git a/binding.lisp b/binding.lisp
index 8275c496b36ca9509d8556c7b61964b94d1589e1..6a4cc0575512c15a31b975b17d3782f347cd35d6 100644
--- a/binding.lisp
+++ b/binding.lisp
@@ -2,7 +2,7 @@
 
 (defmacro if-let (bindings then-form &optional else-form)
     "Creates new variable bindings, and conditionally executes either
-THEN-FORM or ELSE-FORM (defaulting to NIL).
+THEN-FORM or ELSE-FORM. ELSE-FORM defaults to NIL.
 
 BINDINGS must be either single binding of the form:
 
@@ -32,7 +32,7 @@ effect."
 
 (defmacro if-let* (bindings then-form &optional else-form)
   "Creates new variable bindings, and conditionally executes either THEN-FORM
-or ELSE-FORM (defaulting to NIL).
+or ELSE-FORM. ELSE-FORM defaults to NIL.
 
 BINDINGS must be either single binding of the form:
 
@@ -89,8 +89,7 @@ implicit PROGN."
          ,@forms))))
 
 (defmacro when-let* (bindings &body forms)
-  "Creates new variable bindings, and conditionally executes either THEN-FORM
-or ELSE-FORM (defaulting to NIL).
+  "Creates new variable bindings, and conditionally executes FORMS.
 
 BINDINGS must be either single binding of the form:
 
diff --git a/functions.lisp b/functions.lisp
index 9e9bbd17b36083e603401f39dd06f6a96cfda06a..ea5e39d181d8635626289c4f308448f2d07e55e5 100644
--- a/functions.lisp
+++ b/functions.lisp
@@ -82,7 +82,8 @@ the last."
 it is called with to FUNCTION."
   (declare (optimize (speed 3) (safety 1) (debug 1)))
   (lambda (&rest more)
-    (declare (dynamic-extent more))                 
+    (declare (dynamic-extent more))
+    ;; Using M-V-C we don't need to append the arguments.
     (multiple-value-call function (values-list arguments) (values-list more))))
 
 (define-compiler-macro curry (function &rest arguments)
@@ -102,7 +103,7 @@ with and ARGUMENTS to FUNCTION."
 
 (defmacro named-lambda (name lambda-list &body body)
   "Expands into a lambda-expression within whose BODY NAME denotes the
-function corresponding function."
+corresponding function."
   (let ((simplep (not (intersection lambda-list-keywords lambda-list))))
     (if simplep
         ;; Required arguments only, no need for APPLY