-- from Jon Hill
module ShouldFail where

buglet = [ x | (x,y) <- buglet ]
