Skip to content

Instantly share code, notes, and snippets.

module Main where
import System.IO.MMap
import qualified Data.ByteString.Lazy as BL
somedata:: IO BL.ByteString
somedata = mmapFileByteStringLazy "some.data" Nothing
main = somedata >>= return . show . BL.last >>= putStrLn
{- some.data file is 1625424 bytes long (in case that matters)