testing grammar distr

This commit is contained in:
aarne committed 2004-08-03 15:21:01 +00:00
1 parent a843c8e0ec
commit 166a32b1e7
6 files changed
+51 -2

No files matched your search

+1 -1
View File
@@ -129,7 +129,7 @@ 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"
CImport _ -> both "old v s opt src retain nocf nocheckcirc cflexer noemit o"
"abs cnc res path"
CRemoveLanguage _ -> none
CEmptyState -> none