Commit 6fad9e95 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Remove an unnecessary #ifdef DEBUG

parent 4b484275
...@@ -505,10 +505,8 @@ dsExpr (HsBinTick ixT ixF e) = do ...@@ -505,10 +505,8 @@ dsExpr (HsBinTick ixT ixF e) = do
\begin{code} \begin{code}
#ifdef DEBUG
-- HsSyn constructs that just shouldn't be here: -- HsSyn constructs that just shouldn't be here:
dsExpr (ExprWithTySig _ _) = panic "dsExpr:ExprWithTySig" dsExpr (ExprWithTySig _ _) = panic "dsExpr:ExprWithTySig"
#endif
findField :: [HsRecField Id arg] -> Name -> [arg] findField :: [HsRecField Id arg] -> Name -> [arg]
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment