msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

Fixed module names and imports after giant file move.

Browse Source
This commit is contained in:
bringert
2005-04-21 15:21:02 +00:00
parent 3433c97848
commit 5c9917ff8d
209 changed files with 2038 additions and 2036 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
src/GF/Speech/TransformCFG.hs
View File

@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
-- > CVS $Date: 2005/04/15 09:45:32 $
-- > CVS $Date: 2005/04/21 16:23:33 $
-- > CVS $Author: bringert $
-- > CVS $Revision: 1.11 $
-- > CVS $Revision: 1.12 $
--
-- This module does some useful transformations on CFGs.
--
@@ -16,9 +16,9 @@
-- peb thinks: most of this module should be moved to GF.Conversion...
-----------------------------------------------------------------------------
module TransformCFG (makeNice, CFRule_) where
module GF.Speech.TransformCFG (makeNice, CFRule_) where
import Ident
import GF.Infra.Ident
import GF.Formalism.CFG
import GF.Formalism.Utilities (Symbol(..), mapSymbol)
import GF.Conversion.Types
@@ -100,4 +100,4 @@ fix f x = let x' = f x in if x' == x then x else fix f x'
nothingOrNull :: Maybe [a] -> Bool
nothingOrNull Nothing = True
nothingOrNull (Just xs) = null xs
nothingOrNull (Just xs) = null xs