diff options
| author | Michael D. Adams <t-madams@microsoft.com> | 2007-06-08 09:11:57 +0000 |
|---|---|---|
| committer | Michael D. Adams <t-madams@microsoft.com> | 2007-06-08 09:11:57 +0000 |
| commit | 4975f4a6222211028c8252782fea090e0a4e21a7 (patch) | |
| tree | 74bf9be4bb45c90dc63e1dc0f6862467a983a852 /compiler/codeGen/Bitmap.hs | |
| parent | 3b2fc9e1d79acff6a09dc1477d3e4bfe3bb3ad55 (diff) | |
| download | haskell-4975f4a6222211028c8252782fea090e0a4e21a7.tar.gz | |
Fixed a documentation error
Diffstat (limited to 'compiler/codeGen/Bitmap.hs')
| -rw-r--r-- | compiler/codeGen/Bitmap.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/codeGen/Bitmap.hs b/compiler/codeGen/Bitmap.hs index 93cf43f639..2e77014f53 100644 --- a/compiler/codeGen/Bitmap.hs +++ b/compiler/codeGen/Bitmap.hs @@ -38,7 +38,7 @@ chunkToBitmap chunk = foldr (.|.) 0 [ 1 `shiftL` n | (True,n) <- zip chunk [0..] ] -- | Make a bitmap where the slots specified are the /ones/ in the bitmap. --- eg. @[1,2,4], size 4 ==> 0xb@. +-- eg. @[0,1,3], size 4 ==> 0xb@. -- -- The list of @Int@s /must/ be already sorted. intsToBitmap :: Int -> [Int] -> Bitmap @@ -51,7 +51,7 @@ intsToBitmap size slots{- must be sorted -} where (these,rest) = span (<wORD_SIZE_IN_BITS) slots -- | Make a bitmap where the slots specified are the /zeros/ in the bitmap. --- eg. @[1,2,4], size 4 ==> 0x8@ (we leave any bits outside the size as zero, +-- eg. @[0,1,3], size 4 ==> 0x4@ (we leave any bits outside the size as zero, -- just to make the bitmap easier to read). -- -- The list of @Int@s /must/ be already sorted. |