apply-refact-0.1.0.0: tests/examples/Test1.hs

import Prelude hiding(readFile)             
import Data.ByteString.Char8(readFile)      
test = readFile "foo" >>= putStr