Commit e3971de1 authored by Simon Marlow's avatar Simon Marlow
Browse files

expand "out of stack slots" panic to suggest using -fregs-graph, see #1993

parent 5642651b
......@@ -222,7 +222,8 @@ emptyStackMap = StackMap [0..maxSpillSlots] emptyUFM
getStackSlotFor :: StackMap -> Unique -> (StackMap,Int)
getStackSlotFor (StackMap [] _) _
= panic "RegAllocLinear.getStackSlotFor: out of stack slots"
= panic "RegAllocLinear.getStackSlotFor: out of stack slots, try -fregs-graph"
-- This happens with darcs' SHA1.hs, see #1993
getStackSlotFor fs@(StackMap (freeSlot:stack') reserved) reg =
case lookupUFM reserved reg of
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