X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F08postgres-to-mysql.t;h=6db064ad0bea319d8dbc8680a2e5fb24c7cbe06e;hb=e3fc8761f542cc5c09af53bf155492fa6bd96c90;hp=fc4a4980b60f30245e77638243ed8c80741a0042;hpb=e4a9818dd51f752673818986e0419f25ad9f9357;p=dbsrgits%2FSQL-Translator.git diff --git a/t/08postgres-to-mysql.t b/t/08postgres-to-mysql.t index fc4a498..6db064a 100644 --- a/t/08postgres-to-mysql.t +++ b/t/08postgres-to-mysql.t @@ -8,14 +8,14 @@ use Data::Dumper; use Test::SQL::Translator qw(maybe_plan); BEGIN { - maybe_plan(1, + maybe_plan(1, 'SQL::Translator::Parser::MySQL', 'SQL::Translator::Producer::PostgreSQL'); } my $create = q| --- The cvterm module design is based on the ontology +-- The cvterm module design is based on the ontology -- ================================================ -- TABLE: cv @@ -48,7 +48,7 @@ create table cvterm ( ); create index cvterm_idx1 on cvterm (cv_id); -- the primary dbxref for this term. Other dbxrefs may be cvterm_dbxref --- The unique key on termname, termtype_id ensures that all terms are +-- The unique key on termname, termtype_id ensures that all terms are -- unique within a given cv @@ -59,11 +59,11 @@ COMMENT ON COLUMN cvterm.cv_id IS 'The cv/ontology/namespace to which this cvterm belongs'; COMMENT ON COLUMN cvterm.name IS 'A concise human-readable name describing the meaning of the cvterm'; -COMMENT ON COLUMN cvterm.definition IS +COMMENT ON COLUMN cvterm.termdefinition IS 'A human-readable text definition'; COMMENT ON COLUMN cvterm.dbxref_id IS 'A human-readable text definition'; -COMMENT ON INDEX cvterm_c1 IS +COMMENT ON INDEX cvterm_c1 IS 'the OBO identifier is globally unique'; @@ -125,7 +125,7 @@ create table cvtermsynonym ( unique(cvterm_id, termsynonym) ); --- The table "cvterm_synonym" doesn't exist, so +-- The table "cvterm_synonym" doesn't exist, so -- creating an index on it screws things up! -- create index cvterm_synonym_idx1 on cvterm_synonym (cvterm_id); @@ -146,6 +146,23 @@ create table cvterm_dbxref ( create index cvterm_dbxref_idx1 on cvterm_dbxref (cvterm_id); create index cvterm_dbxref_idx2 on cvterm_dbxref (dbxref_id); +-- ================================================ +-- TABLE: cvterm_geom +-- ================================================ + +create table cvterm_geom ( + cvterm_geom_id serial not null, + primary key (cvterm_geom_id), + cvterm_id int not null, + foreign key (cvterm_id) references cvterm (cvterm_id), + cvterm_geom geometry, + constraint "enforce_dims_cvterm_geom" CHECK ((st_ndims(cvterm_geom) = 2)), + constraint "enforce_srid_cvterm_geom" CHECK ((st_srid(cvterm_geom) = -1)), + constraint "enforce_geotype_cvterm_geom" CHECK ((geometrytype(cvterm_geom) = 'POINT'::text OR cvterm_geom IS NULL)), + unique(cvterm_id) +); + + |; my $tr = SQL::Translator->new( @@ -153,4 +170,4 @@ my $tr = SQL::Translator->new( producer => "MySQL" ); -ok( $tr->translate(\$create), 'Translate PG2My' ); +ok( $tr->translate(\$create), 'Translate PG2My' ) or diag($tr->error);