diff --git a/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/embed-me24.rkt b/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/embed-me24.rkt
new file mode 100644
index 0000000000..974da5b6fe
--- /dev/null
+++ b/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/embed-me24.rkt
@@ -0,0 +1,3 @@
+#lang racket
+
+"Ok"
diff --git a/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/test.rkt b/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/test.rkt
index c56c8fd9e5..0d13194071 100644
--- a/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/test.rkt
+++ b/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/test.rkt
@@ -620,3 +620,16 @@
 (try-reader)
 (try-planet)
 (try-*sl)
+
+;; ----------------------------------------
+;; Make sure that embedding does not break future module declarations
+
+(let ()
+  (parameterize ([current-output-port (open-output-bytes)])
+    (write-module-bundle
+     #:modules (list (list #f (collection-file-path "embed-me24.rkt" "tests" "compiler" "embed")))))
+  
+  (parameterize ([read-accept-reader #t]
+                 [current-namespace (make-base-namespace)])
+    (eval (read (open-input-string "#lang racket 10")))))
+