adiff/src/Substr.hs

8 lines
139 B
Haskell

module Substr where
import qualified Data.ByteString as B
import Types
substr :: Int -> Int -> BS -> BS
substr b l = B.take l . B.drop b