X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fgenerics.lisp;h=a8de765681f9521c8f8b5e0329c23ca1903f3440;hb=fa66cd5b2b5b57865a78d28c5f5ee2ba142814f1;hp=eabb8e5336f1fb07b745ca3271d59c1b6a1d373f;hpb=967266c94b00f91e5967b8330fe2b9134b0c0447;p=clsql.git

diff --git a/sql/generics.lisp b/sql/generics.lisp
index eabb8e5..a8de765 100644
--- a/sql/generics.lisp
+++ b/sql/generics.lisp
@@ -24,4 +24,34 @@
 (defgeneric output-sql-hash-key (arg database)
   )
 
+(defgeneric collect-table-refs (sql)
+  )
+(defgeneric database-output-sql (arg database)
+  )
+(defgeneric database-constraint-description  (constraint database)
+  )
+(defgeneric database-pkey-constraint  (class database)
+  )
+(defgeneric database-constraint-statement  (constraints database)
+  )
+(defgeneric %install-class  (class database)
+  )
+(defgeneric database-generate-column-definition  (class slotdef database)
+  )
+(defgeneric update-slot-from-db  (instance slotdef val)
+  )
+(defgeneric key-value-from-db  (slotdef value database)
+  )
+(defgeneric get-slot-values-from-view  (obj slotdeflist values)
+  )
+(defgeneric database-output-sql-as-type  (type val database)
+  )
+(defgeneric read-sql-value  (val type database)
+  )
+(defgeneric postinitialize  (object)
+  )
+(defgeneric add-to-relation  (target slot-name value)
+  )
+(defgeneric remove-from-relation  (target slot-name value)
+  )