ada/7420: bug or strange feature?

Gerhard.Dieringer@nexgo.de Gerhard.Dieringer@nexgo.de
Sun Jul 28 00:42:00 GMT 2002


>Number:         7420
>Category:       ada
>Synopsis:       bug or strange feature?
>Confidential:   no
>Severity:       serious
>Priority:       medium
>Responsible:    unassigned
>State:          open
>Class:          sw-bug
>Submitter-Id:   net
>Arrival-Date:   Sat Jul 27 16:06:00 PDT 2002
>Closed-Date:
>Last-Modified:
>Originator:     Gerhard Dieringer
>Release:        gcc 3.1
>Organization:
>Environment:
Linux, Dual Pentium II 
>Description:
Aliased array as in parameter for procedure does not work right
>How-To-Repeat:
Output:
Line 1:   1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17 18 19 20
Line 2:   1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17 18 19 20
Line 3:   1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17 18 19 20
Line 4:   1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17 18 19 20
Line 5:   1 20  1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17 18
Line 6:   1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17 18 19 20
>Fix:

>Release-Note:
>Audit-Trail:
>Unformatted:
----gnatsweb-attachment----
Content-Type: application/octet-stream; name="error_test.adb"
Content-Transfer-Encoding: base64
Content-Disposition: attachment; filename="error_test.adb"

d2l0aCBBZGEuVGV4dF9JbzsKd2l0aCBBZGEuSW50ZWdlcl9UZXh0X0lvOwoKcHJvY2VkdXJlIEVy
cm9yX1Rlc3QgaXMKCiAgICB0eXBlIEludGVnZXJfQXJyYXkgaXMgYXJyYXkoUG9zaXRpdmUgcmFu
Z2UgPD4pIG9mIEludGVnZXI7CgogICAgdXNlIEFkYS5UZXh0X0lvOwogICAgdXNlIEFkYS5JbnRl
Z2VyX1RleHRfSW87CgogICAgcHJvY2VkdXJlIFByaW50X0lub3V0X0FycmF5IChUaGVfQXJyYXkg
OiBpbiBvdXQgSW50ZWdlcl9BcnJheTsKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg
TGluZSA6IGluIFN0cmluZykgaXMKICAgIGJlZ2luCiAgICAgICAgUHV0KExpbmUpOwogICAgICAg
IGZvciBJIGluIFRoZV9BcnJheSdGaXJzdCAuLiBUaGVfQXJyYXknTGFzdCBsb29wCiAgICAgICAg
ICAgIFB1dChUaGVfQXJyYXkoSSksMyk7CiAgICAgICAgZW5kIGxvb3A7CiAgICAgICAgTmV3X0xp
bmU7CiAgICBlbmQgUHJpbnRfSW5vdXRfQXJyYXk7CgogICAgcHJvY2VkdXJlIFByaW50X0luX0Fy
cmF5IChUaGVfQXJyYXkgOiBpbiBJbnRlZ2VyX0FycmF5OwogICAgICAgICAgICAgICAgICAgICAg
ICAgICAgICBMaW5lIDogaW4gU3RyaW5nKSBpcwogICAgYmVnaW4KICAgICAgICBQdXQoTGluZSk7
CiAgICAgICAgZm9yIEkgaW4gVGhlX0FycmF5J0ZpcnN0IC4uIFRoZV9BcnJheSdMYXN0IGxvb3AK
ICAgICAgICAgICAgUHV0KFRoZV9BcnJheShJKSwzKTsKICAgICAgICBlbmQgbG9vcDsKICAgICAg
ICBOZXdfTGluZTsKICAgIGVuZCBQcmludF9Jbl9BcnJheTsKCiAgICBBcnJheV9TaXplIDogY29u
c3RhbnQgUG9zaXRpdmUgOj0gMjA7CgogICAgQWxpYXNlZF9BcnJheSA6IGFsaWFzZWQgSW50ZWdl
cl9BcnJheSA6PSAoMSAuLiBBcnJheV9TaXplID0+IDApOwogICAgT3RoZXJfQXJyYXkgOiBJbnRl
Z2VyX0FycmF5IDo9ICgxIC4uIEFycmF5X1NpemUgPT4gMCk7CgpiZWdpbgoKICAgIGZvciBJIGlu
IDEgLi4gQXJyYXlfU2l6ZSBsb29wCiAgICAgICBBbGlhc2VkX0FycmF5KEkpIDo9IEk7CiAgICAg
ICBPdGhlcl9BcnJheShJKSA6PSBJOwogICAgZW5kIGxvb3A7CgogICAgUHV0KCJMaW5lIDE6ICIp
OwogICAgZm9yIEkgaW4gMSAuLiBBcnJheV9TaXplIGxvb3AKICAgICAgICBQdXQoQWxpYXNlZF9B
cnJheShJKSwzKTsKICAgIGVuZCBsb29wOwogICAgTmV3X0xpbmU7CgogICAgUHV0KCJMaW5lIDI6
ICIpOwogICAgZm9yIEkgaW4gMSAuLiBBcnJheV9TaXplIGxvb3AKICAgICAgICBQdXQoT3RoZXJf
QXJyYXkoSSksMyk7CiAgICBlbmQgbG9vcDsKICAgIE5ld19MaW5lOwoKICAgIFByaW50X0lub3V0
X0FycmF5KEFsaWFzZWRfQXJyYXksIkxpbmUgMzogIik7CiAgICBQcmludF9Jbm91dF9BcnJheShP
dGhlcl9BcnJheSwiTGluZSA0OiAiKTsKCiAgICBQcmludF9Jbl9BcnJheShBbGlhc2VkX0FycmF5
LCJMaW5lIDU6ICIpOwogICAgUHJpbnRfSW5fQXJyYXkoT3RoZXJfQXJyYXksIkxpbmUgNjogIik7
CgplbmQgRXJyb3JfVGVzdDsKCg==



More information about the Gcc-bugs mailing list