summaryrefslogtreecommitdiff
path: root/src/GF/Speech/TransformCFG.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/GF/Speech/TransformCFG.hs')
-rw-r--r--src/GF/Speech/TransformCFG.hs18
1 files changed, 9 insertions, 9 deletions
diff --git a/src/GF/Speech/TransformCFG.hs b/src/GF/Speech/TransformCFG.hs
index 2fa797089..b61b3aa67 100644
--- a/src/GF/Speech/TransformCFG.hs
+++ b/src/GF/Speech/TransformCFG.hs
@@ -1,15 +1,17 @@
----------------------------------------------------------------------
-- |
--- Module : (Module)
--- Maintainer : (Maintainer)
+-- Module : TransformCFG
+-- Maintainer : BB
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date $
--- > CVS $Author $
--- > CVS $Revision $
+-- > CVS $Date: 2005/02/18 19:21:21 $
+-- > CVS $Author: peb $
+-- > CVS $Revision: 1.3 $
--
--- (Description of the module)
+-- This module does some useful transformations on CFGs.
+--
+-- FIXME: remove cycles
-----------------------------------------------------------------------------
{-
@@ -43,10 +45,8 @@ import Data.Maybe (fromJust)
import Debug.Trace
--- FIXME: remove cycles
-
--- not very nice to get replace the structured CFCat type with a simple string
+-- | not very nice to get replace the structured CFCat type with a simple string
type CFRule_ = Rule CFName String Token
type CFRules = FiniteMap String [CFRule_]