extra/leb128/leb128-tests.factor

   1
   2 USING: leb128 tools.test ;
   3
   4 { B{ 0xe5 0x8e 0x26 } } [ 624485 >leb128 ] unit-test
   5 { 624485 } [ B{ 0xe5 0x8e 0x26 } leb128> ] unit-test
   6
   7 { B{ 0xc0 0xbb 0x78 } } [ -123456 >leb128 ] unit-test
   8 { -123456 } [ B{ 0xc0 0xbb 0x78 } leb128> ] unit-test