extend behaviour for interface and incomplete

This commit is contained in:
aarne
2007-12-09 10:52:19 +00:00
parent b693ba103c
commit 6a4218e9ef
5 changed files with 15 additions and 9 deletions

View File

@@ -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