HaskellのI/O バイナリデータの操作 ByteStringを使ってバイナリデータを操作する Int型に変換、unpack関数、Data.ByteString.Char8モジュール
入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)のUNIT4(HaskellのI/O)、LESSON25(バイナリデータの操作)、25.1(ByteStringを使ってバイナリデータを操作する)、クイックチェック 25-1の解答を求めてみる。
コード
{-# LANGUAGE OverloadedStrings #-}
import qualified Data.ByteString.Char8 as BC
bcInt :: BC.ByteString
bcInt = "6"
bcToInt :: BC.ByteString -> Int
bcToInt b = read $ BC.unpack b
n :: Int
n = bcToInt bcInt
main :: IO ()
main = do
print n
入出力結果(Terminal, Zsh)
% runghc sample01.hs
6
% ghci
GHCi, version 8.10.7: https://www.haskell.org/ghc/ :? for help
Loaded package environment from /Users/…/.ghc/x86_64-darwin-8.10.7/environments/default
macro 'doc' overwrites builtin command. Use ':def!' to overwrite.
(0.00 secs, 0 bytes)
(0.00 secs, 0 bytes)
Loaded GHCi configuration from /Users/…/.ghc/ghci.conf
Prelude
λ> :load sample01.hs
[1 of 1] Compiling Main ( sample01.hs, interpreted )
Ok, one module loaded.
(0.07 secs,)
*Main
λ> bcToInt bcInt
6
it :: Int
(0.02 secs, 66,496 bytes)
*Main
λ> :quit
Leaving GHCi.
%