Specialized arrays, structs and other objects responding to the >c-ptr / byte-length...

[factor.git] / basis / io / buffers / buffers.factor

diff --git a/basis/io/buffers/buffers.factor b/basis/io/buffers/buffers.factor
index 23358d9a0e20c2fcfd61e331ba344da53ccc1434..ce5ad2c9a075401c22789c1347fb62c6ced72653 100644 (file)
--- a/basis/io/buffers/buffers.factor
+++ b/basis/io/buffers/buffers.factor
@@ -61,7 +61,7 @@ HINTS: n>buffer fixnum buffer ;
 
 : >buffer ( byte-array buffer -- )
     [ buffer-end byte-array>memory ]
-    [ [ length ] dip n>buffer ]
+    [ [ byte-length ] dip n>buffer ]
     2bi ;
 
 HINTS: >buffer byte-array buffer ;