freebsd-ports/patch-exp_ch4.adb at 74aa92e5be6b0a47f2f2844b48be1e5741936206 - freebsd-ports - My personal repos.

mirror/freebsd-ports

mirror of https://git.FreeBSD.org/ports.git synced 2024-12-23 04:23:08 +00:00

Kevin Lo b82428243b Update jgnat so it will continue to build with the new compiler which

has much stricter Ada 95 style checking.

PR: 34749
Submitted by: MAINTAINER

2002-02-09 08:20:42 +00:00

12 lines

337 B

Ada

Raw Blame History

 --- exp_ch4.adb.orig	Fri Sep  1 10:13:50 2000
 +++ exp_ch4.adb	Fri Feb  8 21:20:29 2002
@@ -2623,7 +2623,7 @@
              Expand_Concatenate_Other (Cnode, Opnds);
           end if;
 -         exit when Cnode = N;
 +         exit Outer when Cnode = N;
           Cnode := Parent (Cnode);
        end loop Outer;
     end Expand_N_Op_Concat;