basis: ERROR: changes.

[factor.git] / basis / byte-arrays / hex / hex.factor

diff --git a/basis/byte-arrays/hex/hex.factor b/basis/byte-arrays/hex/hex.factor
index 41444b54e6a61502f768606b6987efb48b006cbc..a59c1762cae4f3b651c17a0d713cf216eeb93548 100644 (file)
--- a/basis/byte-arrays/hex/hex.factor
+++ b/basis/byte-arrays/hex/hex.factor
@@ -9,6 +9,6 @@ ERROR: odd-length-hex-string string ;
 SYNTAX: HEX{
     "}" parse-tokens concat
     [ blank? ] reject
-    dup length even? [ odd-length-hex-string ] unless
+    dup length even? [ throw-odd-length-hex-string ] unless
     2 <groups> [ hex> ] B{ } map-as
     suffix! ;