diff options
| -rw-r--r-- | src/GF/Compile/GetGrammar.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/Compile/GetGrammar.hs b/src/GF/Compile/GetGrammar.hs index 85f017459..0972c4b3a 100644 --- a/src/GF/Compile/GetGrammar.hs +++ b/src/GF/Compile/GetGrammar.hs @@ -41,7 +41,7 @@ getSourceModule opts file0 = do file <- foldM runPreprocessor file0 (flag optPreprocessors opts) string <- readFileIOE file let tokens = myLexer string - mo1 <- ioeErr $ pModDef tokens + mo1 <- ioeErr $ errIn file0 $ pModDef tokens mo2 <- ioeErr $ transModDef mo1 return $ addOptionsToModule opts mo2 |