! 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
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
--- /dev/null
+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 ;