Re: [BLACKBOX] Polymorphism

From: [at]} <Aubrey.McIntosh{>
Date: Sun, 30 Nov 2008 13:32:06 -0600

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

On Sun, Nov 23, 2008 at 6:07 AM, Alexander Iljin <ajsoft.gm{([at]})nowhere.xy
> Hello!
>
> AMAUN> I replaced the VAR record statements with pointers. Primarily I did
> AMAUN> this because I can't call a method from an uninitialized pointer, so
> AMAUN> there are fewer tests needed for good data.
>
> On the other hand, static RECORDs (not POINTERs) are allocated on
> stack, so there is zero dynamic memory overhead (no NEW/GC
> involved). The stack memory is released upon the exit from the
> procedure where the RECORD local variable is declared. Using static
> RECORDs is almost the same as passing their contents as parameters
> to the Do procedure, which they are, essentially, in this case.
>

I have moved the previous project to the new list module. The source
to the Alm01List and Alm01Gather are on pastebin, and so is an encoded
file with both.

http://text.pastebin.com/m5a35fcd3
http://cp.pastebin.com/m3c6fa37c
http://cp.pastebin.com/m60a6de8b

This has been a very simple exercise, but nonetheless was interesting.
 For example, I started thinking that ListOrdered, ListFIFO, and
ListLIFO are extensions to List that are incompatible with each other.
 For example, a FIFO is ordered by time, but may have data that cannot
be compared by the Lt or Gt operators. An ordered list must have a Gt
or Gt operator. But applying this operator could destroy the
invariants of a FIFO.

This migration sharpened the distinction between lists that are NIL
when empty and lists that have a sentinel value.

I am surprised that the binary code grew a lot. I had expected it to
become smaller. I hope this is from some unfortunate addressing style
that I have used, but which a good editor would recognize and correct.


>
> ----
> To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy
>

-- 
-- 
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-515563533_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIE9uIFN1biwgTm92IDIzLCAyMDA4IGF0IDY6MDcg
QU0sIEFsZXhhbmRlciBJbGppbiA8YWpzb2Z0LmdtQGdtYWlsLmNvbT4gd3JvdGU6XHBhcg0KPiBI
ZWxsbyFccGFyDQo+XHBhcg0KPiBBTUFVTj4gSSByZXBsYWNlZCB0aGUgVkFSIHJlY29yZCBzdGF0
ZW1lbnRzIHdpdGggcG9pbnRlcnMuICBQcmltYXJpbHkgSSBkaWRccGFyDQo+IEFNQVVOPiB0aGlz
IGJlY2F1c2UgSSBjYW4ndCBjYWxsIGEgbWV0aG9kIGZyb20gYW4gdW5pbml0aWFsaXplZCBwb2lu
dGVyLCBzb1xwYXINCj4gQU1BVU4+IHRoZXJlIGFyZSBmZXdlciB0ZXN0cyBuZWVkZWQgZm9yIGdv
b2QgZGF0YS5ccGFyDQo+XHBhcg0KPiAgT24gdGhlIG90aGVyIGhhbmQsIHN0YXRpYyBSRUNPUkRz
IChub3QgUE9JTlRFUnMpIGFyZSBhbGxvY2F0ZWQgb25ccGFyDQo+ICBzdGFjaywgc28gdGhlcmUg
aXMgemVybyBkeW5hbWljIG1lbW9yeSBvdmVyaGVhZCAobm8gTkVXL0dDXHBhcg0KPiAgaW52b2x2
ZWQpLiBUaGUgc3RhY2sgbWVtb3J5IGlzIHJlbGVhc2VkIHVwb24gdGhlIGV4aXQgZnJvbSB0aGVc
cGFyDQo+ICBwcm9jZWR1cmUgd2hlcmUgdGhlIFJFQ09SRCBsb2NhbCB2YXJpYWJsZSBpcyBkZWNs
YXJlZC4gVXNpbmcgc3RhdGljXHBhcg0KPiAgUkVDT1JEcyBpcyBhbG1vc3QgdGhlIHNhbWUgYXMg
cGFzc2luZyB0aGVpciBjb250ZW50cyBhcyBwYXJhbWV0ZXJzXHBhcg0KPiAgdG8gdGhlIERvIHBy
b2NlZHVyZSwgd2hpY2ggdGhleSBhcmUsIGVzc2VudGlhbGx5LCBpbiB0aGlzIGNhc2UuXHBhcg0K
PlxwYXINClxwYXINCkkgaGF2ZSBtb3ZlZCB0aGUgcHJldmlvdXMgcHJvamVjdCB0byB0aGUgbmV3
IGxpc3QgbW9kdWxlLiAgVGhlIHNvdXJjZVxwYXINCnRvIHRoZSBBbG0wMUxpc3QgYW5kIEFsbTAx
R2F0aGVyIGFyZSBvbiBwYXN0ZWJpbiwgYW5kIHNvIGlzIGFuIGVuY29kZWRccGFyDQpmaWxlIHdp
dGggYm90aC5ccGFyDQpccGFyDQpodHRwOi8vdGV4dC5wYXN0ZWJpbi5jb20vbTVhMzVmY2QzXHBh
cg0KaHR0cDovL2NwLnBhc3RlYmluLmNvbS9tM2M2ZmEzN2NccGFyDQpodHRwOi8vY3AucGFzdGVi
aW4uY29tL202MGE2ZGU4YlxwYXINClxwYXINClRoaXMgaGFzIGJlZW4gYSB2ZXJ5IHNpbXBsZSBl
eGVyY2lzZSwgYnV0IG5vbmV0aGVsZXNzIHdhcyBpbnRlcmVzdGluZy5ccGFyDQogRm9yIGV4YW1w
bGUsIEkgc3RhcnRlZCB0aGlua2luZyB0aGF0IExpc3RPcmRlcmVkLCBMaXN0RklGTywgYW5kXHBh
cg0KTGlzdExJRk8gYXJlIGV4dGVuc2lvbnMgdG8gTGlzdCB0aGF0IGFyZSBpbmNvbXBhdGlibGUg
d2l0aCBlYWNoIG90aGVyLlxwYXINCiBGb3IgZXhhbXBsZSwgYSBGSUZPIGlzIG9yZGVyZWQgYnkg
dGltZSwgYnV0IG1heSBoYXZlIGRhdGEgdGhhdCBjYW5ub3RccGFyDQpiZSBjb21wYXJlZCBieSB0
aGUgTHQgb3IgR3Qgb3BlcmF0b3JzLiAgQW4gb3JkZXJlZCBsaXN0IG11c3QgaGF2ZSBhIEd0XHBh
cg0Kb3IgR3Qgb3BlcmF0b3IuICBCdXQgYXBwbHlpbmcgdGhpcyBvcGVyYXRvciBjb3VsZCBkZXN0
cm95IHRoZVxwYXINCmludmFyaWFudHMgb2YgYSBGSUZPLlxwYXINClxwYXINClRoaXMgbWlncmF0
aW9uIHNoYXJwZW5lZCB0aGUgZGlzdGluY3Rpb24gYmV0d2VlbiBsaXN0cyB0aGF0IGFyZSBOSUxc
cGFyDQp3aGVuIGVtcHR5IGFuZCBsaXN0cyB0aGF0IGhhdmUgYSBzZW50aW5lbCB2YWx1ZS5ccGFy
DQpccGFyDQpJIGFtIHN1cnByaXNlZCB0aGF0IHRoZSBiaW5hcnkgY29kZSBncmV3IGEgbG90LiAg
SSBoYWQgZXhwZWN0ZWQgaXQgdG9ccGFyDQpiZWNvbWUgc21hbGxlci4gIEkgaG9wZSB0aGlzIGlz
IGZyb20gc29tZSB1bmZvcnR1bmF0ZSBhZGRyZXNzaW5nIHN0eWxlXHBhcg0KdGhhdCBJIGhhdmUg
dXNlZCwgYnV0IHdoaWNoIGEgZ29vZCBlZGl0b3Igd291bGQgcmVjb2duaXplIGFuZCBjb3JyZWN0
LlxwYXINClxwYXINClxwYXINCj5ccGFyDQo+IC0tLS1ccGFyDQo+IFRvIHVuc3Vic2NyaWJlLCBz
ZW5kIGEgbWVzc2FnZSB3aXRoIGJvZHkgIlNJR05PRkYgQkxBQ0tCT1giIHRvIExJU1RTRVJWQExJ
U1RTLk9CRVJPTi5DSFxwYXINCj5ccGFyDQpccGFyDQpccGFyDQpccGFyDQotLSBccGFyDQotLSBc
cGFyDQpBdWJyZXkgTWNJbnRvc2gsIFBoLkQuXHBhcg0KMTUwMiBEZXZvbiBDaXJjbGVccGFyDQpB
dXN0aW4gVFggNzg3MjMtMTgxNFxwYXINCmh0dHA6Ly9ob21lLmdyYW5kZWNvbS5uZXQvfmFtY2lu
dG9zaC9hdWJyZXkvU2VhcmNoL1xwYXINClxwYXINClxwYXINCi0tLS1ccGFyDQpUbyB1bnN1YnNj
cmliZSwgc2VuZCBhIG1lc3NhZ2Ugd2l0aCBib2R5ICJTSUdOT0ZGIEJMQUNLQk9YIiB0byBMSVNU
U0VSVkBMSVNUUy5PQkVST04ufX0AMDA4IDEz
----boundary-LibPST-iamunique-515563533_-_---

Received on Sun Nov 30 2008 - 20:32:06 UTC