OneTuple-0.3.1: test/th.hs

{-# LANGUAGE TemplateHaskell #-}
module Main where

import Data.Tuple.Solo
import Data.Tuple.Solo.TH (tupE)

main :: IO ()
main = print $ Solo 'x' == $(tupE [[| 'x' |]])