[GHC] #12654: Panic on interrupting the evaluation of foldl (\x a -> if x > 100 then 100 else x+a) 0 [1..]