Mercurial > pub > Impl

annotate lib/IMPL/Class/ClassBuilder.pm @ 423:60c2892a577c ref20150831

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
working on base class system
author cin
date Mon, 02 Apr 2018 07:35:23 +0300
parents
children c27434cdd611
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
423
60c2892a577c working on base class system
cin
parents:
diff changeset
1 package IMPL::Class::ClassBuilder;
60c2892a577c working on base class system
cin
parents:
diff changeset
2 use strict;
60c2892a577c working on base class system
cin
parents:
diff changeset
3
60c2892a577c working on base class system
cin
parents:
diff changeset
4 sub new {
60c2892a577c working on base class system
cin
parents:
diff changeset
5 my ($self, $class) = @_;
60c2892a577c working on base class system
cin
parents:
diff changeset
6
60c2892a577c working on base class system
cin
parents:
diff changeset
7 return bless \$class, $self
60c2892a577c working on base class system
cin
parents:
diff changeset
8 }
60c2892a577c working on base class system
cin
parents:
diff changeset
9
60c2892a577c working on base class system
cin
parents:
diff changeset
10 sub DefineProperty {
60c2892a577c working on base class system
cin
parents:
diff changeset
11 my ($self, $pi) = @_;
60c2892a577c working on base class system
cin
parents:
diff changeset
12 }
60c2892a577c working on base class system
cin
parents:
diff changeset
13
60c2892a577c working on base class system
cin
parents:
diff changeset
14 sub DefineField {
60c2892a577c working on base class system
cin
parents:
diff changeset
15
60c2892a577c working on base class system
cin
parents:
diff changeset
16 }
60c2892a577c working on base class system
cin
parents:
diff changeset
17
60c2892a577c working on base class system
cin
parents:
diff changeset
18 sub DefineMethod {
60c2892a577c working on base class system
cin
parents:
diff changeset
19
60c2892a577c working on base class system
cin
parents:
diff changeset
20 }
60c2892a577c working on base class system
cin
parents:
diff changeset
21
60c2892a577c working on base class system
cin
parents:
diff changeset
22 1;