@@ -810,9 +810,9 @@ findDefinitionAndHoverTests = let
810810 , test yes broken clL23 cls "class in instance declaration"
811811 , test yes broken clL25 cls "class in signature" -- 147
812812 , test broken broken eclL15 ecls "external class in signature"
813− , test yes broken dnbL29 dnb "do-notation bind" -- 137
813+ , test yes yes dnbL29 dnb "do-notation bind" -- 137
814814 , test yes yes dnbL30 dnb "do-notation lookup"
815− , test yes broken lcbL33 lcb "listcomp bind" -- 137
815+ , test yes yes lcbL33 lcb "listcomp bind" -- 137
816816 , test yes yes lclL33 lcb "listcomp lookup"
817817 ]
818818 where yes, broken :: (TestTree -> Maybe TestTree)