@@ -241,31 +241,51 @@ int_test_() ->
241241 end },
242242 {" int 8" ,
243243 fun () ->
244- Term = - 128 ,
244+ Term = - 33 ,
245245 Binary = pack (Term ),
246246 ? assertEqual (2 , byte_size (Binary )),
247- ? assertEqual ({ok , Term }, unpack (Binary ))
247+ ? assertEqual ({ok , Term }, unpack (Binary )),
248+
249+ Term2 = - 128 ,
250+ Binary2 = pack (Term2 ),
251+ ? assertEqual (2 , byte_size (Binary2 )),
252+ ? assertEqual ({ok , Term2 }, unpack (Binary2 ))
248253 end },
249254 {" int 16" ,
250255 fun () ->
251- Term = - 16#8000 ,
256+ Term = - 129 ,
252257 Binary = pack (Term ),
253258 ? assertEqual (3 , byte_size (Binary )),
254- ? assertEqual ({ok , Term }, unpack (Binary ))
259+ ? assertEqual ({ok , Term }, unpack (Binary )),
260+
261+ Term2 = - 16#8000 ,
262+ Binary2 = pack (Term2 ),
263+ ? assertEqual (3 , byte_size (Binary2 )),
264+ ? assertEqual ({ok , Term2 }, unpack (Binary2 ))
255265 end },
256266 {" int 32" ,
257267 fun () ->
258- Term = - 16#80000000 ,
268+ Term = - 16#8001 ,
259269 Binary = pack (Term ),
260270 ? assertEqual (5 , byte_size (Binary )),
261- ? assertEqual ({ok , Term }, unpack (Binary ))
271+ ? assertEqual ({ok , Term }, unpack (Binary )),
272+
273+ Term2 = - 16#80000000 ,
274+ Binary2 = pack (Term2 ),
275+ ? assertEqual (5 , byte_size (Binary2 )),
276+ ? assertEqual ({ok , Term2 }, unpack (Binary2 ))
262277 end },
263278 {" int 64" ,
264279 fun () ->
265280 Term = - 16#80000001 ,
266281 Binary = pack (Term ),
267282 ? assertEqual (9 , byte_size (Binary )),
268- ? assertEqual ({ok , Term }, unpack (Binary ))
283+ ? assertEqual ({ok , Term }, unpack (Binary )),
284+
285+ Term2 = - 16#8000000000000000 ,
286+ Binary2 = pack (Term2 ),
287+ ? assertEqual (9 , byte_size (Binary2 )),
288+ ? assertEqual ({ok , Term2 }, unpack (Binary2 ))
269289 end }
270290 ].
271291
0 commit comments