Commit 1aeeeaf8 authored by simonpj's avatar simonpj

[project @ 2003-09-23 15:10:43 by simonpj]

Add more informative assertion
parent 27a85895
......@@ -257,7 +257,7 @@ mkTopStgRhs is_static rhs_fvs srt binder_info (StgConApp con args)
= StgRhsCon noCCS con args
mkTopStgRhs is_static rhs_fvs srt binder_info rhs
= ASSERT( not is_static )
= ASSERT2( not is_static, ppr rhs )
StgRhsClosure noCCS binder_info
(getFVs rhs_fvs)
Updatable
......
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