diff --git a/library/platform/jvm/test.factor b/library/platform/jvm/test.factor
new file mode 100644
index 0000000000..2a4df6f9c3
--- /dev/null
+++ b/library/platform/jvm/test.factor
@@ -0,0 +1,16 @@
+IN: test
+USE: compiler
+USE: namespaces
+USE: stdio
+USE: stack
+USE: test
+USE: words
+
+: must-compile ( word -- )
+    "compile" get [
+        "Checking if " write dup write " was compiled" print
+        dup compile
+        worddef compiled? assert
+    ] [
+        drop
+    ] ifte ;