Commit 366e7415 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

DEBUG removal

parent 403ab78d
......@@ -27,9 +27,7 @@ import VarEnv
import Maybes ( orElse, expectJust )
import Bitmap
#ifdef DEBUG
import Outputable
#endif
import List
......@@ -143,9 +141,7 @@ srtExpr table (StgLetNoEscape live1 live2 bind body)
srtExpr table body =: \ body' ->
StgLetNoEscape live1 live2 bind' body'
#ifdef DEBUG
srtExpr _table expr = pprPanic "srtExpr" (ppr expr)
#endif
srtAlt :: IdEnv Int -> StgAlt -> StgAlt
srtAlt table (con,args,used,rhs)
......
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