summaryrefslogtreecommitdiff
path: root/testsuite/tests/pmcheck/should_compile/T17216.hs
blob: 64a778391e087ca760b347a364a514158b197c93 (plain)
1
2
3
4
5
6
7
8
module Lib where

foo :: Int -> Bool
foo i
  | i < 0 = True
  | i == 0 = True
  | i > 0 = True