[BLACKBOX] ... Polymorphism & Multiple Inheritance

From: [at]} <Aubrey.McIntosh{>
Date: Thu, 20 Nov 2008 21:40:14 -0600

----boundary-LibPST-iamunique-863555463_-_-
Content-type: text/plain

Oh, my memory is still good, and it is just as quick. It just has
lots more to go through at my age.
Still reading ... Added Multiple Inheritance.


On Thu, Nov 20, 2008 at 9:23 PM, <Aubrey.McIntosh{([at]})nowhere.xy
> In writing my List module, I have a method DoEach that walks the list,
> and applies method Do to each element.
>
> (this: List) Do (VAR params: ANYREC), NEW, EMPTY;
> (root: List) DoEach (VAR params: ANYREC), NEW;
>
> In moving some existing software to the new library module, it turns
> out that I wish to apply a few different procedures to the list. In
> trying to avoid procedure variables, I find I am drawing a blank.
> Making several lateral extensions to the base record may be an
> approach, particularly if there is a pointer to a record with that
> particular implementation as one of the fields in params. I will
> alternate between envisioning some structure to do this and Goggling
> for the next while. A brief search of "Component Pascal Polymorphism"
> seems more or less on target and enough reading to fill a night.
>
> I thought I saw some message about this under the general heading of
> polymorphism on this list some years ago. If anyone remembers this,
> or can point to a file either in the distribution or online I'd focus
> my thoughts there fairly early on.
>
>
> --
> --
> Aubrey McIntosh, Ph.D.
> 1502 Devon Circle
> Austin TX 78723-1814
> http://home.grandecom.net/~amcintosh/aubrey/Search/
>



-- 
-- 
Aubrey McIntosh, Ph.D.
1502 Devon Circle
Austin TX 78723-1814
http://home.grandecom.net/~amcintosh/aubrey/Search/
----
To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy----boundary-LibPST-iamunique-863555463_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIE9oLCBteSBtZW1vcnkgaXMgc3RpbGwgZ29vZCwg
YW5kIGl0IGlzIGp1c3QgYXMgcXVpY2suICBJdCBqdXN0IGhhc1xwYXINCmxvdHMgbW9yZSB0byBn
byB0aHJvdWdoIGF0IG15IGFnZS5ccGFyDQpTdGlsbCByZWFkaW5nIC4uLiAgQWRkZWQgTXVsdGlw
bGUgSW5oZXJpdGFuY2UuXHBhcg0KXHBhcg0KXHBhcg0KT24gVGh1LCBOb3YgMjAsIDIwMDggYXQg
OToyMyBQTSwgIDxBdWJyZXkuTWNJbnRvc2hAYWx1bW5pLnV0ZXhhcy5uZXQ+IHdyb3RlOlxwYXIN
Cj4gSW4gd3JpdGluZyBteSBMaXN0IG1vZHVsZSwgSSBoYXZlIGEgbWV0aG9kIERvRWFjaCB0aGF0
IHdhbGtzIHRoZSBsaXN0LFxwYXINCj4gYW5kIGFwcGxpZXMgbWV0aG9kIERvIHRvIGVhY2ggZWxl
bWVudC5ccGFyDQo+XHBhcg0KPiAgICAgICAgICAgICAgICAgICAgICAgICh0aGlzOiBMaXN0KSBE
byAoVkFSIHBhcmFtczogQU5ZUkVDKSwgTkVXLCBFTVBUWTtccGFyDQo+ICAgICAgICAgICAgICAg
ICAgICAgICAgKHJvb3Q6IExpc3QpIERvRWFjaCAoVkFSIHBhcmFtczogQU5ZUkVDKSwgTkVXO1xw
YXINCj5ccGFyDQo+IEluIG1vdmluZyBzb21lIGV4aXN0aW5nIHNvZnR3YXJlIHRvIHRoZSBuZXcg
bGlicmFyeSBtb2R1bGUsIGl0IHR1cm5zXHBhcg0KPiBvdXQgdGhhdCBJIHdpc2ggdG8gYXBwbHkg
YSBmZXcgZGlmZmVyZW50IHByb2NlZHVyZXMgdG8gdGhlIGxpc3QuICBJblxwYXINCj4gdHJ5aW5n
IHRvIGF2b2lkIHByb2NlZHVyZSB2YXJpYWJsZXMsIEkgZmluZCBJIGFtIGRyYXdpbmcgYSBibGFu
ay5ccGFyDQo+IE1ha2luZyBzZXZlcmFsIGxhdGVyYWwgZXh0ZW5zaW9ucyB0byB0aGUgYmFzZSBy
ZWNvcmQgbWF5IGJlIGFuXHBhcg0KPiBhcHByb2FjaCwgcGFydGljdWxhcmx5IGlmIHRoZXJlIGlz
IGEgcG9pbnRlciB0byBhIHJlY29yZCB3aXRoIHRoYXRccGFyDQo+IHBhcnRpY3VsYXIgaW1wbGVt
ZW50YXRpb24gYXMgb25lIG9mIHRoZSBmaWVsZHMgaW4gcGFyYW1zLiAgSSB3aWxsXHBhcg0KPiBh
bHRlcm5hdGUgYmV0d2VlbiBlbnZpc2lvbmluZyBzb21lIHN0cnVjdHVyZSB0byBkbyB0aGlzIGFu
ZCBHb2dnbGluZ1xwYXINCj4gZm9yIHRoZSBuZXh0IHdoaWxlLiAgQSBicmllZiBzZWFyY2ggb2Yg
IkNvbXBvbmVudCBQYXNjYWwgUG9seW1vcnBoaXNtIlxwYXINCj4gc2VlbXMgbW9yZSBvciBsZXNz
IG9uIHRhcmdldCBhbmQgZW5vdWdoIHJlYWRpbmcgdG8gZmlsbCBhIG5pZ2h0LlxwYXINCj5ccGFy
DQo+IEkgdGhvdWdodCBJIHNhdyBzb21lIG1lc3NhZ2UgYWJvdXQgdGhpcyB1bmRlciB0aGUgZ2Vu
ZXJhbCBoZWFkaW5nIG9mXHBhcg0KPiBwb2x5bW9ycGhpc20gb24gdGhpcyBsaXN0IHNvbWUgeWVh
cnMgYWdvLiAgSWYgYW55b25lIHJlbWVtYmVycyB0aGlzLFxwYXINCj4gb3IgY2FuIHBvaW50IHRv
IGEgZmlsZSBlaXRoZXIgaW4gdGhlIGRpc3RyaWJ1dGlvbiBvciBvbmxpbmUgSSdkIGZvY3VzXHBh
cg0KPiBteSB0aG91Z2h0cyB0aGVyZSBmYWlybHkgZWFybHkgb24uXHBhcg0KPlxwYXINCj5ccGFy
DQo+IC0tXHBhcg0KPiAtLVxwYXINCj4gQXVicmV5IE1jSW50b3NoLCBQaC5ELlxwYXINCj4gMTUw
MiBEZXZvbiBDaXJjbGVccGFyDQo+IEF1c3RpbiBUWCA3ODcyMy0xODE0XHBhcg0KPiBodHRwOi8v
aG9tZS5ncmFuZGVjb20ubmV0L35hbWNpbnRvc2gvYXVicmV5L1NlYXJjaC9ccGFyDQo+XHBhcg0K
XHBhcg0KXHBhcg0KXHBhcg0KLS0gXHBhcg0KLS0gXHBhcg0KQXVicmV5IE1jSW50b3NoLCBQaC5E
LlxwYXINCjE1MDIgRGV2b24gQ2lyY2xlXHBhcg0KQXVzdGluIFRYIDc4NzIzLTE4MTRccGFyDQpo
dHRwOi8vaG9tZS5ncmFuZGVjb20ubmV0L35hbWNpbnRvc2gvYXVicmV5L1NlYXJjaC9ccGFyDQpc
cGFyDQpccGFyDQotLS0tXHBhcg0KVG8gdW5zdWJzY3JpYmUsIHNlbmQgYSBtZXNzYWdlIHdpdGgg
Ym9keSAiU0lHTk9GRiBCTEFDS0JPWCIgdG8gTElTVFNFUlZATElTVFMuT0JFUk9OLkNIXHBhcg0K
fQ==
----boundary-LibPST-iamunique-863555463_-_---
Received on Fri Nov 21 2008 - 04:40:14 UTC

This archive was generated by hypermail 2.3.0 : Thu Sep 26 2013 - 06:30:51 UTC