diff --git a/semantic-ast/src/Main.hs b/semantic-ast/src/Main.hs
index d8c29ed54..ff1a09e78 100644
--- a/semantic-ast/src/Main.hs
+++ b/semantic-ast/src/Main.hs
@@ -12,7 +12,7 @@ import Data.ByteString (pack, readFile, ByteString)
 import System.IO (FilePath)
 import Options.Applicative hiding (style)
 import Data.Semigroup ((<>))
-import Text.Pretty.Simple (pPrint)
+import Text.Pretty.Simple (pPrint, pPrintNoColor)
 
 data SemanticAST = SemanticAST
   { format :: Format