Fix typos and doc strings in native-compilation files

* lisp/emacs-lisp/comp.el (comp-speed, comp-debug, comp-verbose)
(comp-always-compile, comp-deferred-compilation-deny-list)
(comp-bootstrap-deny-list, comp-never-optimize-functions)
(comp-async-jobs-number, comp-async-cu-done-hook)
(comp-async-all-done-hook, comp-async-env-modifier-form)
(comp-pass, comp-native-compiling, comp-post-pass-hooks)
(comp-known-predicate-p, comp-pred-to-cstr)
(comp-symbol-values-optimizable, comp-limple-assignments)
(comp-limple-calls, comp-limple-branches, comp-block)
(comp-vec--verify-idx, comp-vec-aref, comp-vec-append)
(comp-vec-prepend, comp-block-preds)
(comp-ensure-native-compiler, comp-log, comp-log-func)
(comp-loop-insn-in-block, comp-byte-frame-size)
(comp-add-func-to-ctxt, comp-spill-lap-function, comp-spill-lap)
(comp-lap-fall-through-p, comp-new-frame, comp-emit-set-call)
(comp-copy-slot, comp-latch-make-fill, comp-emit-cond-jump)
(comp-body-eff, comp-op-case, comp-prepare-args-for-top-level)
(comp-limplify-top-level, comp-negate-arithm-cmp-fun)
(comp-emit-assume, comp-cond-cstrs-target-mvar)
(comp-function-foldable-p, comp-function-call-maybe-fold)
(comp-form-tco-call-seq, comp-clean-up-stale-eln)
(comp-delete-or-replace-file, comp--native-compile)
(native--compile-async, native-compile)
(batch-byte-native-compile-for-bootstrap): Fix typos, wording, and
punctuation in doc strings.
* lisp/loadup.el: Fix typos.

* src/lread.c (syms_of_lread): Doc fix.

1 files changed, 7 insertions, 6 deletions

diff --git a/lisp/loadup.el b/lisp/loadup.el
index 526f7c33281..98d4e4fe673 100644
--- a/lisp/loadup.el
+++ b/lisp/loadup.el
@@ -450,8 +450,9 @@ lost after dumping")))
 
 (when (featurep 'nativecomp)
   ;; Fix the compilation unit filename to have it working when
-  ;; when installed or if the source directory got moved.  This is set to be
-  ;; a pair in the form: (rel-path-from-install-bin . rel-path-from-local-bin).
+  ;; installed or if the source directory got moved.  This is set to be
+  ;; a cons cell of the form:
+  ;;     (rel-filename-from-install-bin . rel-filename-from-local-bin).
   (let ((h (make-hash-table :test #'eq))
         (bin-dest-dir (cadr (member "--bin-dest" command-line-args)))
         (eln-dest-dir (cadr (member "--eln-dest" command-line-args))))
@@ -466,12 +467,12 @@ lost after dumping")))
                  (native-comp-unit-set-file
                   cu
 	          (cons
-                   ;; Relative path from the installed binary.
+                   ;; Relative filename from the installed binary.
                    (file-relative-name (concat eln-dest-dir
                                                (file-name-nondirectory
                                                 (native-comp-unit-file cu)))
                                        bin-dest-dir)
-                   ;; Relative path from the built uninstalled binary.
+                   ;; Relative filename from the built uninstalled binary.
                    (file-relative-name (native-comp-unit-file cu)
                                        invocation-directory))))
 	       h))))
@@ -536,8 +537,8 @@ lost after dumping")))
                         (t (error "unrecognized dump mode %s" dump-mode)))))
       (when (and (featurep 'nativecomp)
                  (equal dump-mode "pdump"))
-        ;; Don't enable this before bootstrap is completed the as the
-        ;; compiler infrastructure may not be usable.
+        ;; Don't enable this before bootstrap is completed, as the
+        ;; compiler infrastructure may not be usable yet.
         (setq comp-enable-subr-trampolines t))
       (message "Dumping under the name %s" output)
       (condition-case ()