From e55af0ebfe6e14142e69fdab3044c3305256f690 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Thu, 20 Nov 2014 15:46:07 -0800
Subject: [PATCH] io.buffers: simplify test word.

---
 basis/io/buffers/buffers-tests.factor | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/basis/io/buffers/buffers-tests.factor b/basis/io/buffers/buffers-tests.factor
index 92d44c9126..ab8afc19b6 100644
--- a/basis/io/buffers/buffers-tests.factor
+++ b/basis/io/buffers/buffers-tests.factor
@@ -11,9 +11,7 @@ io.buffers kernel libc namespaces sequences strings tools.test ;
     dup length <buffer> [ buffer-set ] keep ;
 
 : buffer-read-all ( buffer -- byte-array )
-    [ [ pos>> ] [ ptr>> ] bi <displaced-alien> ]
-    [ buffer-length ] bi
-    memory>byte-array ;
+    [ buffer@ ] [ buffer-length ] bi memory>byte-array ;
 
 [ B{ } 65536 ] [
     65536 <buffer>