Commit db5c41c7 authored by assert's avatar assert
Browse files

* Follow-up to previous patch, correctly reverted patch for

parent 71d7fc13
......@@ -438,14 +438,10 @@ package body PolyORB_HI.Thread_Interrogators is
procedure Wait_For_Incoming_Events (Port : out Port_Type) is
Valid, Not_Empty : Boolean;
pragma Warnings (Off, Not_Empty);
-- Under this implementation, Not_Empty is not used.
pragma Debug (Put_Line (Verbose, CE + ": Wait_For_Incoming_Events"));
Global_Queue.Read_Event (Port, Valid);
Global_Queue.Wait_Event (Port);
pragma Debug (Put_Line
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment