hls-tactics-plugin-1.8.0.0: new/test/golden/EmptyCaseADT.hs

data Foo = A Int | B Bool | C

foo :: Foo -> ()
foo x = case x of