Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss
[CVS ci] call object constructor
1 view
Skip to first unread message
Leopold Toetsch
Mar 3, 2004, 9:27:36 AM3/3/04
to P6I
This works now:
newclass P1, "Foo"
find_global P2, "init"
store_global "Foo", "__init", P2
find_type I1, "Foo"
new P3, I1
print "ok 2\n"
end
.pcc_sub init:
print "ok 1\n"
invoke P1
Missing is some "call all parents contructors". But above is good enough
to allocate attributes.
If line 3 is omitted, no constructor is called.
leo
0 new messages