Mercurial > pub > Impl
diff Lib/IMPL/Class/declare.pm @ 163:6ce1f052b90a
temp commit
author | wizard |
---|---|
date | Tue, 15 Mar 2011 02:32:42 +0300 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Lib/IMPL/Class/declare.pm Tue Mar 15 02:32:42 2011 +0300 @@ -0,0 +1,42 @@ +package IMPL::Class::declare; +use strict; +use IMPL::_core::version; + +sub import { + my ($self,$meta) = @_; +} + +1; + +__END__ + +=pod + +=head1 NAME + +=head1 SYNOPSIS + +=begin code + +package Foo; +use IMPL::Class::declare { + base => [qw(Bar)], + properties => [ + id => { get => public, set => protected, type => 'uuid', verify => \&_checkId }, + name => { get => public, set => public }, + info => { static => 1 } + ], + methods => [ + store => \&_storeImpl + get => \&_getImpl + ], + attributes => [ + new ClassId('class-foo-1') + ] +}; + +=end code + +=head1 DESCRIPTION + +=cut \ No newline at end of file