diff options
Diffstat (limited to 'compiler/utils/Binary.hs')
| -rw-r--r-- | compiler/utils/Binary.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/utils/Binary.hs b/compiler/utils/Binary.hs index 503dd31690..b1337a1e14 100644 --- a/compiler/utils/Binary.hs +++ b/compiler/utils/Binary.hs @@ -449,7 +449,7 @@ putSLEB128 bh initial = go initial let !val' = val `unsafeShiftR` 7 let !signBit = testBit byte 6 let !done = - -- Unsigned value, val' == 0 and and last value can + -- Unsigned value, val' == 0 and last value can -- be discriminated from a negative number. ((val' == 0 && not signBit) || -- Signed value, |