haskell-tools-builtin-refactorings-1.0.0.0: 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