1 2 3 4 5 6
{-# LANGUAGE TemplateHaskell #-} {-# OPTIONS_GHC -Wincomplete-patterns #-} module T19709d where $( case tail "hello" of "hello" -> return [] )