From 9cf71d3bba75f157e72bc08f984a2262885ed506 Mon Sep 17 00:00:00 2001
From: aarne <unknown>
Date: Mon, 20 Jun 2005 15:14:19 +0000
Subject: parse tree visualization

---
 src/GF/Shell/ShellCommands.hs | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'src/GF/Shell/ShellCommands.hs')

diff --git a/src/GF/Shell/ShellCommands.hs b/src/GF/Shell/ShellCommands.hs
index 687d57bee..e2b809b21 100644
--- a/src/GF/Shell/ShellCommands.hs
+++ b/src/GF/Shell/ShellCommands.hs
@@ -5,9 +5,9 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/06/10 21:04:01 $ 
+-- > CVS $Date: 2005/06/20 16:14:20 $ 
 -- > CVS $Author: aarne $
--- > CVS $Revision: 1.37 $
+-- > CVS $Revision: 1.38 $
 --
 -- The datatype of shell commands and the list of their options.
 -----------------------------------------------------------------------------
@@ -75,6 +75,7 @@ data Command =
  | CPrintMultiGrammar
  | CPrintSourceGrammar
  | CShowGrammarGraph
+ | CShowTreeGraph
  | CPrintGramlet 
  | CPrintCanonXML
  | CPrintCanonXMLStruct 
@@ -190,6 +191,7 @@ optionsOfCommand co = case co of
   CSpeakAloud -> flags "language"
   CPutString -> both "utf8" "filter length"
   CShowTerm -> flags "printer"
+  CShowTreeGraph -> opts "c f g"
   CSystemCommand _ -> none
 
   CPrintGrammar -> both "utf8" "printer lang"
-- 
cgit v1.2.3