Do not prefix parse error from first module as "imported"

1 files changed, 3 insertions, 0 deletions

diff --git a/src/Parser.hs b/src/Parser.hs
index e9bf3d2..4bb32a7 100644
--- a/src/Parser.hs
+++ b/src/Parser.hs
@@ -158,6 +158,9 @@ parseTestFiles paths = do
     go parsedModules res path = do
         let moduleName = error "current module name should be set at the beginning of parseTestModule"
         parseTestFile parsedModules moduleName path >>= \case
+            Left (ImportModuleError bundle) -> do
+                putStr (errorBundlePretty bundle)
+                exitFailure
             Left err -> do
                 putStr (showErrorComponent err)
                 exitFailure