haskell-tools-builtin-refactorings-1.0.1.1: test/ExtensionOrganizerTest/MagicHashTest/Name/InMatchLhs.hs

{-# LANGUAGE MagicHash #-}

module InMatchLhs where

f :: [a] -> [a]
f (a# : as#) = as#  {-* MagicHash, MagicHash, MagicHash *-}
f [a#] = [a#]       {-* MagicHash, MagicHash *-}