(in-package #:clsql-tests)
-
-#.(clsql:locally-enable-sql-reader-syntax)
+(clsql-sys:file-enable-sql-reader-syntax)
(def-dataset *ds-fddl*
(:setup (lambda ()
(deftest :fddl/attributes/5
(with-dataset *ds-fddl*
- (and (member (clsql:attribute-type [d] [alpha]) '(:datetime :timestamp :date)) t))
+ (and (member (clsql:attribute-type [d] [alpha])
+ '(:datetime :timestamp :date :smalldatetime)) t))
t)
(deftest :fddl/attributes/6
(nil (t nil) t (t nil)))
))
-
-#.(clsql:restore-sql-reader-syntax-state)