X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Fgenerics.lisp;h=2208b8d10cc93bdca90716fddbd1ea4092460a60;hp=decc005de33aaba69ae897ebf9046de5a1625f1d;hb=bad0cc74f5574b40b8f1f7338dee3cd7bdf56228;hpb=4a30248613bca9864145306a00bb801cf5348017 diff --git a/sql/generics.lisp b/sql/generics.lisp index decc005..2208b8d 100644 --- a/sql/generics.lisp +++ b/sql/generics.lisp @@ -139,7 +139,8 @@ 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) + ) ;; Generation of SQL strings from lisp expressions