From 2c36d9c62386c6d06a40c4b6ed4a12e96119b5ae Mon Sep 17 00:00:00 2001 From: bringert Date: Fri, 15 Apr 2005 08:45:32 +0000 Subject: Removed some dead code from gsl and cfgm generation. --- src/GF/Speech/PrGSL.hs | 11 ++++------- src/GF/Speech/PrJSGF.hs | 10 +++------- src/GF/Speech/TransformCFG.hs | 12 ++++-------- 3 files changed, 11 insertions(+), 22 deletions(-) (limited to 'src/GF/Speech') diff --git a/src/GF/Speech/PrGSL.hs b/src/GF/Speech/PrGSL.hs index 84e3f2a74..0455e3653 100644 --- a/src/GF/Speech/PrGSL.hs +++ b/src/GF/Speech/PrGSL.hs @@ -5,9 +5,9 @@ -- Stability : (stable) -- Portability : (portable) -- --- > CVS $Date: 2005/04/14 18:38:36 $ --- > CVS $Author: peb $ --- > CVS $Revision: 1.16 $ +-- > CVS $Date: 2005/04/15 09:45:32 $ +-- > CVS $Author: bringert $ +-- > CVS $Revision: 1.17 $ -- -- This module prints a CFG as a Nuance GSL 2.0 grammar. -- @@ -19,10 +19,7 @@ module PrGSL (gslPrinter) where import SRG import Ident --- import GF.OldParsing.CFGrammar --- import GF.OldParsing.Utilities (Symbol(..)) --- import GF.OldParsing.GrammarTypes --- import GF.Printing.PrintParser + import GF.Formalism.CFG import GF.Formalism.Utilities (Symbol(..)) import GF.Conversion.Types diff --git a/src/GF/Speech/PrJSGF.hs b/src/GF/Speech/PrJSGF.hs index 975685d81..178365bac 100644 --- a/src/GF/Speech/PrJSGF.hs +++ b/src/GF/Speech/PrJSGF.hs @@ -5,9 +5,9 @@ -- Stability : (stable) -- Portability : (portable) -- --- > CVS $Date: 2005/04/14 18:38:36 $ --- > CVS $Author: peb $ --- > CVS $Revision: 1.10 $ +-- > CVS $Date: 2005/04/15 09:45:32 $ +-- > CVS $Author: bringert $ +-- > CVS $Revision: 1.11 $ -- -- This module prints a CFG as a JSGF grammar. -- @@ -21,10 +21,6 @@ module PrJSGF (jsgfPrinter) where import SRG import Ident --- import GF.OldParsing.CFGrammar --- import GF.OldParsing.Utilities (Symbol(..)) --- import GF.OldParsing.GrammarTypes --- import GF.Printing.PrintParser import GF.Formalism.CFG import GF.Formalism.Utilities (Symbol(..)) import GF.Conversion.Types diff --git a/src/GF/Speech/TransformCFG.hs b/src/GF/Speech/TransformCFG.hs index 6a1b7c817..8e2673a9f 100644 --- a/src/GF/Speech/TransformCFG.hs +++ b/src/GF/Speech/TransformCFG.hs @@ -5,9 +5,9 @@ -- Stability : (stable) -- Portability : (portable) -- --- > CVS $Date: 2005/04/14 18:38:36 $ --- > CVS $Author: peb $ --- > CVS $Revision: 1.10 $ +-- > CVS $Date: 2005/04/15 09:45:32 $ +-- > CVS $Author: bringert $ +-- > CVS $Revision: 1.11 $ -- -- This module does some useful transformations on CFGs. -- @@ -19,10 +19,6 @@ module TransformCFG (makeNice, CFRule_) where import Ident --- import GF.OldParsing.CFGrammar --- import GF.OldParsing.Utilities (Symbol(..)) --- import GF.OldParsing.GrammarTypes --- import GF.Printing.PrintParser import GF.Formalism.CFG import GF.Formalism.Utilities (Symbol(..), mapSymbol) import GF.Conversion.Types @@ -35,7 +31,7 @@ import Data.Maybe (fromJust) import Debug.Trace --- | not very nice to get replace the structured CFCat type with a simple string +-- | not very nice to replace the structured CFCat type with a simple string type CFRule_ = CFRule Cat_ Name Token type Cat_ = String -- cgit v1.2.3