From 32d94e908c403d6bb0e9e57cd265a8b39d323a59 Mon Sep 17 00:00:00 2001
From: bringert <bringert@cs.chalmers.se>
Date: Mon, 29 Jan 2007 12:21:15 +0000
Subject: Removed CFConst constructor, since it was unused.

---
 src/GF/Speech/SISR.hs | 1 -
 1 file changed, 1 deletion(-)

(limited to 'src/GF/Speech/SISR.hs')

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 "$")
-- 
cgit v1.2.3