path: root/testsuite/tests/unboxedsums/module/Main.hs

{-# LANGUAGE UnboxedSums #-}

module Main where

import Lib

import Prelude (print, IO)

main :: IO ()
main = do
    print (getInt (flip (# 123 | #)))