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

[factor.git] / basis / stack-checker / values / values.factor

diff --git a/basis/stack-checker/values/values.factor b/basis/stack-checker/values/values.factor
index 43f054d90f550ff22414599e1634aab0f14a96fa..72a79a3f718de37746836d3e7c1dd664123f3964 100644 (file)
--- a/basis/stack-checker/values/values.factor
+++ b/basis/stack-checker/values/values.factor
@@ -122,7 +122,7 @@ M: f (literal) current-word get bad-macro-input ;
 GENERIC: known>callable ( known -- quot )
 
 : ?@ ( x -- y )
-    dup callable? [ drop [ @ ] ] unless ;
+    dup callable? [ drop _ ] unless ;
 
 M: object known>callable drop \ _ ;