diff --git a/basis/io/files/temp/temp.factor b/basis/io/files/temp/temp.factor
index b1c18725c1..477c1f078d 100644
--- a/basis/io/files/temp/temp.factor
+++ b/basis/io/files/temp/temp.factor
@@ -12,7 +12,8 @@ SYMBOL: current-temp-directory
     current-temp-directory get ;
 
 : temp-file ( name -- path )
-    temp-directory prepend-path ;
+    temp-directory
+    [ make-directories ] [ prepend-path ] bi ;
 
 : with-temp-directory ( quot -- )
     [ temp-directory ] dip with-directory ; inline
diff --git a/extra/modern/modern.factor b/extra/modern/modern.factor
index 7a0a0a659d..d6979c3960 100644
--- a/extra/modern/modern.factor
+++ b/extra/modern/modern.factor
@@ -3,8 +3,8 @@
 USING: arrays assocs combinators combinators.short-circuit
 continuations io.encodings.utf8 io.files kernel make math
 math.order modern.paths modern.slices sequences sequences.extras
-sequences.generalizations sets shuffle splitting strings unicode
-vocabs.loader ;
+sequences.generalizations sets shuffle splitting strings
+syntax.modern unicode vocabs.loader ;
 IN: modern
 
 ERROR: string-expected-got-eof n string ;
diff --git a/extra/modern/out/out.factor b/extra/modern/out/out.factor
index 1951b006cb..541c6a1bca 100644
--- a/extra/modern/out/out.factor
+++ b/extra/modern/out/out.factor
@@ -4,7 +4,7 @@ USING: accessors arrays assocs combinators.short-circuit
 constructors continuations io io.encodings.utf8 io.files
 io.streams.string kernel modern modern.paths modern.slices
 prettyprint sequences sequences.extras splitting strings
-vocabs.loader ;
+syntax.modern vocabs.loader ;
 IN: modern.out
 
 : token? ( obj -- ? )