From 6fad9e959678472a870563f0ad5ee12f50aea198 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Sat, 29 Mar 2008 14:10:47 +0000 Subject: [PATCH] Remove an unnecessary #ifdef DEBUG --- compiler/deSugar/DsExpr.lhs | 2 -- 1 file changed, 2 deletions(-) diff --git a/compiler/deSugar/DsExpr.lhs b/compiler/deSugar/DsExpr.lhs index 27077eb..b823437 100644 --- a/compiler/deSugar/DsExpr.lhs +++ b/compiler/deSugar/DsExpr.lhs @@ -505,10 +505,8 @@ dsExpr (HsBinTick ixT ixF e) = do \begin{code} -#ifdef DEBUG -- HsSyn constructs that just shouldn't be here: dsExpr (ExprWithTySig _ _) = panic "dsExpr:ExprWithTySig" -#endif findField :: [HsRecField Id arg] -> Name -> [arg] -- 1.7.10.4