]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/io/streams/limited/limited.factor
basis: ERROR: changes.
[factor.git] / basis / io / streams / limited / limited.factor
index 1455c8fa8c2812cedaf4e5efa11f35687fd2734b..087281667afc9e2a410121c624b91f24989294d7 100644 (file)
@@ -62,11 +62,11 @@ ERROR: limit-exceeded n stream ;
 
 : check-count-bounds ( n stream -- n stream )
     dup [ count>> ] [ limit>> ] bi >
-    [ limit-exceeded ] when ;
+    [ throw-limit-exceeded ] when ;
 
 : check-current-bounds ( n stream -- n stream )
     dup [ current>> ] [ start>> ] bi <
-    [ limit-exceeded ] when ;
+    [ throw-limit-exceeded ] when ;
 
 : adjust-limited-read ( n stream -- n stream )
     dup start>> [