summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorkrasimir <krasimir@chalmers.se>2009-06-16 14:50:06 +0000
committerkrasimir <krasimir@chalmers.se>2009-06-16 14:50:06 +0000
commite69f8165c0d59f510ed59e0dff38aaae61653bf7 (patch)
tree65b1a7da8300222c32bbe2313a12bfb1767ddf76
parent358e5de44e24e7a35930538ccfe992ebff7a03f1 (diff)
make erasing=on the default
-rw-r--r--Setup.hs6
-rw-r--r--src/GF/Infra/Option.hs2
2 files changed, 4 insertions, 4 deletions
diff --git a/Setup.hs b/Setup.hs
index a89a7ea0a..f22e19e9b 100644
--- a/Setup.hs
+++ b/Setup.hs
@@ -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 = []