1 2 3 4 5 6 7 8
{-# LANGUAGE MultiWayIf #-} module TcMultiWayIfFail where x1 = if | True -> 1 :: Int | False -> "2" | otherwise -> [3 :: Int]