GeneralizedNewtypeDeriving拡張を使う。

{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE OverloadedStrings #-}

import Data.String (IsString)
import Data.Text (Text)

newtype A = A Text deriving (IsString, Show)

a :: A
a = "ahoge"  -- 文字列リテラル of A

main :: IO ()
main = print a

• Tweet
• 

この記事はこちらから修正リクエストを送ることができます。
Text(ByteString)をnewtypeした型でもOverloadedStringsできるよ。 - github
ゴミ箱ボタンの左にある、鉛筆ボタンを押してね！