(in-package #:clsql-tests)
-#.(clsql:locally-enable-sql-reader-syntax)
+(clsql-sys:file-enable-sql-reader-syntax)
(defparameter artist1 nil)
(genre :accessor genre :initarg :genre :type (varchar 10) :db-constraints (:default "'Unknown'"))))
(defun initialize-ds-artists ()
- ; (start-sql-recording :type :both)
- ; (let ((*backend-warning-behavior*
- ; (if (member *test-database-type* '(:postgresql :postgresql-socket))
- ; :ignore
- ; :warn)))
(mapc #'clsql:create-view-from-class
'(artist))
(mapc #'clsql-sys:drop-sequence
(list "artist_artist_id_seq"))))))
-#.(clsql:restore-sql-reader-syntax-state)