diff options
| author | aarne <unknown> | 2004-06-22 12:33:31 +0000 |
|---|---|---|
| committer | aarne <unknown> | 2004-06-22 12:33:31 +0000 |
| commit | 53f7d4ecfb7b101c29115d3ba7285757808bbb9c (patch) | |
| tree | 583ba348c14a7a22d7e21801e321e3355b88fdb0 /src/GF/Shell | |
| parent | 3986f8c265e09043770480fe85ae5350e807a4a4 (diff) | |
fixes in parsing
Diffstat (limited to 'src/GF/Shell')
| -rw-r--r-- | src/GF/Shell/ShellCommands.hs | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/src/GF/Shell/ShellCommands.hs b/src/GF/Shell/ShellCommands.hs index 03e8fafbd..971097d71 100644 --- a/src/GF/Shell/ShellCommands.hs +++ b/src/GF/Shell/ShellCommands.hs @@ -105,6 +105,7 @@ testValidFlag st f x = case f of "lexer" -> testInc customTokenizer "unlexer" -> testInc customUntokenizer "depth" -> testN + "rawtrees"-> testN "parser" -> testInc customParser "alts" -> testN "transform" -> testInc customTermCommand @@ -129,14 +130,14 @@ testValidFlag st f x = case f of optionsOfCommand :: Command -> ([String],[String]) optionsOfCommand co = case co of CImport _ -> both "old v s opt src retain nocf nocheckcirc cflexer" - "abs cnc res" + "abs cnc res path" CRemoveLanguage _ -> none CEmptyState -> none CStripState -> none CTransformGrammar _ -> flags "printer" CConvertLatex _ -> none - CLinearize _ -> both "table struct record" "lang number unlexer" - CParse -> both "new n ign raw v" "cat lang lexer parser number" + CLinearize _ -> both "table struct record all" "lang number unlexer" + CParse -> both "new n ign raw v" "cat lang lexer parser number rawtrees" CTranslate _ _ -> opts "cat lexer parser" CGenerateRandom -> flags "cat lang number depth" CGenerateTrees -> both "metas" "depth alts cat lang number" |
