basis/byte-arrays/hex/hex-tests.factor

   1 ! Copyright (C) 2011 Doug Coleman.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: tools.test byte-arrays.hex eval ;
   4 IN: byte-arrays.hex.tests
   5
   6 [ B{ 16 0 8 0 } ] [ HEX{ 10 00 08 00 } ] unit-test
   7 [ B{ 255 255 15 255 255 255 } ] [ HEX{ ffff 0fff ffff } ] unit-test
   8
   9 [ "HEX{ ffff fff ffff }" parse-string ] must-fail
  10 [ "HEX{ 10 00 08 0 }" parse-string ] must-fail
  11 [ "HEX{ 1 00 00 80 }" parse-string ] must-fail