OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[Ada] Fix uses of pragma Unreferenced in MinGW runtime unit

Browse Source 
gcc/ada/

	* libgnarl/s-taprop__mingw.adb (Timed_Sleep): Remove "pragma
	Unreferenced" for Result.
	(Timed_Delay): Likewise.
This commit is contained in:
Ghjuvan Lacambre 2021-12-22 10:24:29 +01:00 committed by Pierre-Marie de Rodat
parent 22a69380dc
commit 657fc14ca7
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
gcc/ada/libgnarl/s-taprop__mingw.adb
View File

@ -559,7 +559,6 @@ package body System.Task_Primitives.Operations is
Abs_Time : Duration;
Result : Integer;
pragma Unreferenced (Result);
Local_Timedout : Boolean;
@ -615,7 +614,6 @@ package body System.Task_Primitives.Operations is
Timedout : Boolean;
Result : Integer;
pragma Unreferenced (Timedout, Result);
begin
Write_Lock (Self_ID);