Fix assocs.lib tests

diff --git a/extra/assocs/lib/lib-tests.factor b/extra/assocs/lib/lib-tests.factor
new file mode 100644 (file)
index 0000000..0bf8270
--- /dev/null
+++ b/extra/assocs/lib/lib-tests.factor
@@ -0,0 +1,4 @@
+IN: assocs.lib.tests
+USING: assocs.lib tools.test vectors ;
+
+{ 1 1 } [ [ ?push ] histogram ] must-infer-as

diff --git a/extra/assocs/lib/lib.factor b/extra/assocs/lib/lib.factor
index 1c89c1eb16c3e485d3921312b615dd1fd3ac0013..14632df771f2403203b6f5dac9c77d05fb6a46f2 100755 (executable)
--- a/extra/assocs/lib/lib.factor
+++ b/extra/assocs/lib/lib.factor
@@ -41,4 +41,4 @@ IN: assocs.lib
 : histogram ( assoc quot -- assoc' )
     H{ } clone [
         swap [ change-at ] 2curry assoc-each
-    ] keep ;
+    ] keep ; inline