X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Fexpressions.lisp;h=ace360378f240fb47b0bf126466d2383b5412b5b;hp=50aa5d1fd478942ec8dfdd6eebd15f6d1bb4d252;hb=d0b5c8c2a14929792d2d5818b57db27cae4484b2;hpb=f7a356bb4c11d062eeeb5d4aaf4e187a3cb15a27;ds=sidebyside diff --git a/sql/expressions.lisp b/sql/expressions.lisp index 50aa5d1..ace3603 100644 --- a/sql/expressions.lisp +++ b/sql/expressions.lisp @@ -841,7 +841,9 @@ uninclusive, and the args from that keyword to the end." (cons (symbol-name-default-case "NOT") "NOT") (cons (symbol-name-default-case "NULL") "NULL") (cons (symbol-name-default-case "PRIMARY") "PRIMARY") - (cons (symbol-name-default-case "KEY") "KEY"))) + (cons (symbol-name-default-case "KEY") "KEY") + (cons (symbol-name-default-case "AUTO-INCREMENT") "AUTO_INCREMENT") + (cons (symbol-name-default-case "UNIQUE") "UNIQUE"))) ;; ;; Convert type spec to sql syntax