From 2ee48da93ccb357b17b61198d06394ddd0a06ca6 Mon Sep 17 00:00:00 2001 From: sof Date: Thu, 23 Jul 1998 07:55:14 +0000 Subject: [PATCH] [project @ 1998-07-23 07:55:14 by sof] back out foreign decl change, not supposed to see that just yet --- ghc/compiler/rename/RnIfaces.lhs | 1 - 1 file changed, 1 deletion(-) 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 -- 1.7.10.4