Add defgeneric for database-last-auto-increment-id

[clsql.git] / sql / generics.lisp

diff --git a/sql/generics.lisp b/sql/generics.lisp
index f022ff92947c6614368b9c61fad0e5295b54b7a3..b0a44725e766490248ab2373d41df8047e96af02 100644 (file)
--- a/sql/generics.lisp
+++ b/sql/generics.lisp
@@ -139,7 +139,11 @@ DATABASE-NULL-VALUE on the type of the slot."))
   )
 (defgeneric read-sql-value  (val type database db-type)
   )
+(defgeneric database-make-autoincrement-sequence (class slotdef database)
+  )
 
+(defgeneric database-last-auto-increment-id (database table column)
+  )
 
 ;; Generation of SQL strings from lisp expressions