From: sof Date: Thu, 23 Jul 1998 07:55:14 +0000 (+0000) Subject: [project @ 1998-07-23 07:55:14 by sof] X-Git-Tag: Approx_2487_patches~502 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=2ee48da93ccb357b17b61198d06394ddd0a06ca6;p=ghc-hetmet.git [project @ 1998-07-23 07:55:14 by sof] back out foreign decl change, not supposed to see that just yet --- diff --git a/ghc/compiler/rename/RnIfaces.lhs b/ghc/compiler/rename/RnIfaces.lhs index b13b29f..1b7b471 100644 --- a/ghc/compiler/rename/RnIfaces.lhs +++ b/ghc/compiler/rename/RnIfaces.lhs @@ -917,7 +917,6 @@ getDeclBinders new_name (SigD (IfaceSig var ty prags src_loc)) = new_name var src_loc `thenRn` \ var_name -> returnRn (Avail var_name) -getDeclBinders new_name (ForD _) = returnRn NotAvailable getDeclBinders new_name (DefD _) = returnRn NotAvailable getDeclBinders new_name (InstD _) = returnRn NotAvailable