some more command options and documentation

src-3.0/GF/Grammar/API.hs

@@ -6,7 +6,8 @@ module GF.Grammar.API (
   checkTerm,
   computeTerm,
   showTerm,
-  TermPrintStyle(..)
+  TermPrintStyle(..),
+  pTermPrintStyle
   ) where
 
 import GF.Source.ParGF
@@ -65,3 +66,10 @@ showTerm style t =
 data TermPrintStyle = TermPrintTable | TermPrintAll | TermPrintUnqual | TermPrintDefault
   deriving (Show,Eq)
 
+pTermPrintStyle s = case s of
+  "table"  -> TermPrintTable
+  "all"    -> TermPrintAll
+  "unqual" -> TermPrintUnqual
+  _        -> TermPrintDefault
+
+