mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-13 23:09:31 -06:00
37 lines
845 B
Haskell
37 lines
845 B
Haskell
----------------------------------------------------------------------
|
|
-- |
|
|
-- Maintainer : PL
|
|
-- Stability : (stable)
|
|
-- Portability : (portable)
|
|
--
|
|
-- > CVS $Date: 2005/04/21 16:21:52 $
|
|
-- > CVS $Author: bringert $
|
|
-- > CVS $Revision: 1.2 $
|
|
--
|
|
-- Removing epsilon linearizations from MCF grammars
|
|
-----------------------------------------------------------------------------
|
|
|
|
|
|
module GF.Conversion.RemoveEpsilon where
|
|
-- (convertGrammar) where
|
|
|
|
import GF.System.Tracing
|
|
import GF.Infra.Print
|
|
|
|
import Control.Monad
|
|
import Data.List (mapAccumL)
|
|
import Data.Maybe (mapMaybe)
|
|
import GF.Formalism.Utilities
|
|
import GF.Formalism.GCFG
|
|
import GF.Formalism.MCFG
|
|
import GF.Conversion.Types
|
|
import GF.Data.Assoc
|
|
import GF.Data.SortedList
|
|
import GF.Data.GeneralDeduction
|
|
|
|
convertGrammar :: EGrammar -> EGrammar
|
|
convertGrammar grammar = undefined
|
|
|
|
|
|
|