X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Fgenerics.lisp;h=b0a44725e766490248ab2373d41df8047e96af02;hp=6d2e57043c390b1f8cc29de3528062282d18038e;hb=c680432aea0177677ae2ee7b810a7404f7a05cab;hpb=9eb15c4b2f22f73c9a0692921904bb20b5d60673 diff --git a/sql/generics.lisp b/sql/generics.lisp index 6d2e570..b0a4472 100644 --- a/sql/generics.lisp +++ b/sql/generics.lisp @@ -142,6 +142,9 @@ DATABASE-NULL-VALUE on the type of the slot.")) (defgeneric database-make-autoincrement-sequence (class slotdef database) ) +(defgeneric database-last-auto-increment-id (database table column) + ) + ;; Generation of SQL strings from lisp expressions (defgeneric output-sql (expr database)