summaryrefslogtreecommitdiff
path: root/testsuite/tests/simplCore/should_compile/T13170.hs
blob: 06ea6563e07e44f41608c16796d2a9b7b1d9460f (plain)
1
2
3
4
module T13170 where
f :: Int -> Bool
f x = y == 2 || y == 3
  where y = -x