1 2 3 4 5 6 7 8 9
{-# LANGUAGE Haskell2010 #-} -- TupleSections not enabled {-# LANGUAGE UnboxedTuples #-} module Foo where foo = (1,) bar = (# 1, #)