summaryrefslogtreecommitdiff
path: root/testsuite/tests/perf/should_run/lazy-bs-alloc.hs
blob: 76850c67d0f1e2a53556c3e14ab1ac7b7245315b (plain)
1
2
3
4
5
6
7
8
9
module Main (main) where

import System.Environment (getArgs)
import qualified Data.ByteString.Lazy as L

main :: IO ()
main = do
    (file : _) <- getArgs
    L.readFile file >>= L.putStr