Fixed "database_events."

[dbsrgits/SQL-Translator.git] / t / 43xml-to-db2.t

diff --git a/t/43xml-to-db2.t b/t/43xml-to-db2.t
index c4bff92..223daf3 100644 (file)
--- a/t/43xml-to-db2.t
+++ b/t/43xml-to-db2.t
@@ -4,12 +4,12 @@ use strict;
 use FindBin qw/$Bin/;
 use Test::More;
 use Test::SQL::Translator;
+use Test::Differences;
 use Test::Exception;
 use Data::Dumper;
 use SQL::Translator;
 use SQL::Translator::Schema::Constants;
 
-
 BEGIN {
     maybe_plan(1, 'SQL::Translator::Parser::XML::SQLFairy',
               'SQL::Translator::Producer::DB2');
@@ -32,22 +32,32 @@ my $sql = $sqlt->translate(
     filename => $xmlfile,
 ) or die $sqlt->error;
 
-is($sql, << "SQL");
+eq_or_diff($sql, << "SQL");
 DROP TABLE Basic;
 
+CREATE TABLE Basic (
+  id INTEGER GENERATED BY DEFAULT AS IDENTITY (START WITH 1, INCREMENT BY 1) NOT NULL,
+  title VARCHAR(100) NOT NULL DEFAULT 'hello',
+  description VARCHAR(0) DEFAULT '',
+  email VARCHAR(255),
+  explicitnulldef VARCHAR(0),
+  explicitemptystring VARCHAR(0) DEFAULT '',
+  emptytagdef VARCHAR(0) DEFAULT '',
+  another_id INTEGER DEFAULT 2,
+  timest TIMESTAMP,
+  PRIMARY KEY (id),
+  CONSTRAINT emailuniqueindex UNIQUE (email)
+);
+
+DROP TABLE Another;
 
-CREATE TABLE Basic                                                                                                                       (
-id                        INTEGER GENERATED BY DEFAULT AS IDENTITY NOT NULL,
-title                     VARCHAR(100) NOT NULL DEFAULT 'hello',
-description               VARCHAR(0) DEFAULT '',
-email                     VARCHAR(255),
-explicitnulldef           VARCHAR(0),
-explicitemptystring       VARCHAR(0) DEFAULT '',
-emptytagdef               VARCHAR(0) DEFAULT '',
-CONSTRAINT emailuniqueindex UNIQUE (email)   ,
- PRIMARY KEY(id)
+CREATE TABLE Another (
+  id INTEGER GENERATED BY DEFAULT AS IDENTITY (START WITH 1, INCREMENT BY 1) NOT NULL,
+  PRIMARY KEY (id)
 );
 
+ALTER TABLE Basic ADD FOREIGN KEY (another_id) REFERENCES Another(id);
+
 CREATE INDEX titleindex ON Basic ( title );
 
 CREATE VIEW email_list AS