X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=tests%2Ftest-fddl.lisp;h=83eada9f1074e699b6e584d90360be9e884be957;hp=04d310ec86454fadfe7e22463bc76c10ff2e3f8c;hb=151c009059521769a44ec35dfdceb86d5373af99;hpb=ac8069e4f04d9c4faa41664cb8ee1ec83df0e67f

diff --git a/tests/test-fddl.lisp b/tests/test-fddl.lisp
index 04d310e..83eada9 100644
--- a/tests/test-fddl.lisp
+++ b/tests/test-fddl.lisp
@@ -16,8 +16,7 @@
 
 
 (in-package #:clsql-tests)
-
-#.(clsql:locally-enable-sql-reader-syntax)
+(clsql-sys:file-enable-sql-reader-syntax)
 
 (def-dataset *ds-fddl*
   (:setup (lambda ()
@@ -169,7 +168,8 @@ B varchar(32))")
     (with-dataset *ds-fddl*
       (multiple-value-bind (type length scale nullable)
 	  (clsql:attribute-type [c] [alpha])
-	(values (clsql-sys:in type :varchar :varchar2) length scale nullable)))
+	(values (clsql-sys:in type :varchar :varchar2 :nvarchar)
+                length scale nullable)))
   t 30 nil 1)
 
 (deftest :fddl/attributes/5
@@ -450,5 +450,3 @@ B varchar(32))")
   (nil (t nil) t (t nil)))
 
   ))
-
-#.(clsql:restore-sql-reader-syntax-state)