parsed -> suffix!, add append!

[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 5c381b7db0a07253de2d4d5367d102d5fcfb945e..ae9b9c8ba21f11ee60bc9ebfe2266dce25b6c444 100644 (file)
--- a/basis/byte-arrays/hex/hex.factor
+++ b/basis/byte-arrays/hex/hex.factor
@@ -7,4 +7,4 @@ SYNTAX: HEX{
     "}" parse-tokens "" join
     [ blank? not ] filter
     2 group [ hex> ] B{ } map-as
-    parsed ;
+    suffix! ;