11 lines
		
	
	
		
			311 B
		
	
	
	
		
			Factor
		
	
	
			
		
		
	
	
			11 lines
		
	
	
		
			311 B
		
	
	
	
		
			Factor
		
	
	
! Copyright (C) 2009 Maxim Savchenko, Slava Pestov.
 | 
						|
! See http://factorcode.org/license.txt for BSD license.
 | 
						|
USING: grouping lexer ascii parser sequences kernel math.parser ;
 | 
						|
IN: byte-arrays.hex
 | 
						|
 | 
						|
SYNTAX: HEX{
 | 
						|
    "}" parse-tokens "" join
 | 
						|
    [ blank? not ] filter
 | 
						|
    2 group [ hex> ] B{ } map-as
 | 
						|
    suffix! ;
 |