src/: Use gender-neutral language in commentary.

diff --git a/src/parser/scanner-charbuf-impl.lisp b/src/parser/scanner-charbuf-impl.lisp
index 37bdd8c..43d1f9f 100644 (file)
--- a/src/parser/scanner-charbuf-impl.lisp
+++ b/src/parser/scanner-charbuf-impl.lisp
@@ -107,8 +107,8 @@
 
    Which leaves us with the need to determine whether there are outstanding
    captures.  We simply maintain a counter, and rely on the client releasing
-   captured places properly when he's finished.  In practice, this is usually
-   done using the `peek' parser macro so there isn't a problem."))
+   captured places properly when they've finished.  In practice, this is
+   usually done using the `peek' parser macro so there isn't a problem."))
 
 (export '(charbuf-scanner-place charbuf-scanner-place-p))
 (defstruct charbuf-scanner-place

diff --git a/src/pset-proto.lisp b/src/pset-proto.lisp
index 5e02d9b..09547e8 100644 (file)
--- a/src/pset-proto.lisp
+++ b/src/pset-proto.lisp
@@ -95,7 +95,7 @@
     (if (eql type wanted) value
        (error "Incorrect type: expected ~A but found ~A" wanted type)))
 
-  ;; If the caller asks for type T then give him the raw thing.
+  ;; If the caller asks for type T then give them the raw thing.
   (:method (value type (wanted (eql t)))
     (declare (ignore type))
     value))