From ddbffb6375329273175470b11642e8ef2b509281 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Wed, 26 Sep 2012 15:41:36 -0700
Subject: [PATCH] assocs.extras: adding "of".

---
 extra/assocs/extras/extras.factor | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/extra/assocs/extras/extras.factor b/extra/assocs/extras/extras.factor
index ac5150ad44..383da2802c 100644
--- a/extra/assocs/extras/extras.factor
+++ b/extra/assocs/extras/extras.factor
@@ -5,6 +5,8 @@ USING: arrays assocs assocs.private kernel math sequences ;
 
 IN: assocs.extras
 
+: of ( assoc key -- value ) swap at ; inline
+
 : assoc-harvest ( assoc -- assoc' )
     [ nip empty? not ] assoc-filter ; inline
 
-- 
2.34.1