steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

byte-length for struct-vectors

db4
Joe Groff 2009-07-07 15:30:41 -05:00
parent b42a1cc746
commit 84485d36ee
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
basis/struct-vectors/struct-vectors.factor
View File

@ -12,6 +12,7 @@ TUPLE: struct-vector
: <struct-vector> ( capacity c-type -- struct-vector ) : <struct-vector> ( capacity c-type -- struct-vector )
[ <struct-array> 0 ] keep struct-vector boa ; inline [ <struct-array> 0 ] keep struct-vector boa ; inline
M: struct-vector byte-length underlying>> byte-length ;
M: struct-vector new-sequence M: struct-vector new-sequence
[ c-type>> <struct-array> ] [ [ >fixnum ] [ c-type>> ] bi* ] 2bi [ c-type>> <struct-array> ] [ [ >fixnum ] [ c-type>> ] bi* ] 2bi
struct-vector boa ; struct-vector boa ;