diff options
Diffstat (limited to 'src/grt')
-rw-r--r-- | src/grt/grt-signals.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/grt/grt-signals.adb b/src/grt/grt-signals.adb index 11efa1527..ea714ae20 100644 --- a/src/grt/grt-signals.adb +++ b/src/grt/grt-signals.adb @@ -553,7 +553,7 @@ package body Grt.Signals is Proc := Get_Current_Process; for I in 0 .. Sig.S.Nbr_Drivers - 1 loop if Sig.S.Drivers (I).Proc = Proc then - return Sig.S.Drivers (I)'Access; + return Sig.S.Drivers (I)'Unrestricted_Access; end if; end loop; return null; |