Move Graph, Relation and Graphviz modules from GF.Speech to GF.Data.

src/GF/Data/Graph.hs

@@ -11,7 +11,7 @@
 --
 -- A simple graph module.
 -----------------------------------------------------------------------------
-module GF.Speech.Graph ( Graph(..), Node, Edge, NodeInfo
+module GF.Data.Graph ( Graph(..), Node, Edge, NodeInfo
                         , newGraph, nodes, edges
                         , nmap, emap, newNode, newNodes, newEdge, newEdges
                         , insertEdgeWith

src/GF/Data/Graphviz.hs

@@ -12,7 +12,7 @@
 -- Graphviz DOT format representation and printing.
 -----------------------------------------------------------------------------
 
-module GF.Speech.Graphviz (
+module GF.Data.Graphviz (
 				  Graph(..), GraphType(..), 
 				  Node(..), Edge(..),
 				  Attr,

src/GF/Data/Relation.hs

@@ -12,7 +12,7 @@
 -- A simple module for relations.
 -----------------------------------------------------------------------------
 
-module GF.Speech.Relation (Rel, mkRel, mkRel'
+module GF.Data.Relation (Rel, mkRel, mkRel'
                            , allRelated , isRelatedTo
                            , transitiveClosure
                            , reflexiveClosure, reflexiveClosure_

src/GF/Speech/CFG.hs

@@ -10,7 +10,7 @@ import GF.Data.Utilities
 import PGF.CId
 import GF.Infra.Option
 import GF.Infra.PrintClass
-import GF.Speech.Relation
+import GF.Data.Relation
 
 import Control.Monad
 import Control.Monad.State (State, get, put, evalState)

src/GF/Speech/CFGToFA.hs

@@ -21,9 +21,9 @@ import GF.Speech.CFG
 import GF.Speech.PGFToCFG
 import GF.Infra.Ident (Ident)
 
+import GF.Data.Graph
+import GF.Data.Relation
 import GF.Speech.FiniteState
-import GF.Speech.Graph
-import GF.Speech.Relation
 import GF.Speech.CFG
 
 data Recursivity = RightR | LeftR | NotR

src/GF/Speech/FiniteState.hs

@@ -42,8 +42,8 @@ import Data.Set (Set)
 import qualified Data.Set as Set
 
 import GF.Data.Utilities
-import GF.Speech.Graph
+import GF.Data.Graph
-import qualified GF.Speech.Graphviz as Dot
+import qualified GF.Data.Graphviz as Dot
 
 type State = Int
 

src/GF/Speech/SLF.hs

@@ -18,7 +18,7 @@ import GF.Speech.FiniteState
 import GF.Speech.CFG
 import GF.Speech.CFGToFA
 import GF.Speech.PGFToCFG
-import qualified GF.Speech.Graphviz as Dot
+import qualified GF.Data.Graphviz as Dot
 import PGF
 import PGF.CId
 

src/GF/Speech/SRG.hs

@@ -25,7 +25,7 @@ import GF.Infra.Option
 import GF.Infra.PrintClass
 import GF.Speech.CFG
 import GF.Speech.PGFToCFG
-import GF.Speech.Relation
+import GF.Data.Relation
 import GF.Speech.FiniteState
 import GF.Speech.RegExp
 import GF.Speech.CFGToFA