haskell-src-exts-1.17.0: tests/examples/UnicodeArrow.hs.prettyprinter.golden

{-# LANGUAGE UnicodeSyntax #-}
module Main (main) where

arrowTest :: String -> String
arrowTest input
  = case input of
        "hello" -> "world"
        "world" -> "hello"
        otherwise -> "unknow"