X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/aa14a4cddcb96b681d5c19a2ec8bad382f43b264..7d467fa4b85a81ae91d31baefbb9c8b1a4f3bee9:/src/c-types-parse.lisp

diff --git a/src/c-types-parse.lisp b/src/c-types-parse.lisp
index ba6bf6f..a3ecae4 100644
--- a/src/c-types-parse.lisp
+++ b/src/c-types-parse.lisp
@@ -110,7 +110,7 @@
 	      (setf (gethash name map) ds
 		    (gethash label map) ds))))))
     map)
-  "Maps symbolic labels and textual names to DECLSPEC instances.")
+  "Maps symbolic labels and textual names to `declspec' instances.")
 
 ;; A collection of declaration specifiers, and how to merge them together.
 
@@ -131,8 +131,8 @@
     we'll just have to live with that.
 
     (Why are instances immutable?  Because it's much easier to merge a new
-    specifier into an existing collection, and then check that the resulting
-    thing is valid rather than having to deal with all of the possible
+    specifier into an existing collection and then check that the resulting
+    thing is valid, rather than having to deal with all of the possible
     special cases of what the new thing might be.  And if the merged
     collection isn't good, I must roll back to the previous version.  So I
     don't get to take advantage of a mutable structure.)"))
@@ -215,7 +215,7 @@
 
 (defun scan-declspec
     (scanner &key (predicate (constantly t)) (indicator :declspec))
-  "Scan a DECLSPEC from SCANNER.
+  "Scan a `declspec' from SCANNER.
 
    If PREDICATE is provided then only succeed if (funcall PREDICATE DECLSPEC)
    is true, where DECLSPEC is the raw declaration specifier or C-type object,