[project @ 2001-09-14 15:51:41 by simonpj]

[ghc-hetmet.git] / ghc / compiler / main / MkIface.lhs

diff --git a/ghc/compiler/main/MkIface.lhs b/ghc/compiler/main/MkIface.lhs
index 98a160f..9ba3a2f 100644 (file)
--- a/ghc/compiler/main/MkIface.lhs
+++ b/ghc/compiler/main/MkIface.lhs
@@ -310,7 +310,7 @@ ifaceInstance dfun_id
                -- and this instance decl wouldn't get imported into a module
                -- that mentioned T but not Tibble.
 
-ifaceRule (id, BuiltinRule _)
+ifaceRule (id, BuiltinRule _ _)
   = pprTrace "toHsRule: builtin" (ppr id) (bogusIfaceRule id)
 
 ifaceRule (id, Rule name bndrs args rhs)