diff --git a/semantic-diff.cabal b/semantic-diff.cabal
index 47c4384c8..aa7bbf354 100644
--- a/semantic-diff.cabal
+++ b/semantic-diff.cabal
@@ -145,7 +145,6 @@ test-suite test
   hs-source-dirs:      test
   main-is:             Spec.hs
   other-modules:       Assigning.Assignment.Spec
-                     , CommandSpec
                      , Data.Functor.Classes.Ord.Generic.Spec
                      , Data.Functor.Listable
                      , Data.Mergeable.Spec
@@ -153,6 +152,7 @@ test-suite test
                      , Diffing.Algorithm.RWS.Spec
                      , Diffing.Algorithm.SES.Spec
                      , DiffSpec
+                     , Semantic.IO.Spec
                      , SemanticSpec
                      , SemanticCmdLineSpec
                      , Semantic.StatSpec
diff --git a/test/CommandSpec.hs b/test/Semantic/IO/Spec.hs
similarity index 99%
rename from test/CommandSpec.hs
rename to test/Semantic/IO/Spec.hs
index 78456da81..35ebfe5ee 100644
--- a/test/CommandSpec.hs
+++ b/test/Semantic/IO/Spec.hs
@@ -1,4 +1,4 @@
-module CommandSpec where
+module Semantic.IO.Spec where
 
 import Data.Blob
 import Data.Functor.Both as Both
diff --git a/test/Spec.hs b/test/Spec.hs
index 1b3a1d1fb..fd5cf83ee 100644
--- a/test/Spec.hs
+++ b/test/Spec.hs
@@ -1,7 +1,6 @@
 module Main where
 
 import qualified Assigning.Assignment.Spec
-import qualified CommandSpec
 import qualified Data.Functor.Classes.Ord.Generic.Spec
 import qualified Data.Mergeable.Spec
 import qualified Data.Source.Spec
@@ -12,6 +11,7 @@ import qualified InterpreterSpec
 import qualified TermSpec
 import qualified TOCSpec
 import qualified IntegrationSpec
+import qualified Semantic.IO.Spec
 import qualified SemanticCmdLineSpec
 import qualified SemanticSpec
 import qualified Semantic.StatSpec
@@ -22,7 +22,6 @@ main = hspec $ do
   describe "Semantic.Stat" Semantic.StatSpec.spec
   parallel $ do
     describe "Assigning.Assignment" Assigning.Assignment.Spec.spec
-    describe "Command" CommandSpec.spec
     describe "Data.Functor.Classes.Ord.Generic" Data.Functor.Classes.Ord.Generic.Spec.spec
     describe "Data.Mergeable" Data.Mergeable.Spec.spec
     describe "Data.Source" Data.Source.Spec.spec
@@ -32,6 +31,7 @@ main = hspec $ do
     describe "Interpreter" InterpreterSpec.spec
     describe "Term" TermSpec.spec
     describe "Semantic" SemanticSpec.spec
+    describe "Semantic.IO" Semantic.IO.spec
     describe "SemanticCmdLine" SemanticCmdLineSpec.spec
     describe "TOC" TOCSpec.spec
     describe "Integration" IntegrationSpec.spec