From 6a4218e9efebc8b037cf2410a5e07a3fb20a5069 Mon Sep 17 00:00:00 2001 From: aarne Date: Sun, 9 Dec 2007 10:52:19 +0000 Subject: extend behaviour for interface and incomplete --- src/GF/Devel/Compile/Factorize.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/GF/Devel/Compile/Factorize.hs') diff --git a/src/GF/Devel/Compile/Factorize.hs b/src/GF/Devel/Compile/Factorize.hs index cb9a684ff..7386f3ed5 100644 --- a/src/GF/Devel/Compile/Factorize.hs +++ b/src/GF/Devel/Compile/Factorize.hs @@ -89,7 +89,7 @@ factor c i t = case t of --- we hope this will be fresh and don't check... -qqIdent c i = identC ("_q" ++ prt c ++ "__" ++ show i) +qqIdent c i = identC ("_q_" ++ prt c ++ "__" ++ show i) -- we need to replace subterms -- cgit v1.2.3