haskell-tools-refactor-1.0.1.1: examples/Decl/SpecializePragma.hs

module Decl.SpecializePragma where

hammeredLookup :: Ord key => [(key, value)] -> key -> value
{-# SPECIALIZE hammeredLookup :: [(String, value)] -> String -> value, [(Char, value)] -> Char -> value #-}
hammeredLookup = undefined