Mercurial > pub > Impl
comparison lib/IMPL/Class/ClassBuilder.pm @ 423:60c2892a577c ref20150831
working on base class system
| author | cin |
|---|---|
| date | Mon, 02 Apr 2018 07:35:23 +0300 |
| parents | |
| children | c27434cdd611 |
comparison
equal
deleted
inserted
replaced
| 422:b0481c071bea | 423:60c2892a577c |
|---|---|
| 1 package IMPL::Class::ClassBuilder; | |
| 2 use strict; | |
| 3 | |
| 4 sub new { | |
| 5 my ($self, $class) = @_; | |
| 6 | |
| 7 return bless \$class, $self | |
| 8 } | |
| 9 | |
| 10 sub DefineProperty { | |
| 11 my ($self, $pi) = @_; | |
| 12 } | |
| 13 | |
| 14 sub DefineField { | |
| 15 | |
| 16 } | |
| 17 | |
| 18 sub DefineMethod { | |
| 19 | |
| 20 } | |
| 21 | |
| 22 1; |
