* lisp/emacs-lisp/gv.el: Silly typo

diff --git a/lisp/emacs-lisp/gv.el b/lisp/emacs-lisp/gv.el
index 6c3036da2f2e8111916cd5037e74cfe4d85d1034..a5e29dd5e3beb64aa8348de5c4dac58fe43637a0 100644 (file)
--- a/lisp/emacs-lisp/gv.el
+++ b/lisp/emacs-lisp/gv.el
@@ -641,7 +641,7 @@ REF must have been previously obtained with `gv-ref'."
 
 ;; You'd think noone would write `(setf (error ...) ..)' but it
 ;; appears naturally as the result of macroexpansion of things like
-;; (setf (case-exhaustive ...)).
+;; (setf (pcase-exhaustive ...)).
 ;; We could generalize this to `throw' and `signal', but it seems
 ;; preferable to wait until there's a concrete need.
 (gv-define-expander error (lambda (_do &rest args) `(error . ,args)))