bit-vectors: splitting prettyprint dependency out.

diff --git a/basis/bit-vectors/bit-vectors.factor b/basis/bit-vectors/bit-vectors.factor
index a9b66ccbcba3b7b454c132fbe828689d698f4561..d589d35415154ecb6aa10d66ea3f414f86ea8cea 100644 (file)
--- a/basis/bit-vectors/bit-vectors.factor
+++ b/basis/bit-vectors/bit-vectors.factor
@@ -1,8 +1,7 @@
 ! Copyright (C) 2008, 2009 Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: arrays kernel kernel.private math sequences
-sequences.private growable bit-arrays prettyprint.custom
-parser accessors vectors.functor classes.parser ;
+USING: bit-arrays classes.parser growable kernel parser
+vectors.functor vocabs.loader ;
 IN: bit-vectors
 
 << "bit-vector" create-class-in \ bit-array \ <bit-array> define-vector >>
@@ -10,6 +9,5 @@ IN: bit-vectors
 SYNTAX: ?V{ \ } [ >bit-vector ] parse-literal ;
 
 M: bit-vector contract 2drop ;
-M: bit-vector >pprint-sequence ;
-M: bit-vector pprint-delims drop \ ?V{ \ } ;
-M: bit-vector pprint* pprint-object ;
+
+{ "bit-vectors" "prettyprint" } "bit-vectors.prettyprint" require-when

diff --git a/basis/bit-vectors/prettyprint/prettyprint.factor b/basis/bit-vectors/prettyprint/prettyprint.factor
new file mode 100644 (file)
index 0000000..d40a4ea
--- /dev/null
+++ b/basis/bit-vectors/prettyprint/prettyprint.factor
@@ -0,0 +1,7 @@
+USING: bit-vectors kernel prettyprint.custom ;
+IN: bit-vectors.prettyprint
+
+M: bit-vector >pprint-sequence ;
+M: bit-vector pprint-delims drop \ ?V{ \ } ;
+M: bit-vector pprint* pprint-object ;
+