core: Add the shuffler words but without primitives.

[factor.git] / basis / compression / snappy / snappy.factor

diff --git a/basis/compression/snappy/snappy.factor b/basis/compression/snappy/snappy.factor
index 590c9d4b713725f535c2e4878020f95044cf29cd..5437897f3259eb666becbdb35f1325e27c6b9180 100644 (file)
--- a/basis/compression/snappy/snappy.factor
+++ b/basis/compression/snappy/snappy.factor
@@ -29,4 +29,4 @@ PRIVATE>
     [ snappy_uncompressed_length check-snappy ] keep
     size_t deref
     n>outs
-    [ snappy_uncompress check-snappy ] 2keep drop >byte-array ;
+    [ snappy_uncompress check-snappy ] keepd >byte-array ;