Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Fix minor alignment issue.

  • Loading branch information...
commit 1faf6aa901ddf23251bc7355587b15655c5d8b31 1 parent e072ed4
@jonathanknowles jonathanknowles authored
Showing with 4 additions and 4 deletions.
  1. +4 −4 Data/Vhd.hs
View
8 Data/Vhd.hs
@@ -185,10 +185,10 @@ create' filePath createParams =
-- | Reads raw data from a VHD chain.
read :: Vhd -> Word64 -> Word64 -> IO BL.ByteString
read vhd inclusiveLowerBoundBytes exclusiveUpperBoundBytes
- | lo < 0 = error "lower bound cannot be less than zero."
- | lo > hi = error "lower bound cannot be greater than upper bound."
- | hi > max = error "upper bound cannot be greater than VHD length."
- | otherwise = fmap (trim . BL.fromChunks) (sequence blocks)
+ | lo < 0 = error "lower bound cannot be less than zero."
+ | lo > hi = error "lower bound cannot be greater than upper bound."
+ | hi > max = error "upper bound cannot be greater than VHD length."
+ | otherwise = fmap (trim . BL.fromChunks) (sequence blocks)
where
(lo, hi) = (inclusiveLowerBoundBytes, exclusiveUpperBoundBytes)
max = vhdLength vhd
Please sign in to comment.
Something went wrong with that request. Please try again.