From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 21362 invoked by alias); 27 Jul 2002 23:06:01 -0000 Mailing-List: contact gcc-prs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-prs-owner@gcc.gnu.org Received: (qmail 21342 invoked by uid 71); 27 Jul 2002 23:06:01 -0000 Resent-Date: 27 Jul 2002 23:06:01 -0000 Resent-Message-ID: <20020727230601.21341.qmail@sources.redhat.com> Resent-From: gcc-gnats@gcc.gnu.org (GNATS Filer) Resent-To: nobody@gcc.gnu.org Resent-Cc: gcc-prs@gcc.gnu.org, gcc-bugs@gcc.gnu.org Resent-Reply-To: gcc-gnats@gcc.gnu.org, Gerhard.Dieringer@nexgo.de Received: (qmail 20791 invoked by uid 61); 27 Jul 2002 23:02:15 -0000 Message-Id: <20020727230215.20790.qmail@sources.redhat.com> Date: Sat, 27 Jul 2002 16:06:00 -0000 From: Gerhard.Dieringer@nexgo.de Reply-To: Gerhard.Dieringer@nexgo.de To: gcc-gnats@gcc.gnu.org X-Send-Pr-Version: gnatsweb-2.9.3 (1.1.1.1.2.31) Subject: ada/7420: bug or strange feature? X-SW-Source: 2002-07/txt/msg00733.txt.bz2 List-Id: >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==