diff options
Diffstat (limited to 'src/Parser.hs')
| -rw-r--r-- | src/Parser.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Parser.hs b/src/Parser.hs index cd9b590..4fd60b5 100644 --- a/src/Parser.hs +++ b/src/Parser.hs @@ -39,7 +39,7 @@ parseTestModule absPath = do x <- identifier name <- (x:) <$> many (symbol "." >> identifier) when (or (zipWith (/=) (reverse name) (reverse $ map T.pack $ splitDirectories $ dropExtension $ absPath))) $ do - parseError $ FancyError off $ S.singleton $ ErrorFail $ T.unpack $ + registerParseError $ FancyError off $ S.singleton $ ErrorFail $ T.unpack $ "module name does not match file path" eol >> scn return name |