basis: ERROR: changes.

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

diff --git a/basis/compression/snappy/snappy.factor b/basis/compression/snappy/snappy.factor
index 590c9d4b713725f535c2e4878020f95044cf29cd..f368ebec3b8d36d52a09d5a9987cdb7da8657195 100644 (file)
--- a/basis/compression/snappy/snappy.factor
+++ b/basis/compression/snappy/snappy.factor
@@ -9,7 +9,7 @@ ERROR: snappy-error error ;
 <PRIVATE
 
 : check-snappy ( ret -- )
-    dup SNAPPY_OK = [ drop ] [ snappy-error ] if ;
+    dup SNAPPY_OK = [ drop ] [ throw-snappy-error ] if ;
 
 : n>outs ( n -- byte-array size_t* )
     [ <byte-array> ] [ size_t <ref> ] bi ;