lib/SQL/Translator/Parser/DDL/DBIx/Class.pm

   1 use MooseX::Declare;
   2 role SQL::Translator::Parser::DDL::DBIx::Class {
   3     use MooseX::Types::Moose qw();
   4     use MooseX::MultiMethods;
   5     use SQL::Translator::Constants qw(:sqlt_types :sqlt_constants);
   6     use SQL::Translator::Types qw(DBICSchema);
   7     use aliased 'SQL::Translator::Object::Column';
   8     use aliased 'SQL::Translator::Object::Constraint';
   9     use aliased 'SQL::Translator::Object::ForeignKey';
  10     use aliased 'SQL::Translator::Object::Index';
  11     use aliased 'SQL::Translator::Object::PrimaryKey';
  12     use aliased 'SQL::Translator::Object::Procedure';
  13     use aliased 'SQL::Translator::Object::Schema';
  14     use aliased 'SQL::Translator::Object::Table';
  15     use aliased 'SQL::Translator::Object::View';
  16
  17     multi method parse(Schema $data) { $data }
  18
  19     multi method parse(Str $data) {
  20     }
  21
  22     multi method parse(DBICSchema $data) { $data }
  23 }