Mercurial > pub > Impl
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; |