From 61c16f2eb2a042152a2b04f709d0cefe6e5a14df Mon Sep 17 00:00:00 2001 From: "kr.angelov" Date: Tue, 15 Nov 2011 13:33:44 +0000 Subject: more structured format for errors and warnings from the compiler --- src/compiler/GF/Compile/GetGrammar.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/compiler/GF/Compile/GetGrammar.hs') diff --git a/src/compiler/GF/Compile/GetGrammar.hs b/src/compiler/GF/Compile/GetGrammar.hs index 914a19aac..65f98d29a 100644 --- a/src/compiler/GF/Compile/GetGrammar.hs +++ b/src/compiler/GF/Compile/GetGrammar.hs @@ -38,7 +38,7 @@ getSourceModule opts file0 = ioe $ case runP pModDef content of Left (Pn l c,msg) -> do file <- writeTemp tmp let location = file++":"++show l++":"++show c - return (Bad (location++": "++msg)) + return (Bad (location++":\n "++msg)) Right (i,mi) -> do removeTemp tmp return (Ok (i,mi{mflags=mflags mi `addOptions` opts, msrc=file0})) `catch` (return . Bad . show) -- cgit v1.2.3