blob: e952dbd5a75c7883427ec305aae6ee045af159f3 (
plain)
1
2
3
4
5
6
7
8
|
{-# LANGUAGE TemplateHaskell #-}
module T14204 where
import GHC.StaticPtr
import Language.Haskell.TH
main :: IO ()
main = putStrLn (deRefStaticPtr $(pure (StaticE (LitE (StringL "wat")))))
|