hls-splice-plugin-1.0.0.2: test/testdata/TQQPat.hs

{-# LANGUAGE QuasiQuotes #-}
module TQQPat where
import QQ

f :: String -> IO ()
f [str|str|] = putStrLn "is str"
f _ = putStrLn " not str"