Patchwork Fix PR ada/52494

login
register
mail settings
Submitter Eric Botcazou
Date May 15, 2012, 10:30 p.m.
Message ID <201205160030.22983.ebotcazou@adacore.com>
Download mbox | patch
Permalink /patch/159468/
State New
Headers show

Comments

Eric Botcazou - May 15, 2012, 10:30 p.m.
Andris Pavenis devised this patch to fix the build for targets which use the 
s-taprop-dummy.adb package.

Applied on mainline and 4.7 branch.


2012-05-15  Andris Pavenis  <andris.pavenis@iki.fi>

	PR ada/52494
	* s-taprop-dummy.adb (Specific): New package.

Patch

--- s-taprop-dummy.adb~	2012-03-04 16:40:49.677874262 +0100
+++ s-taprop-dummy.adb	2012-03-05 21:11:44.270307016 +0100
@@ -46,6 +46,28 @@ 
    pragma Warnings (Off);
    --  Turn off warnings since so many unreferenced parameters
 
+   --------------------
+   -- Local Packages --
+   --------------------
+
+   package Specific is
+
+      procedure Set (Self_Id : Task_Id);
+      pragma Inline (Set);
+      --  Set the self id for the current task
+
+   end Specific;
+
+   package body Specific is
+
+      procedure Set (Self_Id : Task_Id) is
+      begin
+         null;
+      end Set;
+
+   end Specific;
+   --  The body of this package is target specific
+
    ----------------------------------
    -- ATCB allocation/deallocation --
    ----------------------------------