    {-# LANGUAGE TemplateHaskell #-}
    module TemplateHaskellSplices where

    import TemplateHaskellQuasiquotes

    $([(Double, String)] -> [(Int, String)]
    aDecl)

    foo :: Integer
    foo = Integer -> Integer
    forall a. a -> a
    id $(Double
    Double -> Integer
    Integer -> Integer -> Integer
    forall a. Floating a => a
    forall a. Num a => a -> a -> a
    forall a b. (RealFrac a, Integral b) => a -> b
    + :: forall a. Num a => a -> a -> a
    round :: forall a b. (RealFrac a, Integral b) => a -> b
    pi :: forall a. Floating a => a
    anExpression2)