tilia-0.1.0.0: corpora/vendored/other/cpp/operand-differing-across-branches.hs

{-# LANGUAGE CPP #-}

module Main (main) where

main :: IO ()
main = do
  when (verbosity >= 4) $
#if MIN_VERSION_base(4,10,0)
        let dump = putStrLn . render
                where render = show
        in
#elif MIN_VERSION_base(4,9,0)
        let dump = print
        in
#endif
        liftIO $ dump settings

  when (verbosity >= 3) $ do
        putStrLn "done"