| 
									
										
										
										
											2009-07-28 15:38:10 -04:00
										 |  |  | ! Copyright (C) 2009 Maxim Savchenko, Slava Pestov. | 
					
						
							| 
									
										
										
										
											2009-07-28 12:20:28 -04:00
										 |  |  | ! 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
 | 
					
						
							| 
									
										
										
										
											2009-10-28 14:38:27 -04:00
										 |  |  |     suffix! ;
 |