-- Hoogle documentation, generated by Haddock -- See Hoogle, http://www.haskell.org/hoogle/ -- | read/write binary file -- --
--   runghc -XQuasiQuotes exam.hs some.bmp out.bmp
--   
-- -- exam.hs: -- --
--   import File.Binary
--   import System.Environment
--   import Data.ByteString as BS
--   
--   main = do
--   [inf, outf] <- getArgs
--   
--   -- cnt <- readBinaryFile inf
--     cnt <- BS.readFile inf
--   let bmp = readBitmap cnt
--   print $ readBitmap cnt
--   
--   let out = writeBitmap bmp
--   	authorFirst = "Yoshikuni ",
--   	authorSecond = "Jujo      "
--   
--   -- writeBinaryFile outf out
--     BS.writeFile outf out
--   
--   [binary|
--   
--   Bitmap
--   
--   2: "BM"
--   4: fileSize
--   2: 0
--   2: 0
--   4: offset
--   4: 40
--   4: bitmapWidth
--   4: bitmapHeight
--   2: 1
--   2: bitsPerPixel
--   4: compressionMethod
--   4: imageSize
--   4: horizontalResolution
--   4: verticalResolution
--   4: numberOfColors
--   4: importantColors
--   4<(Int, Int, Int)>[numberOfColors]: colors
--   -- bitsPerPixel/8[imageSize*8/bitsPerPixel]: image
--   imageSize<ByteString>: image
--   10<String>: authorFirst
--   10<String>: authorSecond
--   
--   |]
--   
@package binary-file @version 0.6 module File.Binary readBinaryFile :: FilePath -> IO String writeBinaryFile :: FilePath -> String -> IO () binary :: QuasiQuoter