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__back.adb,v 1.0 2024/12/05 15:00:00 dkazankov Exp $

Make gnatdist fail if compilation fails on stub/skel
https://github.com/reznikmm/garlic/commit/d037957ca6828ec3a1cced2ea64e46310f11b22d

--- Dist/xe_back.adb.orig	2007-11-26 15:10:13.000000000 +0200
+++ Dist/xe_back.adb
@@@@ -328,7 +328,7 @@@@
             Arguments (3) := new String'(Name_Buffer (1 .. Name_Len));
          end if;
 
-         Compile (Full_Unit_File, Arguments, Fatal => False, Silent => True);
+         Compile (Full_Unit_File, Arguments, Fatal => True, Silent => True);
 
          Free (Arguments (3));
       elsif not Quiet_Mode then
@@@@ -604,7 +604,7 @@@@
             Arguments (3)  := new String'(Name_Buffer (1 .. Name_Len));
          end if;
 
-         Compile (Full_Unit_File, Arguments, Fatal => False, Silent => True);
+         Compile (Full_Unit_File, Arguments, Fatal => True, Silent => True);
 
          if Present (Part_Prj_Fname) then
             Free (Arguments (3));
@