annotate Lib/IMPL/Class/DirectPropertyInfo.pm @ 276:8a5da17d7ef9

*IMPL::Class refactoring property definition mechanism (incomplete).
author sergey
date Thu, 31 Jan 2013 17:37:44 +0400
parents
children 4ddb27ff4a0b
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
276
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
1 package IMPL::Class::DirectPropertyInfo;
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
2 use strict;
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
3
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
4 use IMPL::Const qw(:prop);
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
5 use IMPL::declare {
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
6 base => [
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
7 'IMPL::Class::PropertyInfo' => '@_'
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
8 ],
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
9 props => [
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
10 fieldName => PROP_RW,
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
11 directAccess => PROP_RW
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
12 ]
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
13 };
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
14
8a5da17d7ef9 *IMPL::Class refactoring property definition mechanism (incomplete).
sergey
parents:
diff changeset
15 1;