bit-arrays: splitting prettyprint dependency out.
							parent
							
								
									76f561ba3c
								
							
						
					
					
						commit
						f4c9e52876
					
				| 
						 | 
				
			
			@ -1,8 +1,8 @@
 | 
			
		|||
! Copyright (C) 2007, 2011 Slava Pestov.
 | 
			
		||||
! See http://factorcode.org/license.txt for BSD license.
 | 
			
		||||
USING: accessors alien alien.accessors byte-arrays fry io.binary
 | 
			
		||||
kernel kernel.private locals math math.bitwise parser
 | 
			
		||||
prettyprint.custom sequences sequences.private ;
 | 
			
		||||
kernel kernel.private locals math math.bitwise parser sequences
 | 
			
		||||
sequences.private vocabs.loader ;
 | 
			
		||||
IN: bit-arrays
 | 
			
		||||
 | 
			
		||||
TUPLE: bit-array
 | 
			
		||||
| 
						 | 
				
			
			@ -98,6 +98,4 @@ SYNTAX: ?{ \ } [ >bit-array ] parse-literal ;
 | 
			
		|||
 | 
			
		||||
INSTANCE: bit-array sequence
 | 
			
		||||
 | 
			
		||||
M: bit-array pprint-delims drop \ ?{ \ } ;
 | 
			
		||||
M: bit-array >pprint-sequence ;
 | 
			
		||||
M: bit-array pprint* pprint-object ;
 | 
			
		||||
{ "bit-arrays" "prettyprint" } "bit-arrays.prettyprint" require-when
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -0,0 +1,6 @@
 | 
			
		|||
USING: bit-arrays kernel prettyprint.custom ;
 | 
			
		||||
IN: bit-arrays.prettyprint
 | 
			
		||||
 | 
			
		||||
M: bit-array pprint-delims drop \ ?{ \ } ;
 | 
			
		||||
M: bit-array >pprint-sequence ;
 | 
			
		||||
M: bit-array pprint* pprint-object ;
 | 
			
		||||
		Loading…
	
		Reference in New Issue