TH_unboxedSingleton.hs\th\ghc-regress\tests\testsuite - delta/haskell.git - gitlab.haskell.org: ghc/ghc.git

index : delta/haskell.git

gitlab.haskell.org: ghc/ghc.git

summary refs log tree commit diff

path: root/testsuite/tests/ghc-regress/th/TH_unboxedSingleton.hs

blob: d932285870a91f10fcf0da508abb3e0a423d08cb (plain)

{-# LANGUAGE TemplateHaskell, UnboxedTuples #-}

module TH_unboxedSingleton where

f :: () -> (# Int #)
f () = $( [| (# 3 #) |] )