diff --git a/src/GF/Speech/SISR.hs b/src/GF/Speech/SISR.hs
index 2999a74a2..29d8a4d8c 100644
--- a/src/GF/Speech/SISR.hs
+++ b/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 "$")
diff --git a/src/GF/Speech/TransformCFG.hs b/src/GF/Speech/TransformCFG.hs
index 300f9654f..87fe8a160 100644
--- a/src/GF/Speech/TransformCFG.hs
+++ b/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)