Added visualization of source modules.

This commit is contained in:
bringert
2004-12-10 14:02:00 +00:00
parent 0d99169a7f
commit 95d434bbd2
5 changed files with 53 additions and 26 deletions

View File

@@ -113,6 +113,7 @@ pCommand ws = case ws of
"pxs" : [] -> aUnit CPrintCanonXMLStruct
"px" : [] -> aUnit CPrintCanonXML
"pm" : [] -> aUnit CPrintMultiGrammar
"sg" : [] -> aUnit CPrintSourceGrammar
"po" : [] -> aUnit CPrintGlobalOptions
"pl" : [] -> aUnit CPrintLanguages
"h" : c : [] -> aUnit $ CHelp (Just (abbrevCommand c))

View File

@@ -57,6 +57,7 @@ data Command =
| CPrintLanguages
| CPrintInformation I.Ident
| CPrintMultiGrammar
| CPrintSourceGrammar
| CPrintGramlet
| CPrintCanonXML
| CPrintCanonXMLStruct
@@ -166,6 +167,7 @@ optionsOfCommand co = case co of
CPrintGrammar -> both "utf8" "printer lang"
CPrintMultiGrammar -> both "utf8" "printer"
CPrintSourceGrammar -> both "utf8" "printer"
CHelp _ -> opts "all filter length lexer unlexer printer transform depth number"