diff options
| author | bringert <unknown> | 2005-04-15 08:45:32 +0000 |
|---|---|---|
| committer | bringert <unknown> | 2005-04-15 08:45:32 +0000 |
| commit | 2c36d9c62386c6d06a40c4b6ed4a12e96119b5ae (patch) | |
| tree | 7489f901458afb66e86a741e7e2dae14d94c08a5 /src/GF/Speech | |
| parent | 5207c27bffd077f1ab322824b485fc6c92d554eb (diff) | |
Removed some dead code from gsl and cfgm generation.
Diffstat (limited to 'src/GF/Speech')
| -rw-r--r-- | src/GF/Speech/PrGSL.hs | 11 | ||||
| -rw-r--r-- | src/GF/Speech/PrJSGF.hs | 10 | ||||
| -rw-r--r-- | src/GF/Speech/TransformCFG.hs | 12 |
3 files changed, 11 insertions, 22 deletions
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 |