-- TupleSections not enabled {-# LANGUAGE UnboxedTuples #-} module Foo where foo = (1,) bar = (# 1, #)