Fix comment master
authorDavid Vázquez <davazp@gmail.com>
Mon, 10 Mar 2014 16:15:16 +0000 (17:15 +0100)
committerDavid Vázquez <davazp@gmail.com>
Mon, 10 Mar 2014 16:15:16 +0000 (17:15 +0100)
src/lambda-list.lisp

index 799e727..a0ff109 100644 (file)
                     :initform initform)))))
 
 (defun parse-destructuring-lambda-list (lambda-list)
                     :initform initform)))))
 
 (defun parse-destructuring-lambda-list (lambda-list)
-  (let (;; Destructured lambda list structure where we accumulate the
+  (let (;; Destructure lambda list structure where we accumulate the
         ;; results of the parsing.
         (ll (make-lambda-list))
         ;; List of lambda list keywords which we have already seen.
         (lambda-keywords nil))
     (flet (;; Check if we are in the beginning of the section NAME in
         ;; results of the parsing.
         (ll (make-lambda-list))
         ;; List of lambda list keywords which we have already seen.
         (lambda-keywords nil))
     (flet (;; Check if we are in the beginning of the section NAME in
-           ;; the lambda list. It checks also if the section is in the
+           ;; the lambda list. It also checks if the section is in the
            ;; proper place and it is new.
            (lambda-section (name)
              (let ((section (first lambda-list)))
            ;; proper place and it is new.
            (lambda-section (name)
              (let ((section (first lambda-list)))