rev 245 - in trunk: include/prothon pr
SVN User <[email protected]>
| Newsgroups | gmane.comp.lang.prothon.cvs |
|---|---|
| Message-ID | <[email protected]> |
Author: mark Date: 2004-03-31 21:47:49 -0500 (Wed, 31 Mar 2004) New Revision: 245 Modified: trunk/include/prothon/prothon.h trunk/pr/meow.pr Log: meow Modified: trunk/include/prothon/prothon.h =================================================================== --- trunk/include/prothon/prothon.h 2004-04-01 01:44:43 UTC (rev 244) +++ trunk/include/prothon/prothon.h 2004-04-01 02:47:49 UTC (rev 245) @@ -437,9 +437,11 @@ // inheritance is solved. When it returns an attr you need to check *proto_pp // to see which object the attr actually came from. If proto_pp is NULL then this // info is not returned. +// When "second" is set, the search returns the second attribute found in the list +// of prototypes. This is used for "super" searches. // The ist param may return an exception object if proto pointers are missing // or have a circular reference. See section "INTERPRETER STATE". -obj_p get_proto_attr(isp ist, obj_p object, obj_p key, obj_p *proto_pp); +obj_p get_proto_attr(isp ist, obj_p object, obj_p key, obj_p *proto_pp, int second); // DEL_ATTR: Find attr in object that matches a key and delete it. // Much like get-attr, except that when an attr is found it is deleted. Modified: trunk/pr/meow.pr =================================================================== --- trunk/pr/meow.pr 2004-04-01 01:44:43 UTC (rev 244) +++ trunk/pr/meow.pr 2004-04-01 02:47:49 UTC (rev 245) @@ -12,7 +12,7 @@ with Cat: def .describe(): print "I am a cat." - Mammal.describe() # <-- Intended super call + ^describe() # <-- super call def .make_noise(): print "I go meow."