head	1.1;
access;
symbols
	pkgsrc-2026Q1:1.1.0.6
	pkgsrc-2026Q1-base:1.1
	pkgsrc-2025Q4:1.1.0.4
	pkgsrc-2025Q4-base:1.1
	pkgsrc-2025Q3:1.1.0.2
	pkgsrc-2025Q3-base:1.1;
locks; strict;
comment	@-- @;


1.1
date	2025.07.11.06.17.37;	author dkazankov;	state Exp;
branches;
next	;
commitid	02Wpd5pEvqWwdi2G;


desc
@@


1.1
log
@devel/ada-gnat-glade: Add new package 13.0.0

GLADE provides an implementation of Annex E (Distributed Systems)
of the ISO standard ISO/IEC 8652:1995/COR1:2000 for GNAT
@
text
@$NetBSD: patch-Dist_xe.adb,v 1.0 2024/12/05 15:00:00 dkazankov Exp $

Fix some compilation warnings
https://github.com/reznikmm/garlic/commit/b738f20db65add57f817f952a625df73bef0710e

--- Dist/xe.adb.orig	2007-11-26 14:06:30.000000000 +0200
+++ Dist/xe.adb
@@@@ -1171,7 +1171,7 @@@@
       --  Remove the nodes created in the previous context.
 
       loop
-         exit when Nodes.Last <= Node_Id (Context.Last_Node);
+         exit when Nodes.Last <= Context.Last_Node;
          Nodes.Decrement_Last;
       end loop;
       N_Anonymous_Variable := Context.Anonymous;
@