Removed CFConst constructor, since it was unused.

src/GF/Speech/SISR.hs

@@ -67,7 +67,6 @@ profileFinalSISR term fmt = [JS.DExpr $ fmtOut fmt `ass` f term]
         f (CFApp x y) = JS.ECall (f x) [f y]
         f (CFRes i) = JS.EIndex (JS.EVar args) (JS.EInt (fromIntegral i))
         f (CFVar v) = JS.EVar (var v)
-        f (CFConst s) = JS.EStr s
         f (CFMeta typ) = obj [("name",JS.EStr "?"), ("type",JS.EStr typ)]
 
 fmtOut SISROld = JS.EVar (JS.Ident "$")

src/GF/Speech/TransformCFG.hs

@@ -58,7 +58,6 @@ data CFTerm
     | CFApp CFTerm CFTerm -- ^ Application
     | CFRes Int -- ^ The result of the n:th non-terminal
     | CFVar Int -- ^ A lambda-bound variable
-    | CFConst String 
     | CFMeta String -- ^ A metavariable
   deriving (Eq,Ord,Show)