Commit 8d84d843 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

-DDEBUG build fix

parent 3efb2451
......@@ -144,7 +144,7 @@ srtExpr table (StgLetNoEscape live1 live2 bind body)
StgLetNoEscape live1 live2 bind' body'
#ifdef DEBUG
srtExpr table expr = pprPanic "srtExpr" (ppr expr)
srtExpr _table expr = pprPanic "srtExpr" (ppr expr)
#endif
srtAlt :: IdEnv Int -> StgAlt -> StgAlt
......
Supports Markdown
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