From f798a05622ecf07cc619d0c181dab9ae3aeabdf6 Mon Sep 17 00:00:00 2001
From: "Robert P. Goldman" <rpgoldman@sift.net>
Date: Tue, 7 Apr 2015 13:03:57 -0500
Subject: [PATCH] Minor docstring edits.

---
 tools/invoke-lisp.lisp | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/tools/invoke-lisp.lisp b/tools/invoke-lisp.lisp
index 0a3ae53b..3790c905 100644
--- a/tools/invoke-lisp.lisp
+++ b/tools/invoke-lisp.lisp
@@ -68,13 +68,14 @@ REGISTER-LISP-IMPLEMENTATION."
                      :dump-format "(progn (sys:resize-areas :global-gc t :pack-heap t :sift-old-areas t :tenure t) (excl:dumplisp :name ~A :suppress-allegro-cl-banner t))"))))))))
 
 (defun register-lisp-implementation* (x)
-  "Register the lisp implementation described a list X of a name followed by a plist"
+  "Register the lisp implementation described by the list X, which consists of a name
+followed by a plist of keywords and arguments."
   (apply 'register-lisp-implementation x))
 
 (map () 'register-lisp-implementation* (all-allegro-variants))
 
 (defun all-ecl-variants ()
-  "Return a list of possible ECL variants with or withotu bytecode compiler"
+  "Return a list of possible ECL variants with or without bytecode compiler"
   (loop
     :for (ecl-variant extraname flags) :in
     '((:ecl "" ("-load" "sys:cmp"))
-- 
GitLab