From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM
	autolearn=unavailable autolearn_force=no version=3.4.4
X-Received: by 2002:a37:4753:: with SMTP id u80mr1312752qka.178.1591697249760;
 Tue, 09 Jun 2020 03:07:29 -0700 (PDT)
X-Received: by 2002:a4a:e836:: with SMTP id d22mr20498124ood.54.1591697249473;
 Tue, 09 Jun 2020 03:07:29 -0700 (PDT)
Path: 
 eternal-september.org!reader01.eternal-september.org!feeder.eternal-september.org!news.uzoreto.com!tr2.eu1.usenetexpress.com!feeder.usenetexpress.com!tr1.iad1.usenetexpress.com!border1.nntp.dca1.giganews.com!nntp.giganews.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Tue, 9 Jun 2020 03:07:29 -0700 (PDT)
In-Reply-To: <af223183-bcff-4b29-b355-f694e2c72091o@googlegroups.com>
Complaints-To: groups-abuse@google.com
Injection-Info: google-groups.googlegroups.com; posting-host=185.22.143.146;
 posting-account=rmHyLAoAAADSQmMWJF0a_815Fdd96RDf
NNTP-Posting-Host: 185.22.143.146
References: <d0ff83ad-a216-4fd6-b0ff-ef51a7c27d48o@googlegroups.com>
 <968e2a27-e3a4-4199-97c2-5ad0a2e4facdo@googlegroups.com>
 <af223183-bcff-4b29-b355-f694e2c72091o@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <62e8cb35-f201-419d-a8c4-c0c5b66eae4do@googlegroups.com>
Subject: Re: CONSTRAINT ERROR: erroneous memory access - SOLVED
From: AdaMagica <christ-usch.grein@t-online.de>
Injection-Date: Tue, 09 Jun 2020 10:07:29 +0000
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
Xref: reader01.eternal-september.org comp.lang.ada:59020
Date: 2020-06-09T03:07:29-07:00
List-Id: <comp.lang.ada>

Am Dienstag, 9. Juni 2020 02:39:34 UTC+2 schrieb John Cupak:
> After a little digging, I discovered an error in the Shortest_Paths.adb p=
ackage on page 575 of the ARM.
>=20
> Near the end of the package body, in the Rebuild path from target to sour=
ce, the Prepend (The_Path, N); statement before the while N /=3D Source loo=
p is missing. When I inserted the statement, recompiled, and ran the main p=
rogram, the output matched Sedwick's.

You should report this to Ada Comment, how to do it see
http://www.ada-auth.org/standards/2xrm/html/RM-0-2.html (60/5)
so that this will be corrected in the next edition.

Please indicate exactly where to correct. This is the current version:

19/3  -- Rebuild path from target to source.
20/3  declare
         N : Node :=3D Target;
      begin
         while N /=3D Source loop
            N :=3D Reached_From(N);
            Prepend (The_Path, N);
         end loop;
      end;