Commit 08178717 authored by Kai-Oliver Prott's avatar Kai-Oliver Prott Committed by Finn Teegen
Browse files

Fix typo

parent 8667883f
...@@ -50,7 +50,7 @@ ok = return () ...@@ -50,7 +50,7 @@ ok = return ()
-- The extension check iterates over all given pragmas in the module and -- The extension check iterates over all given pragmas in the module and
-- gathers all extensions mentioned in a language pragma. An error is reported -- gathers all extensions mentioned in a language pragma. An error is reported
-- if an extension is unkown. -- if an extension is unknown.
checkModule :: Module a -> EXCM () checkModule :: Module a -> EXCM ()
checkModule (Module ps _ _ _ _) = mapM_ checkPragma ps checkModule (Module ps _ _ _ _) = mapM_ checkPragma ps
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment