tc009.hs\should_compile\typecheck\ghc-regress\tests\testsuite - delta/haskell.git - gitlab.haskell.org: ghc/ghc.git

index : delta/haskell.git

gitlab.haskell.org: ghc/ghc.git

summary refs log tree commit diff

path: root/testsuite/tests/ghc-regress/typecheck/should_compile/tc009.hs

blob: b682a94c0d224f7950508ae6c4db46be80fb6a61 (plain)

module ShouldSucceed where

o (True,x) = x
o (False,y) = y+1