specialized-vectors: implement binary-object protocol for specialized-vectors

2010-06-08 13:40:07 -07:00 · 2010-06-08 13:40:07 -07:00 · 3602627ff2
parent 964327de67
commit 3602627ff2
1 changed files with 3 additions and 0 deletions
--- a/basis/specialized-vectors/specialized-vectors.factor
+++ b/basis/specialized-vectors/specialized-vectors.factor
@ -35,6 +35,9 @@ M: V >pprint-sequence ;

 M: V pprint* pprint-object ;

+M: V >c-ptr underlying>> underlying>> ; inline
+M: V byte-length [ length ] [ element-size ] bi * ; inline
+
 SYNTAX: V{ \ } [ >V ] parse-literal ;

 INSTANCE: V growable