From eda828169465529cb2bb05b21dbc1d237ad8470d Mon Sep 17 00:00:00 2001
From: erg <erg@k.internal.stack-effects.com>
Date: Sat, 12 Jul 2008 20:56:44 -0500
Subject: [PATCH] document conjoin

---
 core/sets/sets-docs.factor | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/core/sets/sets-docs.factor b/core/sets/sets-docs.factor
index 205d4d34bf..57d62f6480 100644
--- a/core/sets/sets-docs.factor
+++ b/core/sets/sets-docs.factor
@@ -38,6 +38,18 @@ HELP: adjoin
 }
 { $side-effects "seq" } ;
 
+HELP: conjoin
+{ $values { "elt" object } { "assoc" "an assoc" } }
+{ $description "Stores a key/value pair, both equal to " { $snippet "elt" } ", into the assoc." }
+{ $examples
+    { $example
+        "USING: kernel prettyprint sets ;"
+        "H{ } clone 1 over conjoin ."
+        "H{ { 1 1 } }"
+    }
+}
+{ $side-effects "assoc" } ;
+
 HELP: unique
 { $values { "seq" "a sequence" } { "assoc" "an assoc" } }
 { $description "Outputs a new assoc where the keys and values are equal." }