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