File: th.hs

package info (click to toggle)
haskell-onetuple 0.4.2-1
  • links: PTS
  • area: main
  • in suites: forky, sid, trixie
  • size: 80 kB
  • sloc: haskell: 256; makefile: 5
file content (8 lines) | stat: -rw-r--r-- 172 bytes parent folder | download 
1
2
3
4
5
6
7
8
 
{-# LANGUAGE TemplateHaskell #-}
module Main where

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

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