- Why does this compile?

From: [at]} <AVC>
Date: Tue, 09 Oct 2007 00:16:36 +0400

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

And another question: even if the index's range in RealBug was correct,
would it be possible to call RealBug?
BB compiler doesn't let argument's type ARRAY 4 OF REAL (incompatible
assignment).

Alexey Cheremkhin
> This is too simple. What am I missing? Why does it compile when the compiler should be able to see the errors?
>
> Rex Couture
>
> ===============
> MODULE TestBug;
>
> PROCEDURE Open* (dev: ARRAY 256 OF SHORTCHAR;
> VAR devConf: ARRAY 256 OF SHORTCHAR);
> VAR i: INTEGER;
> BEGIN
> FOR i:= -1000000 TO 1000000 DO (* Why does this compile? *)
> devConf[i]:= dev[i] END
> END Open;
>
> PROCEDURE RealBug*( a: ARRAY 4 OF REAL; VAR sum: REAL);
> VAR i: INTEGER;
> BEGIN
> FOR i:= -800 TO 1000 DO (* Why does this compile? *)
> a[i]:= i END;
> END RealBug;
>
> END TestBug.
>
> --- BlackBox
> --- send subject HELP or UNSUBSCRIBE to blackbox{([at]})nowhere.xy
>
>
>

--- BlackBox
--- send subject HELP or UNSUBSCRIBE to blackbox{([at]})nowhere.xy


----boundary-LibPST-iamunique-1768349766_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"

e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIEFuZCBhbm90aGVyIHF1ZXN0aW9uOiBldmVuIGlm
IHRoZSBpbmRleCdzIHJhbmdlIGluIFJlYWxCdWcgd2FzIGNvcnJlY3QsIFxwYXINCndvdWxkIGl0
IGJlIHBvc3NpYmxlIHRvIGNhbGwgUmVhbEJ1Zz9ccGFyDQpCQiBjb21waWxlciBkb2Vzbid0IGxl
dCBhcmd1bWVudCdzIHR5cGUgQVJSQVkgNCBPRiBSRUFMIChpbmNvbXBhdGlibGUgXHBhcg0KYXNz
aWdubWVudCkuXHBhcg0KXHBhcg0KQWxleGV5IENoZXJlbWtoaW5ccGFyDQo+ICAgICAgICAgVGhp
cyBpcyB0b28gc2ltcGxlLiAgV2hhdCBhbSBJIG1pc3Npbmc/ICBXaHkgZG9lcyBpdCBjb21waWxl
IHdoZW4gdGhlIGNvbXBpbGVyIHNob3VsZCBiZSBhYmxlIHRvIHNlZSB0aGUgZXJyb3JzP1xwYXIN
Cj5ccGFyDQo+IFJleCBDb3V0dXJlXHBhcg0KPlxwYXINCj4gPT09PT09PT09PT09PT09XHBhcg0K
PiBNT0RVTEUgVGVzdEJ1ZztccGFyDQo+XHBhcg0KPiBQUk9DRURVUkUgT3BlbiogKGRldjogQVJS
QVkgMjU2IE9GIFNIT1JUQ0hBUjtccGFyDQo+ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg
ICAgICAgICAgVkFSIGRldkNvbmY6IEFSUkFZIDI1NiBPRiBTSE9SVENIQVIpO1xwYXINCj4gVkFS
IGk6IElOVEVHRVI7XHBhcg0KPiBCRUdJTlxwYXINCj4gRk9SIGk6PSAtMTAwMDAwMCBUTyAxMDAw
MDAwIERPICAgICAgKCogV2h5IGRvZXMgdGhpcyBjb21waWxlPyAqKVxwYXINCj4gICAgICAgICBk
ZXZDb25mW2ldOj0gZGV2W2ldIEVORFxwYXINCj4gRU5EIE9wZW47XHBhcg0KPiAgICAgICAgICAg
ICAgICAgXHBhcg0KPiBQUk9DRURVUkUgUmVhbEJ1ZyooIGE6IEFSUkFZIDQgT0YgUkVBTDsgVkFS
IHN1bTogUkVBTCk7XHBhcg0KPiBWQVIgaTogSU5URUdFUjtccGFyDQo+IEJFR0lOXHBhcg0KPiBG
T1IgaTo9IC04MDAgVE8gMTAwMCBETyAgICAoKiBXaHkgZG9lcyB0aGlzIGNvbXBpbGU/ICAqKVxw
YXINCj4gICAgICAgICBhW2ldOj0gaSBFTkQ7XHBhcg0KPiBFTkQgUmVhbEJ1ZztccGFyDQo+XHBh
cg0KPiBFTkQgVGVzdEJ1Zy4gXHBhcg0KPlxwYXINCj4gLS0tIEJsYWNrQm94XHBhcg0KPiAtLS0g
c2VuZCBzdWJqZWN0IEhFTFAgb3IgVU5TVUJTQ1JJQkUgdG8gYmxhY2tib3hAb2Jlcm9uLmNoXHBh
cg0KPlxwYXINCj5ccGFyDQo+ICAgXHBhcg0KXHBhcg0KLS0tIEJsYWNrQm94XHBhcg0KLS0tIHNl
bmQgc3ViamVjdCBIRUxQIG9yIFVOU1VCU0NSSUJFIHRvIGJsYWNrYm94QG9iZXJvbi5jaFxwYXIN
ClxwYXINCn0=


----boundary-LibPST-iamunique-1768349766_-_---
Received on Mon Oct 08 2007 - 22:16:36 UTC

This archive was generated by hypermail 2.3.0 : Thu Sep 26 2013 - 06:31:17 UTC