diff --git a/src/sources/sqlite/sqlite-cast-rules.lisp b/src/sources/sqlite/sqlite-cast-rules.lisp index 0192a66..eaffe9e 100644 --- a/src/sources/sqlite/sqlite-cast-rules.lisp +++ b/src/sources/sqlite/sqlite-cast-rules.lisp @@ -107,6 +107,12 @@ (string= "CURRENT TIMESTAMP" default))) :current-timestamp) + ((and (stringp default) + ;; we don't care about spaces in that expression + (string-equal "datetime('now','localtime')" + (remove #\Space default))) + :current-timestamp) + ((and (stringp default) (string-equal "current_date" default)) :current-date) diff --git a/test/sqlite/sqlite.db b/test/sqlite/sqlite.db index ff6df4e..3db3a1d 100644 Binary files a/test/sqlite/sqlite.db and b/test/sqlite/sqlite.db differ