diff options
| author | krasimir <krasimir@chalmers.se> | 2009-06-16 14:50:06 +0000 |
|---|---|---|
| committer | krasimir <krasimir@chalmers.se> | 2009-06-16 14:50:06 +0000 |
| commit | e69f8165c0d59f510ed59e0dff38aaae61653bf7 (patch) | |
| tree | 65b1a7da8300222c32bbe2313a12bfb1767ddf76 | |
| parent | 358e5de44e24e7a35930538ccfe992ebff7a03f1 (diff) | |
make erasing=on the default
| -rw-r--r-- | Setup.hs | 6 | ||||
| -rw-r--r-- | src/GF/Infra/Option.hs | 2 |
2 files changed, 4 insertions, 4 deletions
@@ -54,8 +54,8 @@ rglCommands = , RGLCommand "pgf" False $ \mode args pkg lbi -> do let dir = getRGLBuildDir lbi mode createDirectoryIfMissing True dir - sequence_ [run_gfc pkg lbi ["-s","-make","-name=Lang"++la,"-erasing=on",dir ++ "/Lang" ++ la ++ ".gfo"] | (_,la) <- optl langsPGF args] - run_gfc pkg lbi (["-s","-make","-name=Lang","-erasing=on"]++["Lang" ++ la ++ ".pgf" | (_,la) <- optl langsPGF args]) + sequence_ [run_gfc pkg lbi ["-s","-make","-name=Lang"++la,dir ++ "/Lang" ++ la ++ ".gfo"] | (_,la) <- optl langsPGF args] + run_gfc pkg lbi (["-s","-make","-name=Lang"]++["Lang" ++ la ++ ".pgf" | (_,la) <- optl langsPGF args]) , RGLCommand "demo" False $ \mode args pkg lbi -> do let ls = optl langsDemo args gf (demos "Demo" ls) ["demo/Demo" ++ la ++ ".gf" | (_,la) <- ls] pkg lbi @@ -287,7 +287,7 @@ run_gfc pkg lbi args = case e of ExitSuccess -> return () ExitFailure i -> die $ "gf exited with exit code: " ++ show i - where rts_flags = ["-K100M"] + where rts_flags = ["-K64M"] showArg arg = "'" ++ arg ++ "'" default_gf pkg lbi = buildDir lbi </> exeName' </> exeNameReal diff --git a/src/GF/Infra/Option.hs b/src/GF/Infra/Option.hs index e27283de1..40b8dc434 100644 --- a/src/GF/Infra/Option.hs +++ b/src/GF/Infra/Option.hs @@ -266,7 +266,7 @@ defaultFlags = Flags { optSpeechLanguage = Nothing, optLexer = Nothing, optUnlexer = Nothing, - optErasing = False, + optErasing = True, optBuildParser = BuildParser, optWarnings = [], optDump = [] |
