basis: ERROR: changes.

[factor.git] / basis / pack / pack.factor

diff --git a/basis/pack/pack.factor b/basis/pack/pack.factor
index 8fe0e9f8a9a1efab7120850a0bd813e227ca8f7d..25ab4386d8ddc3077ee4bb2965058f60dd8cae9e 100644 (file)
--- a/basis/pack/pack.factor
+++ b/basis/pack/pack.factor
@@ -142,7 +142,7 @@ ERROR: packed-read-fail str bytes ;
 
 : read-packed-bytes ( str -- bytes )
     dup packed-length [ read dup length ] keep =
-    [ nip ] [ packed-read-fail ] if ; inline
+    [ nip ] [ throw-packed-read-fail ] if ; inline
 
 PRIVATE>