diff --git a/basis/compression/inflate/inflate.factor b/basis/compression/inflate/inflate.factor
index 3fe07b5994..7cb43ac68f 100755
--- a/basis/compression/inflate/inflate.factor
+++ b/basis/compression/inflate/inflate.factor
@@ -75,18 +75,20 @@ CONSTANT: length-table
         19 23 27 31
         35 43 51 59
         67 83 99 115
-        131 163 195 227
+        131 163 195 227 258
     }
 
 CONSTANT: dist-table
-    { 1 2 3 4 
-      5 7 9 13 
-      17 25 33 49
-      65 97 129 193
-      257 385 513 769
-      1025 1537 2049 3073
-      4097 6145 8193 12289
-      16385 24577 }
+    {
+        1 2 3 4 
+        5 7 9 13 
+        17 25 33 49
+        65 97 129 193
+        257 385 513 769
+        1025 1537 2049 3073
+        4097 6145 8193 12289
+        16385 24577
+    }
 
 : nth* ( n seq -- elt )
     [ length 1- swap - ] [ nth ] bi ;
@@ -156,7 +158,7 @@ CONSTANT: dist-table
     [ 1 bitstream bs:read 0 = ]
     [
         bitstream
-        2 bitstream bs:read ! B
+        2 bitstream bs:read
         { 
             { 0 [ inflate-raw ] }
             { 1 [ inflate-static ] }
@@ -206,6 +208,5 @@ PRIVATE>
 
 : zlib-inflate ( bytes -- bytes )
     bs:<lsb0-bit-reader>
-    [ check-zlib-header ]
-    [ inflate-loop ] bi
+    [ check-zlib-header ] [ inflate-loop ] bi
     inflate-lz77 ;