diff --git a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/fail/pr14389.rkt b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/fail/pr14389.rkt
index bfb78b0792..f4df79c1c0 100644
--- a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/fail/pr14389.rkt
+++ b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/fail/pr14389.rkt
@@ -2,6 +2,9 @@
 (exn-pred (regexp-quote "in: (for/flvector"))
 #lang typed/racket/base
 
+;; Test for PR 14389. Make sure that the reported source location
+;; points to the expression, not the whole submodule contents.
+
 (require racket/flonum)
 (module+ test
   (require typed/rackunit)