introduce the type synonym Token=String in the PGF API

src/compiler/GF/Speech/CFG.hs

@@ -27,7 +27,6 @@ import qualified Data.Set as Set
 --
 
 type Cat = String
-type Token = String
 
 data Symbol c t = NonTerminal c | Terminal t
   deriving (Eq, Ord, Show)

src/compiler/GF/Speech/SRGS_XML.hs

@@ -13,7 +13,7 @@ import GF.Speech.CFG
 import GF.Speech.RegExp
 import GF.Speech.SISR as SISR
 import GF.Speech.SRG
-import PGF (PGF, CId)
+import PGF (PGF, CId, Token)
 
 import Control.Monad
 import Data.Char (toUpper,toLower)