basis/byte-arrays/hex/hex.factor

   1 ! Copyright (C) 2009 Maxim Savchenko, Slava Pestov.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: grouping lexer ascii parser sequences kernel math.parser ;
   4 IN: byte-arrays.hex
   5
   6 SYNTAX: HEX{
   7     "}" parse-tokens "" join
   8     [ blank? not ] filter
   9     2 group [ hex> ] B{ } map-as
  10     parsed ;