diff options
| author | krasimir <krasimir@chalmers.se> | 2015-02-20 13:00:51 +0000 |
|---|---|---|
| committer | krasimir <krasimir@chalmers.se> | 2015-02-20 13:00:51 +0000 |
| commit | 8fae1049572841aca6541e633dc6ba8fa0fdcc18 (patch) | |
| tree | 74c90cc42e69b74955a36cc1c759282b84119933 /src/compiler/GF/Infra/Option.hs | |
| parent | 9f70eaa13c73a39712413d806cb65c89aa10802f (diff) | |
remove the meta prob flags
Diffstat (limited to 'src/compiler/GF/Infra/Option.hs')
| -rw-r--r-- | src/compiler/GF/Infra/Option.hs | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/src/compiler/GF/Infra/Option.hs b/src/compiler/GF/Infra/Option.hs index 563fb017e..885571276 100644 --- a/src/compiler/GF/Infra/Option.hs +++ b/src/compiler/GF/Infra/Option.hs @@ -173,8 +173,6 @@ data Flags = Flags { optDump :: [Dump], optTagsOnly :: Bool, optHeuristicFactor :: Maybe Double, - optMetaProb :: Maybe Double, - optMetaToknProb :: Maybe Double, optJobs :: Maybe (Maybe Int) } deriving (Show) @@ -222,8 +220,6 @@ optionsPGF opts = maybe [] (\x -> [("language",LStr x)]) (flag optSpeechLanguage opts) ++ maybe [] (\x -> [("startcat",LStr x)]) (flag optStartCat opts) ++ maybe [] (\x -> [("heuristic_search_factor",LFlt x)]) (flag optHeuristicFactor opts) - ++ maybe [] (\x -> [("meta_prob",LFlt x)]) (flag optMetaProb opts) - ++ maybe [] (\x -> [("meta_token_prob",LFlt x)]) (flag optMetaToknProb opts) -- Option manipulation @@ -285,8 +281,6 @@ defaultFlags = Flags { optDump = [], optTagsOnly = False, optHeuristicFactor = Nothing, - optMetaProb = Nothing, - optMetaToknProb = Nothing, optJobs = Nothing } @@ -369,10 +363,6 @@ optDescr = Option [] ["cse"] (onOff (toggleOptimize OptCSE) True) "Perform common sub-expression elimination (default on).", Option [] ["cfg"] (ReqArg cfgTransform "TRANS") "Enable or disable specific CFG transformations. TRANS = merge, no-merge, bottomup, no-bottomup, ...", Option [] ["heuristic_search_factor"] (ReqArg (readDouble (\d o -> o { optHeuristicFactor = Just d })) "FACTOR") "Set the heuristic search factor for statistical parsing", - Option [] ["meta_prob"] (ReqArg (readDouble (\d o -> o { optMetaProb = Just d })) "PROB") "Set the probability of introducting a meta variable in the parser", - Option [] ["meta_token_prob"] (ReqArg (readDouble (\d o -> o { optMetaToknProb = Just d })) "PROB") "Set the probability for skipping a token in the parser", --- Option [] ["new-comp"] (NoArg (set $ \o -> o{optNewComp = True})) "Use the new experimental compiler.", --- Option [] ["old-comp"] (NoArg (set $ \o -> o{optNewComp = False})) "Use old trusty compiler.", dumpOption "source" Source, dumpOption "rebuild" Rebuild, dumpOption "extend" Extend, |