X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Fgenerics.lisp;h=b0a44725e766490248ab2373d41df8047e96af02;hp=f022ff92947c6614368b9c61fad0e5295b54b7a3;hb=c680432aea0177677ae2ee7b810a7404f7a05cab;hpb=cfb1303ed18a8a14554fbd506f52b176278ecd8e diff --git a/sql/generics.lisp b/sql/generics.lisp index f022ff9..b0a4472 100644 --- 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