On 11/3/06, Mumia W. <[EMAIL PROTECTED]> wrote:
Please bottom-post.
Why should a call to Create() on an object returned by Package2()
updatethe object $a ?
It shouldn't normally update the containing object, and it doesn't in
your program.
For your education, try this,
print "Inside ERR:\t", $a->Package2->err, "\n";
Also, typically one uses either containment or inheritance but not both.
Please explain what you're trying to do again.
The ideea is to implement a context based protocol, though you can't
see that from the script.
Let's say that you have several contexts, like
Context1
->Context2/OP
->Context2.1/OP
->Context3/OP
Given this, I wanted to reflect the context structure into the code written by
the module user, something like
Context1->Context2->OP ( Where OP is any givent operation).
Now, the operations might trigger protocol errors, which are
held(counted) in the parent class( Context1 ), and thus should be
modifiable by any child method( in this example,
by Context2/OP, Context2.1/OP, Context3/OP).
getting back the the example script, Package1 would be the base class, meaning
in the same time the top context.
Package2, would be in the same time a method of Package1, in order to
call it like
Package1->Package2->OP, and it would be a package of itself too.
The IncErr method simply (would)increment the number of errors reported
by the protocol.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
