GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-07 02:02:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

Use NOINLINE for build info and darcs version info

Browse Source 
... to avoid unnecessary recompilation of other modules.
This commit is contained in:
hallgren
2012-10-18 20:01:22 +00:00
parent 9a022a141e
commit 584b6ba86d
4 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/compiler/GFI.hs
View File

@@ -177,7 +177,7 @@ execute1 opts gfenv0 s0 =
pOpts style q ("-qual" :ws) = pOpts style Qualified ws
pOpts style q ws = (style,q,unwords ws)
(style,q,s) = pOpts TermPrintDefault Qualified (tail (words s0))
(style,q,s) = pOpts TermPrintDefault Qualified ws
case runP pExp (encodeUnicode utf8 s) of
Left (_,msg) -> putStrLn msg