ghc-exactprint-1.14.0.0: tests/examples/pre-ghc910/LinearGuards.hs
{-# LANGUAGE LinearTypes #-}
module LinearGuards where
f :: Bool -> a %1 -> a
f b a | b = a
| True = a
{-# LANGUAGE LinearTypes #-}
module LinearGuards where
f :: Bool -> a %1 -> a
f b a | b = a
| True = a