diff --git a/core/modern/modern.factor b/core/modern/modern.factor
index f6aee23c18..c619799552 100644
--- a/core/modern/modern.factor
+++ b/core/modern/modern.factor
@@ -552,7 +552,6 @@ CONSTANT: factor-lexing-rules {
     ".private" ?tail drop
     vocab-source-path path>literals ;
 
-
 ! What a lexer body looks like, produced by make-lexer
 ! : lex ( n/f string -- n'/f string literal )
     ! "!`\\\"[{(\s\r\n" slice-til-either {
@@ -567,27 +566,4 @@ CONSTANT: factor-lexing-rules {
         ! { char: \r [ read-token-or-whitespace ] }
         ! { char: \n [ read-token-or-whitespace ] }
         ! { f [ f like dup [ make-tag-literal ] when ] }
-    ! } case ; inline
-
-![[
-vocab-roots get [ vocabs-from reject-some-paths ] map concat
-{
-    "specialized-arrays" "specialized-vectors"
-    "math.blas.matrices" "math.blas.vectors" "math.vectors.simd"
-    "math.vectors.simd.cords" "game.debug" "gpu.util" "gpu.effects.blur"
-    "gpu.effects.step" "model-viewer" "terrain.shaders" "spheres"
-    "bunny.cel-shaded" "bunny.outlined"
-} diff
-[ modern-source-path dup <pathname> . path>literals ] map-zip
-
-vocab-roots get [ vocabs-from reject-some-paths ] map concat
-{
-    "specialized-arrays" "specialized-vectors"
-    "math.blas.matrices" "math.blas.vectors" "math.vectors.simd"
-    "math.vectors.simd.cords" "game.debug" "gpu.util" "gpu.effects.blur"
-    "gpu.effects.step" "model-viewer" "terrain.shaders" "spheres" 
-    "bunny.cel-shaded" "bunny.outlined"
-} diff
-[ modern-source-path ] map
-[ ] rewrite-paths
-]]
+    ! } case ; inline
\ No newline at end of file
diff --git a/core/modern/paths/paths.factor b/core/modern/paths/paths.factor
index 82f5bbf19a..e55f977c39 100644
--- a/core/modern/paths/paths.factor
+++ b/core/modern/paths/paths.factor
@@ -55,8 +55,6 @@ IN: modern.paths
         "resource:core/vocabs/loader/test/n/n.factor"
         "resource:core/vocabs/loader/test/o/o.factor"
         "resource:core/vocabs/loader/test/p/p.factor"
-        "resource:extra/math/blas/vectors/vectors.factor" ! need .modern file
-        "resource:extra/math/blas/matrices/matrices.factor" ! need .modern file
     } diff
     ! Don't parse .modern files yet
     [ ".modern" tail? ] reject ;
@@ -68,14 +66,6 @@ IN: modern.paths
 : modern-tests-paths ( names -- paths )
     [ vocab-tests-path ] map filter-exists reject-some-paths ;
 
-: unsupported-vocabs ( -- seq )
-    {
-        "specialized-arrays" "specialized-vectors"
-        "math.blas.matrices" "math.blas.vectors" "math.vectors.simd"
-        "math.vectors.simd.cords"
-    } ;
-
-
 : all-vocabs ( -- seq )
     [
         vocab-roots get [ vocabs-from ] map concat
@@ -84,10 +74,9 @@ IN: modern.paths
 : all-vocab-paths ( -- seq )
     [
         all-vocabs less-core-test-vocabs
-        unsupported-vocabs diff
         [ modern-source-paths ] [ modern-docs-paths ] [ modern-tests-paths ] tri
     ] { } append-outputs-as reject-some-paths filter-exists ;
 
 : all-paths ( -- seq )
     vocab-roots get [ [ ".factor" tail? ] find-all-files ] map concat
-    reject-some-paths ;
+    reject-some-paths ;
\ No newline at end of file