comparison Lib/IMPL/SQL/Types.pm @ 38:d660fb38b7cc

small fixes ORM shema to SQL schema transformation
author Sergey
date Mon, 23 Nov 2009 17:57:07 +0300
parents 0004faa276dc
children 32d2350fccf9
comparison
equal deleted inserted replaced
37:c2e7f7c96bcd 38:d660fb38b7cc
2 use strict; 2 use strict;
3 use warnings; 3 use warnings;
4 4
5 require Exporter; 5 require Exporter;
6 our @ISA = qw(Exporter); 6 our @ISA = qw(Exporter);
7 our @EXPORT_OK = qw(&Integer &Varchar &Float &Real &Text &Binary); 7 our @EXPORT_OK = qw(&Integer &Varchar &Float &Real &Text &Binary &DateTime);
8 8
9 require IMPL::SQL::Schema::Type; 9 require IMPL::SQL::Schema::Type;
10 10
11 sub Integer() { 11 sub Integer() {
12 return IMPL::SQL::Schema::Type->new(Name => 'INTEGER'); 12 return IMPL::SQL::Schema::Type->new(Name => 'INTEGER');
30 30
31 sub Binary() { 31 sub Binary() {
32 return IMPL::SQL::Schema::Type->new(Name => 'BINARY'); 32 return IMPL::SQL::Schema::Type->new(Name => 'BINARY');
33 } 33 }
34 34
35 sub DateTime() {
36 return IMPL::SQL::Schema::Type->new(Name => 'DATETIME');
37 }
38
35 1; 39 1;