From 03553d2bee192759bf0ebcf22c6908e2fd7d8d57 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Thu, 12 Jun 2008 05:13:42 -0500
Subject: [PATCH] Fix bootstrap error

---
 extra/io/buffers/buffers.factor | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/extra/io/buffers/buffers.factor b/extra/io/buffers/buffers.factor
index 042e3953f1..a65717fb86 100755
--- a/extra/io/buffers/buffers.factor
+++ b/extra/io/buffers/buffers.factor
@@ -89,7 +89,8 @@ HINTS: byte>buffer fixnum buffer ;
         over buffer-read
         swap buffer-pop
     ] [
-        buffer>> f
+        [ buffer-length ] keep
+        buffer-read f
     ] if* ;
 
 : buffer-until ( separators buffer -- byte-array separator )