----boundary-LibPST-iamunique-1454460222_-_-
Content-type: text/plain
Hello again.
Firts of all I'd like to apologize for the lot of messages I have written in a
few days (and all of them asking; none answering), but one of them was for a
friend :).
Well, the question is that I'm not an advanced programmer, so, lots of
questions assail me, and, for the time, every question that I asked here was
clearly and quickly clarified. I know at least three people like me that you
have helped a lot with your responses.
The question of today...well... the question of today at 20:00 is:
How can I get the type of an instanced object?. I mean, how could I do
something like:
IF aux1 IS THE SAME TYPE THAN aux2 THEN...
I know that I am able to do something like:
IF aux1 IS SomeType THEN,
or
WITH aux1:SomeType DO,
but to do that you have to put in the "right side " of the comparision a type,
not an object.
I don't know if it would help, but the comparision I want to do is between
classes that have the same root (or base clase), for example:
TYPE
BaseClass=POINTER TO EXTENSIBLE RECORD; END;
Tp1= POINTER TO RECORD (BaseClass); END;
Tp2= POINTER TO RECORD (BaseClass); END;
..
PROCEDURE (l: List) Insert (b: BaseClass), NEW;
BEGIN
IF b IS OF TYPE Tp1
---do something--
ELSIF b IF OF TYPE Tp2
---do something different---
ELSE
END;
END Insert;
(*Don't mind about the list that acts like receiver of the method. It is only
for the example *)
Thank you in advance
HECTOR;
---------------------------------------------
This message was sent using Endymion MailMan.
http://www.endymion.com/products/mailman/
--------------------------------------------
To unsubscribe from this mailing list, send a message containing the word "unsubscribe" to:
blackbox-request{([at]})nowhere.xy
To get a list of valid e-mail commands and instructions on their usage, send a message containing the word "help" to the above address.
Send any problem reports or questions related to this email list to the list owner at
owner-blackbox{([at]})nowhere.xy
Current posting policy:
a) To post you should use the same address by which you are subscribed to the mailing list. That way, the list server will recognize you as subscriber and forward your posting immediately, without creating any overhead.
b) If, for some reason, you cannot post from the address, by which you are subscribed, your message will be moderated to avoid spam. Please understand that moderation will often cause some delay, in particular over weekends or holydays.
----boundary-LibPST-iamunique-1454460222_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIEhlbGxvIGFnYWluLlxwYXINCkZpcnRzIG9mIGFs
bCBJJ2QgbGlrZSB0byBhcG9sb2dpemUgZm9yIHRoZSBsb3Qgb2YgbWVzc2FnZXMgSSBoYXZlIHdy
aXR0ZW4gaW4gYSBccGFyDQpmZXcgZGF5cyAoYW5kIGFsbCBvZiB0aGVtIGFza2luZzsgbm9uZSBh
bnN3ZXJpbmcpLCBidXQgb25lIG9mIHRoZW0gd2FzIGZvciBhIFxwYXINCmZyaWVuZCA6KS4gXHBh
cg0KXHBhcg0KV2VsbCwgdGhlIHF1ZXN0aW9uIGlzIHRoYXQgSSdtIG5vdCBhbiBhZHZhbmNlZCBw
cm9ncmFtbWVyLCBzbywgbG90cyBvZiBccGFyDQpxdWVzdGlvbnMgYXNzYWlsIG1lLCBhbmQsIGZv
ciB0aGUgdGltZSwgZXZlcnkgcXVlc3Rpb24gdGhhdCBJIGFza2VkIGhlcmUgd2FzIFxwYXINCmNs
ZWFybHkgYW5kIHF1aWNrbHkgY2xhcmlmaWVkLiBJIGtub3cgYXQgbGVhc3QgdGhyZWUgcGVvcGxl
IGxpa2UgbWUgdGhhdCB5b3UgXHBhcg0KaGF2ZSBoZWxwZWQgYSBsb3Qgd2l0aCB5b3VyIHJlc3Bv
bnNlcy5ccGFyDQpccGFyDQpUaGUgcXVlc3Rpb24gb2YgdG9kYXkuLi53ZWxsLi4uIHRoZSBxdWVz
dGlvbiBvZiB0b2RheSBhdCAyMDowMCBpczogXHBhcg0KSG93IGNhbiBJIGdldCB0aGUgdHlwZSBv
ZiBhbiBpbnN0YW5jZWQgb2JqZWN0Py4gSSBtZWFuLCBob3cgY291bGQgSSBkbyBccGFyDQpzb21l
dGhpbmcgbGlrZTpccGFyDQpccGFyDQpJRiBhdXgxIElTIFRIRSBTQU1FIFRZUEUgVEhBTiBhdXgy
IFRIRU4uLi5ccGFyDQpccGFyDQpccGFyDQpJIGtub3cgdGhhdCBJIGFtIGFibGUgdG8gZG8gc29t
ZXRoaW5nIGxpa2U6XHBhcg0KXHBhcg0KICAgSUYgYXV4MSBJUyBTb21lVHlwZSBUSEVOLCBccGFy
DQpvciBccGFyDQogICBXSVRIIGF1eDE6U29tZVR5cGUgRE8sIFxwYXINClxwYXINCmJ1dCB0byBk
byB0aGF0IHlvdSBoYXZlIHRvIHB1dCBpbiB0aGUgInJpZ2h0IHNpZGUgIiBvZiB0aGUgY29tcGFy
aXNpb24gYSB0eXBlLCBccGFyDQpub3QgYW4gb2JqZWN0LlxwYXINClxwYXINCkkgZG9uJ3Qga25v
dyBpZiBpdCB3b3VsZCBoZWxwLCBidXQgdGhlIGNvbXBhcmlzaW9uIEkgd2FudCB0byBkbyBpcyBi
ZXR3ZWVuIFxwYXINCmNsYXNzZXMgdGhhdCBoYXZlIHRoZSBzYW1lIHJvb3QgKG9yIGJhc2UgY2xh
c2UpLCBmb3IgZXhhbXBsZTpccGFyDQpccGFyDQpUWVBFXHBhcg0KXHRhYiBCYXNlQ2xhc3M9UE9J
TlRFUiBUTyBFWFRFTlNJQkxFIFJFQ09SRDsgRU5EO1xwYXINClx0YWIgVHAxPSBQT0lOVEVSIFRP
IFJFQ09SRCAoQmFzZUNsYXNzKTtcdGFiIEVORDtccGFyDQpcdGFiIFRwMj0gUE9JTlRFUiBUTyBS
RUNPUkQgKEJhc2VDbGFzcyk7XHRhYiBFTkQ7XHBhcg0KXHBhcg0KLi5ccGFyDQpccGFyDQpQUk9D
RURVUkUgKGw6IExpc3QpIEluc2VydCAoYjogQmFzZUNsYXNzKSwgTkVXO1xwYXINCkJFR0lOXHBh
cg0KXHRhYiBJRiBiIElTIE9GIFRZUEUgVHAxXHBhcg0KXHRhYiBcdGFiIC0tLWRvIHNvbWV0aGlu
Zy0tXHBhcg0KXHRhYiBFTFNJRiBiIElGIE9GIFRZUEUgVHAyXHBhcg0KXHRhYiBcdGFiIC0tLWRv
IHNvbWV0aGluZyBkaWZmZXJlbnQtLS1ccGFyDQpcdGFiIEVMU0VccGFyDQpcdGFiIEVORDtccGFy
DQpFTkQgSW5zZXJ0O1xwYXINCigqRG9uJ3QgbWluZCBhYm91dCB0aGUgbGlzdCB0aGF0IGFjdHMg
bGlrZSByZWNlaXZlciBvZiB0aGUgbWV0aG9kLiBJdCBpcyBvbmx5IFxwYXINCmZvciB0aGUgZXhh
bXBsZSAqKVxwYXINClxwYXINClRoYW5rIHlvdSBpbiBhZHZhbmNlXHBhcg0KSEVDVE9SO1xwYXIN
ClxwYXINClxwYXINCi0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t
LVxwYXINClRoaXMgbWVzc2FnZSB3YXMgc2VudCB1c2luZyBFbmR5bWlvbiBNYWlsTWFuLlxwYXIN
Cmh0dHA6Ly93d3cuZW5keW1pb24uY29tL3Byb2R1Y3RzL21haWxtYW4vXHBhcg0KXHBhcg0KXHBh
cg0KLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS1ccGFyDQpccGFy
DQpUbyB1bnN1YnNjcmliZSBmcm9tIHRoaXMgbWFpbGluZyBsaXN0LCBzZW5kIGEgbWVzc2FnZSBj
b250YWluaW5nIHRoZSB3b3JkICJ1bnN1YnNjcmliZSIgdG86XHBhcg0KICAgYmxhY2tib3gtcmVx
dWVzdEBvYmVyb24uY2hccGFyDQpccGFyDQpUbyBnZXQgYSBsaXN0IG9mIHZhbGlkIGUtbWFpbCBj
b21tYW5kcyBhbmQgaW5zdHJ1Y3Rpb25zIG9uIHRoZWlyIHVzYWdlLCBzZW5kIGEgbWVzc2FnZSBj
b250YWluaW5nIHRoZSB3b3JkICJoZWxwIiB0byB0aGUgYWJvdmUgYWRkcmVzcy5ccGFyDQpccGFy
DQpTZW5kIGFueSBwcm9ibGVtIHJlcG9ydHMgb3IgcXVlc3Rpb25zIHJlbGF0ZWQgdG8gdGhpcyBl
bWFpbCBsaXN0IHRvIHRoZSBsaXN0IG93bmVyIGF0XHBhcg0KICAgb3duZXItYmxhY2tib3hAb2Jl
cm9uLmNoXHBhcg0KXHBhcg0KQ3VycmVudCBwb3N0aW5nIHBvbGljeTpccGFyDQpccGFyDQphKSBU
byBwb3N0IHlvdSBzaG91bGQgdXNlIHRoZSBzYW1lIGFkZHJlc3MgYnkgd2hpY2ggeW91IGFyZSBz
dWJzY3JpYmVkIHRvIHRoZSBtYWlsaW5nIGxpc3QuIFRoYXQgd2F5LCB0aGUgbGlzdCBzZXJ2ZXIg
d2lsbCByZWNvZ25pemUgeW91IGFzIHN1YnNjcmliZXIgYW5kIGZvcndhcmQgeW91ciBwb3N0aW5n
IGltbWVkaWF0ZWx5LCB3aXRob3V0IGNyZWF0aW5nIGFueSBvdmVyaGVhZC5ccGFyDQpccGFyDQpi
KSBJZiwgZm9yIHNvbWUgcmVhc29uLCB5b3UgY2Fubm90IHBvc3QgZnJvbSB0aGUgYWRkcmVzcywg
Ynkgd2hpY2ggeW91IGFyZSBzdWJzY3JpYmVkLCB5b3VyIG1lc3NhZ2Ugd2lsbCBiZSBtb2RlcmF0
ZWQgdG8gYXZvaWQgc3BhbS4gUGxlYXNlIHVuZGVyc3RhbmQgdGhhdCBtb2RlcmF0aW9uIHdpbGwg
b2Z0ZW4gY2F1c2Ugc29tZSBkZWxheSwgaW4gcGFydGljdWxhciBvdmVyIHdlZWtlbmRzIG9yIGhv
bHlkYXlzfX0AMC/HmrY=
----boundary-LibPST-iamunique-1454460222_-_---
Received on Mon Sep 16 2002 - 20:15:39 UTC