r9749: more documentation

[clsql.git] / doc / ref-fddl.xml

diff --git a/doc/ref-fddl.xml b/doc/ref-fddl.xml
index 422134396c9f6f0c3308afee632dac50eb1d5a28..755f6cea5c0a3871f7626746f0f5aee4ec850019 100644 (file)
--- a/doc/ref-fddl.xml
+++ b/doc/ref-fddl.xml
@@ -109,6 +109,18 @@
 => 
 (table-exists-p [foo]) 
 => T 
+
+(create-table [foo] '(([bar] integer :not-null :unique :primary-key) 
+                      ([baz] string :not-null :unique)))
+=> 
+(table-exists-p [foo])
+=> T
+
+(create-table [foo] '(([bar] integer :not-null) ([baz] string :not-null))
+              :constraints '("UNIQUE (bar,baz)" "PRIMARY KEY (bar)"))
+=> 
+(table-exists-p [foo])
+=> T
       </screen>
     </refsect1>
     <refsect1>