diff --git a/CHANGES.md b/CHANGES.md
index f6c1f68..14bfdb4 100644
--- a/CHANGES.md
+++ b/CHANGES.md
@@ -393,7 +393,7 @@ val pp_hum : Format.formatter -> t -> unit [@@ocaml.toplevel_printer]
     * add manual pages
     * show more information in the prompt:
         * show the current value of the macro counter
-        * show the nnumber of key pressed since the beginning of a macro
+        * show the number of key pressed since the beginning of a macro
           when recording a macro
         * show intermediate key sequence
     * better support for light colors terminals
diff --git a/README.md b/README.md
index cee66a3..026d3ba 100644
--- a/README.md
+++ b/README.md
@@ -166,7 +166,7 @@ Alternatively, if you have installed utop via opam, you can add this
 to your `~/.emacs`:
 
 ```elisp
-;; Add the opam lisp dir to the emacs load path
+;; Add the opam lisp dir to the Emacs load path
 (add-to-list
  'load-path
  (replace-regexp-in-string
@@ -200,11 +200,11 @@ copy&paste this to your `~/.emacs`:
 (dolist (var (car (read-from-string (shell-command-to-string "opam config env --sexp"))))
   (setenv (car var) (cadr var)))
 
-;; Update the emacs path
+;; Update the Emacs path
 (setq exec-path (append (parse-colon-path (getenv "PATH"))
                         (list exec-directory)))
 
-;; Update the emacs load path
+;; Update the Emacs load path
 (add-to-list 'load-path (expand-file-name "../../share/emacs/site-lisp"
                                           (getenv "OCAML_TOPLEVEL_PATH")))
 
@@ -252,7 +252,7 @@ you want.
 Common error
 ------------
 
-If you get this error when running utop in a terminal or in emacs this
+If you get this error when running utop in a terminal or in Emacs this
 means that the environment variable `CAML_LD_LIBRARY_PATH` is not set
 correctly:
 
@@ -334,7 +334,7 @@ following fields to the executable stanza:
 
 The `(modes ...)` field is to tell dune to install the byte-code
 version of the executable, as currently native toplevels are not fully
-suported.
+supported.
 
 [dune]: https://github.com/ocaml/dune
 
diff --git a/src/top/utop.el b/src/top/utop.el
index e0179ea..d6d0d95 100644
--- a/src/top/utop.el
+++ b/src/top/utop.el
@@ -108,11 +108,11 @@ This hook is only run if exiting actually kills the buffer."
 
 (defface utop-stdout
   nil
-  "The face used to highlight messages comming from stdout.")
+  "The face used to highlight messages coming from stdout.")
 
 (defface utop-stderr
   nil
-  "The face used to highlight messages comming from stderr.")
+  "The face used to highlight messages coming from stderr.")
 
 (defface utop-frozen
   '((t (:bold t)))
@@ -231,7 +231,7 @@ backend")
    (featurep 'company)))
 
 ;; +-----------------------------------------------------------------+
-;; | Compability with different ocaml major modes                    |
+;; | Compatibility with different ocaml major modes                  |
 ;; +-----------------------------------------------------------------+
 
 (defun utop-compat-resolve (choices)
@@ -931,7 +931,7 @@ With prefix argument EOB-P, positions cursor at end of buffer."
 (defun utop-exit (&optional exit-code)
   "Try to gracefully exit utop.
 
-EXIT-CODE is the exit code that shoud be returned by utop. It
+EXIT-CODE is the exit code that should be returned by utop. It
 defaults to 0."
   (interactive)
   (with-current-buffer utop-buffer-name
@@ -939,7 +939,7 @@ defaults to 0."
       (utop-send-string (format "exit:%d\n" (or exit-code 0))))))
 
 (defun utop-sentinel (_process _msg)
-  "Callback for process' state change."
+  "Callback for process's state change."
   (let ((buffer (get-buffer utop-buffer-name)))
     ;; Do nothing if the buffer does not exist anymore
     (when buffer