id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc
19	Another Int Bug	dom	dom	"If we ever get something with more than {{{2^31 - 1}}} octets, this will give the
wrong result silently :-( The fix should be in binary get. I recall there
was a version in which this was Int64 or Integer but it's not worth
researching now.

{{{
decodeUInt :: (MonadError [Char] (t1 BG.BitGet), MonadTrans t1) => t1
BG.BitGet Integer
decodeUInt =
   do o <- octets
      return (from2sComplement o)
   where
      chunkBy8 = let compose = (.).(.) in lift `compose` (flip (const
(BG.getLeftByteString . fromIntegral . (*8))))
      octets   = decodeLargeLengthDeterminant chunkBy8 undefined
}}}

"	defect	new	major		component1