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

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

diff --git a/basis/pack/pack.factor b/basis/pack/pack.factor
index 80e54dfb6a21630aabf850caf08cfbdcb55f7949..3007d5cb8fb93ecfa4128e15491124201dfd7445 100644 (file)
--- a/basis/pack/pack.factor
+++ b/basis/pack/pack.factor
@@ -123,7 +123,7 @@ PRIVATE>
 MACRO: unpack ( str -- quot )
     expand-pack-format
     [ [ ch>packed-length ] { } map-as start/end ]
-    [ [ unpack-table at '[ @ ] ] { } map-as ] bi
+    [ [ unpack-table at ] { } map-as ] bi
     [ '[ [ _ _ ] dip <slice> @ ] ] 3map
     '[ [ _ cleave ] output>array ] ;