fixes in parsing

This commit is contained in:
aarne
2004-06-22 12:33:31 +00:00
parent 3986f8c265
commit 53f7d4ecfb
7 changed files with 31 additions and 24 deletions

View File

@@ -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"