diff --git a/test/blackbox-tests/jbuild b/test/blackbox-tests/jbuild
index 056475cc..64368152 100644
--- a/test/blackbox-tests/jbuild
+++ b/test/blackbox-tests/jbuild
@@ -148,3 +148,10 @@
   (action
    (chdir test-cases/ppx-rewriter
     (setenv JBUILDER ${bin:jbuilder} (run ${exe:cram.exe} -ocamlv ${ocaml_version} -skip-versions 4.02.3 run.t))))))
+
+(alias
+ ((name runtest)
+  (deps ((files_recursively_in test-cases/utop)))
+  (action
+   (chdir test-cases/utop
+    (setenv JBUILDER ${bin:jbuilder} (run ${exe:cram.exe} run.t))))))
diff --git a/test/blackbox-tests/test-cases/utop/forutop/forutop.ml b/test/blackbox-tests/test-cases/utop/forutop/forutop.ml
new file mode 100644
index 00000000..0cd324d7
--- /dev/null
+++ b/test/blackbox-tests/test-cases/utop/forutop/forutop.ml
@@ -0,0 +1 @@
+let run () = print_endline "hello in utop"
diff --git a/test/blackbox-tests/test-cases/utop/forutop/jbuild b/test/blackbox-tests/test-cases/utop/forutop/jbuild
new file mode 100644
index 00000000..6cb704fa
--- /dev/null
+++ b/test/blackbox-tests/test-cases/utop/forutop/jbuild
@@ -0,0 +1,4 @@
+(jbuild_version 1)
+
+(library
+ ((name forutop)))
diff --git a/test/blackbox-tests/test-cases/utop/init_forutop.ml b/test/blackbox-tests/test-cases/utop/init_forutop.ml
new file mode 100644
index 00000000..32949d61
--- /dev/null
+++ b/test/blackbox-tests/test-cases/utop/init_forutop.ml
@@ -0,0 +1 @@
+Forutop.run ();;
diff --git a/test/blackbox-tests/test-cases/utop/run.t b/test/blackbox-tests/test-cases/utop/run.t
new file mode 100644
index 00000000..0692b8eb
--- /dev/null
+++ b/test/blackbox-tests/test-cases/utop/run.t
@@ -0,0 +1,8 @@
+  $ $JBUILDER utop -j1 --root . forutop -- init_forutop.ml
+      ocamldep forutop/.utop/utop.depends.ocamldep-output
+      ocamldep forutop/forutop.depends.ocamldep-output
+        ocamlc forutop/forutop.{cmi,cmo,cmt}
+        ocamlc forutop/.utop/utop.{cmi,cmo,cmt}
+        ocamlc forutop/forutop.cma
+        ocamlc forutop/.utop/utop.exe
+  hello in utop