From ccdeca37fe155145a1857d13557b8dfb9eca2dd5 Mon Sep 17 00:00:00 2001
From: Laurent GUERBY <laurent@guerby.net>
Date: Thu, 22 Sep 2005 10:28:14 +0000
Subject: [PATCH] re PR ada/23788 (s-taprop.adb:69:06: warning: cannot depend
 on "Interrupt_Operations" (wrong categorization))

2005-09-16  Laurent GUERBY  <laurent@guerby.net>

	PR ada/23788
	* s-tpinop.ads: Make this unit Preelaborate.

From-SVN: r104521
---
 gcc/ada/ChangeLog    | 5 +++++
 gcc/ada/s-tpinop.ads | 1 +
 2 files changed, 6 insertions(+)

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 185e230ee372..2a992754006c 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,8 @@
+2005-09-16  Laurent GUERBY  <laurent@guerby.net>
+
+	PR ada/23788
+	* s-tpinop.ads: Make this unit Preelaborate.
+
 2005-09-16  Andreas Jaeger  <aj@suse.de>
 
 	* socket.c: Add string.h for memcpy.
diff --git a/gcc/ada/s-tpinop.ads b/gcc/ada/s-tpinop.ads
index 290aed49560b..90a5c1d1916c 100644
--- a/gcc/ada/s-tpinop.ads
+++ b/gcc/ada/s-tpinop.ads
@@ -36,6 +36,7 @@ with System.Interrupt_Management;
 with System.Tasking;
 
 package System.Task_Primitives.Interrupt_Operations is
+   pragma Preelaborate;
 
    package IM renames System.Interrupt_Management;
    package ST renames System.Tasking;