summaryrefslogtreecommitdiff
path: root/testsuite/tests/typecheck/should_compile/tc174.hs
blob: 49f8d6aab534174f78cc6d3f03f4aefd831a901c (plain)
1
2
3
4
5
{-# LANGUAGE UnboxedTuples #-}

module ShouldCompile where

f x = (# x, x #) :: (# Int, Int #)