Move more normalization changes to preprocess_schema

[dbsrgits/SQL-Translator.git] / t / 16xml-parser.t

diff --git a/t/16xml-parser.t b/t/16xml-parser.t
index 3d1c568..05c9ad8 100644 (file)
--- a/t/16xml-parser.t
+++ b/t/16xml-parser.t
@@ -27,7 +27,7 @@ use constant DEBUG => (exists $opt{d} ? 1 : 0);
 #=============================================================================
 
 BEGIN {
-    maybe_plan(150, 'SQL::Translator::Parser::XML::SQLFairy');
+    maybe_plan(204, 'SQL::Translator::Parser::XML::SQLFairy');
 }
 
 my $testschema = "$Bin/data/xml/schema.xml";
@@ -57,11 +57,11 @@ schema_ok( $scma, {
     tables => [
         {
             name => "Basic",
+            options => [ { ENGINE => 'InnoDB' } ],
             extra => {
                 foo => "bar",
                 hello => "world",
                 bar => "baz",
-                mysql_table_type => "InnoDB",
             },
             fields => [
                 {
@@ -105,12 +105,14 @@ schema_ok( $scma, {
                     data_type => "varchar",
                     default_value => undef,
                     is_nullable => 1,
+                    size => 255,
                 },
                 {
                     name => "explicitemptystring",
                     data_type => "varchar",
                     default_value => "",
                     is_nullable => 1,
+                    size => 255,
                 },
                 {
                     name => "emptytagdef",
@@ -118,6 +120,21 @@ schema_ok( $scma, {
                     default_value => "",
                     is_nullable => 1,
                     comments => "Hello emptytagdef",
+                    size => 255,
+                },
+                {
+                    name => "another_id",
+                    data_type => "int",
+                    size => "10",
+                    default_value => 2,
+                    is_nullable => 1,
+                    is_foreign_key => 1,
+                },
+                {
+                    name => "timest",
+                    data_type => "timestamp",
+                    size => "0",
+                    is_nullable => 1,
                 },
             ],
             constraints => [
@@ -134,7 +151,14 @@ schema_ok( $scma, {
                     name => 'emailuniqueindex',
                     type => UNIQUE,
                     fields => ["email"],
-                }
+                },
+                {
+                    type => FOREIGN_KEY,
+                    fields => ["another_id"],
+                    reference_table => "Another",
+                    reference_fields => ["id"],
+                    name => 'Basic_fk'
+                },
             ],
             indices => [
                 {
@@ -147,7 +171,27 @@ schema_ok( $scma, {
                     },
                 },
             ],
-        } # end table Basic
+        }, # end table Basic
+        {
+            name => "Another",
+            extra => {
+                foo => "bar",
+                hello => "world",
+                bar => "baz",
+            },
+            options => [ { ENGINE => 'InnoDB' } ],
+            fields => [
+                {
+                    name => "id",
+                    data_type => "int",
+                    default_value => undef,
+                    is_nullable => 0,
+                    size => 10,
+                    is_primary_key => 1,
+                    is_auto_increment => 1,
+                },
+            ],
+        }, # end table Another
     ], # end tables
 
     views => [