tertiary operators
1234567891011121314
-- tertiary operators in haskell? Am I cool or what?
infixl 7 ?
(?) :: Bool -> (a,a) -> a
(?) True (x,_) = x
(?) False (_,y) = y
infixr 8 .:
(.:) :: a -> a -> (a,a)
(.:) x y = (x,y)
main = do
putChar $ (4>3) ? 't' .: 'f'
putChar $ (3>4) ? 't' .: 'f'
Haskell
INFO