liquidhaskell-0.9.0.2.1: tests/pos/T1286.hs

module T1286 where

{-@ fails :: {v:Bool | v} @-}
fails =  'a' == 'a'

{-@ ok :: {v:Bool | v} @-}
ok = "a" == "a"