basis/extra: removing '[ @ ] in favor of _ for fried quotations.

[factor.git] / extra / tools / image-analyzer / utils / utils.factor

diff --git a/extra/tools/image-analyzer/utils/utils.factor b/extra/tools/image-analyzer/utils/utils.factor
index d59d0f962dbb0535ecc215c4536e3926a1011db3..981a7e4658aed756af2b7fa0975f8abb34af427e 100644 (file)
--- a/extra/tools/image-analyzer/utils/utils.factor
+++ b/extra/tools/image-analyzer/utils/utils.factor
@@ -23,7 +23,7 @@ IN: tools.image-analyzer.utils
 
 : until-eof-reader ( reader-quot -- reader-quot' )
     '[
-        [ [ @ ] throw-on-eof ] [
+        [ _ throw-on-eof ] [
             dup stream-exhausted? [ drop f ] [ throw ] if
         ] recover
     ] ; inline