----boundary-LibPST-iamunique-1134381152_-_-
Content-type: text/plain
> Can anyone compiler this?
>
> -------------------------------------------------------------------
> MODULE PrivTest;
>
> PROCEDURE ^ Test (VAR ident: ARRAY 10 OF INTEGER);
>
> PROCEDURE Test (VAR ident: ARRAY 10 OF INTEGER);
> BEGIN
> END Test;
>
> END PrivTest.
> -------------------------------------------------------------------
>
> Same code with "ARRAY OF INTEGER" compiles OK.
>
> --- BlackBox
> --- send subject HELP or UNSUBSCRIBE to blackbox{([at]})nowhere.xyDejan,
Your first example won't compile because two occurrences of ARRAY n OF
anything do not correspond to the same types (See appendix A of the language
reference). Conversely, two occurrences of open arrays with the same array
elements correspond two the same type.
Cheers.
Gérard
--- BlackBox
--- send subject HELP or UNSUBSCRIBE to blackbox{([at]})nowhere.xy
----boundary-LibPST-iamunique-1134381152_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzc1xmY2hhcnNldDAgQXJpYWw7fQ0Ke1xmMVxmbW9kZXJuIENvdXJpZXIgTmV3O30NCntcZjJc
Zm5pbFxmY2hhcnNldDIgU3ltYm9sO30NCntcZjNcZm1vZGVyblxmY2hhcnNldDAgQ291cmllciBO
ZXc7fX0NCntcY29sb3J0YmxccmVkMFxncmVlbjBcYmx1ZTA7XHJlZDBcZ3JlZW4wXGJsdWUyNTU7
fQ0KXHVjMVxwYXJkXHBsYWluXGRlZnRhYjM2MCBcZjBcZnMyMCA+IENhbiBhbnlvbmUgY29tcGls
ZXIgdGhpcz9ccGFyDQo+XHBhcg0KPiAtLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tXHBhcg0KPiBNT0RVTEUgUHJpdlRlc3Q7
XHBhcg0KPlxwYXINCj4gUFJPQ0VEVVJFIF4gVGVzdCAoVkFSIGlkZW50OiBBUlJBWSAxMCBPRiBJ
TlRFR0VSKTtccGFyDQo+XHBhcg0KPiBQUk9DRURVUkUgVGVzdCAoVkFSIGlkZW50OiBBUlJBWSAx
MCBPRiBJTlRFR0VSKTtccGFyDQo+IEJFR0lOXHBhcg0KPiBFTkQgVGVzdDtccGFyDQo+XHBhcg0K
PiBFTkQgUHJpdlRlc3QuXHBhcg0KPiAtLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tXHBhcg0KPlxwYXINCj4gU2FtZSBjb2Rl
IHdpdGggIkFSUkFZIE9GIElOVEVHRVIiIGNvbXBpbGVzIE9LLlxwYXINCj5ccGFyDQo+IC0tLSBC
bGFja0JveFxwYXINCj4gLS0tIHNlbmQgc3ViamVjdCBIRUxQIG9yIFVOU1VCU0NSSUJFIHRvIGJs
YWNrYm94QG9iZXJvbi5jaFxwYXINClxwYXINCkRlamFuLFxwYXINClxwYXINCllvdXIgZmlyc3Qg
ZXhhbXBsZSB3b24ndCBjb21waWxlIGJlY2F1c2UgdHdvIG9jY3VycmVuY2VzIG9mIEFSUkFZIG4g
T0ZccGFyDQphbnl0aGluZyBkbyBub3QgY29ycmVzcG9uZCB0byB0aGUgc2FtZSB0eXBlcyAoU2Vl
IGFwcGVuZGl4IEEgb2YgdGhlIGxhbmd1YWdlXHBhcg0KcmVmZXJlbmNlKS4gQ29udmVyc2VseSwg
dHdvIG9jY3VycmVuY2VzIG9mIG9wZW4gYXJyYXlzIHdpdGggdGhlIHNhbWUgYXJyYXlccGFyDQpl
bGVtZW50cyBjb3JyZXNwb25kIHR3byB0aGUgc2FtZSB0eXBlLlxwYXINClxwYXINCkNoZWVycy5c
cGFyDQpccGFyDQpHXCdlOXJhcmRccGFyDQpccGFyDQotLS0gQmxhY2tCb3hccGFyDQotLS0gc2Vu
ZCBzdWJqZWN0IEhFTFAgb3IgVU5TVUJTQ1JJQkUgdG8gYmxhY2tib3hAb2Jlcm9ufX0ATgo+PkVO
RCBUZXN0Ow=
----boundary-LibPST-iamunique-1134381152_-_---
Received on Sat Feb 19 2005 - 18:13:58 UTC