Desultory code maintenance for MS SQL identity support.

The code expects the keyword :auto-increment rather than a string nowadays
in order to process an extra column bits of information as meaning that we
want to cast to a serial/bigserial datatype.
This commit is contained in:
Dimitri Fontaine 2018-11-09 22:42:31 +01:00
parent 6c80404249
commit 6eaad0621b

View File

@ -125,7 +125,7 @@
field field
(declare (ignore schema)) ; FIXME (declare (ignore schema)) ; FIXME
(let* ((ctype (mssql-column-ctype field)) (let* ((ctype (mssql-column-ctype field))
(extra (when (mssql-column-identity field) "auto_increment")) (extra (when (mssql-column-identity field) :auto-increment))
(pgcol (pgcol
(apply-casting-rules table-name name type ctype default nullable extra))) (apply-casting-rules table-name name type ctype default nullable extra)))
;; the MS SQL driver smartly maps data to the proper CL type, but the ;; the MS SQL driver smartly maps data to the proper CL type, but the