path: root/testsuite/tests/codeGen/should_compile/cg002.hs

module M where
import Data.Char
{-# INLINE f #-}
f = map ord . map chr