X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F17sybase_asa_common.t;h=ef81520bf8c7f7c23f31c2f3335c317a4b266c9b;hb=c9cf9b4def5db80a79facea0eaba6dc32ac1e2c3;hp=db6eed382f72dd6b63e7a89d08d1db6cf125ce7b;hpb=760fd65c04b63c468e699dfd2f50bff7f6638a36;p=dbsrgits%2FDBIx-Class-Schema-Loader.git

diff --git a/t/17sybase_asa_common.t b/t/17sybase_asa_common.t
index db6eed3..ef81520 100644
--- a/t/17sybase_asa_common.t
+++ b/t/17sybase_asa_common.t
@@ -30,25 +30,25 @@ my $tester = dbixcsl_common_tests->new(
             password    => $odbc_password,
         } : ()),
     ],
+    loader_options => { preserve_case => 1 },
     data_types  => {
         # http://infocenter.sybase.com/help/topic/com.sybase.help.sqlanywhere.11.0.1/dbreference_en11/rf-datatypes.html
         #
         # Numeric types
-        # XXX rewrite low-precision floats to 'real'
         'bit'         => { data_type => 'bit' },
         'tinyint'     => { data_type => 'tinyint' },
         'smallint'    => { data_type => 'smallint' },
         'int'         => { data_type => 'integer' },
         'integer'     => { data_type => 'integer' },
         'bigint'      => { data_type => 'bigint' },
-        'float'       => { data_type => 'float' },
-        'real'        => { data_type => 'float' },
+        'float'       => { data_type => 'real' },
+        'real'        => { data_type => 'real' },
         'double'      => { data_type => 'double precision' },
         'double precision' =>
                          { data_type => 'double precision' },
 
-        'float(2)'    => { data_type => 'float' },
-        'float(24)'   => { data_type => 'float' },
+        'float(2)'    => { data_type => 'real' },
+        'float(24)'   => { data_type => 'real' },
         'float(25)'   => { data_type => 'double precision' },
         'float(53)'   => { data_type => 'double precision' },
 
@@ -94,7 +94,8 @@ my $tester = dbixcsl_common_tests->new(
         'timestamp'   => { data_type => 'timestamp' },
         # rewrite 'current timestamp' as 'current_timestamp'
         'timestamp default current timestamp'
-                      => { data_type => 'timestamp', default_value => \'current_timestamp' },
+                      => { data_type => 'timestamp', default_value => \'current_timestamp',
+                           original => { default_value => \'current timestamp' } },
         'time'        => { data_type => 'time' },
 
         # String Types
@@ -138,3 +139,4 @@ if (not ($dbd_sqlanywhere_dsn || $odbc_dsn)) {
 else {
     $tester->run_tests();
 }
+# vim:et sts=4 sw=4 tw=0: