$NetBSD: patch-al,v 1.1 2005/10/20 17:43:29 wiz Exp $ --- posix-signals.adb.orig 2002-10-24 02:03:52.000000000 -0600 +++ posix-signals.adb @@ -236,13 +236,6 @@ package body POSIX.Signals is -- Global Data -- ------------------ - Last_Unblocker : array (Signal) of Task_ID := - (others => Null_Task); - pragma Volatile_Components (Last_Unblocker); - -- Holds the ID of the last Task which Unblocked this Interrupt. - -- It contains Null_Task if no tasks have ever requested the - -- Unblocking operation or the Interrupt is currently Blocked. - type Signal_Bit_Vector is array (Signal) of Boolean; -- Reserved_Signal is the union of the following sets of @@ -941,7 +934,7 @@ package body POSIX.Signals is function Get_Data (Info : Signal_Info) return Signal_Data is begin - return To_Signal_Data (Info.si_value); + return To_Signal_Data (Info.si_sigval); end Get_Data; ---------------- @@ -952,7 +945,7 @@ package body POSIX.Signals is (Info : in out Signal_Info; Data : in Signal_Data) is begin - Info.si_value := To_sigval (Data); + Info.si_sigval := To_sigval (Data); end Set_Data; -----------------------