From: Arnaud Charlet Date: Sun, 5 Nov 2006 10:58:41 +0000 (+0000) Subject: re PR ada/29707 (s-osinte.adb:86:13: warning: function "To_Target_Priority" is not... X-Git-Tag: releases/gcc-4.3.0~8625 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=75c0ed055fcc0a895c8b9f195cdbfad094e84204;p=thirdparty%2Fgcc.git re PR ada/29707 (s-osinte.adb:86:13: warning: function "To_Target_Priority" is not referenced) * s-osinte-linux-alpha.ads, s-osinte-linux-hppa.ads (To_Target_Priority): New function. Fix PR ada/29707 From-SVN: r118496 --- diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 1b6b0c908528..d9ab2ab18850 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,9 @@ +2006-11-05 Arnaud Charlet + + * s-osinte-linux-alpha.ads, s-osinte-linux-hppa.ads + (To_Target_Priority): New function. + Fix PR ada/29707 + 2006-10-31 Robert Dewar * a-taster.adb, s-traent-vms.adb, a-elchha.ads, a-elchha.adb, diff --git a/gcc/ada/s-osinte-linux-alpha.ads b/gcc/ada/s-osinte-linux-alpha.ads index f5e218239187..7925a5e05587 100644 --- a/gcc/ada/s-osinte-linux-alpha.ads +++ b/gcc/ada/s-osinte-linux-alpha.ads @@ -246,6 +246,10 @@ package System.OS_Interface is SCHED_FIFO : constant := 1; SCHED_RR : constant := 2; + function To_Target_Priority + (Prio : System.Any_Priority) return Interfaces.C.int; + -- Maps System.Any_Priority to a POSIX priority. + ------------- -- Process -- ------------- diff --git a/gcc/ada/s-osinte-linux-hppa.ads b/gcc/ada/s-osinte-linux-hppa.ads index 2a033f1f9aaf..f0e2bba34ef3 100644 --- a/gcc/ada/s-osinte-linux-hppa.ads +++ b/gcc/ada/s-osinte-linux-hppa.ads @@ -253,6 +253,10 @@ package System.OS_Interface is SCHED_FIFO : constant := 1; SCHED_RR : constant := 2; + function To_Target_Priority + (Prio : System.Any_Priority) return Interfaces.C.int; + -- Maps System.Any_Priority to a POSIX priority. + ------------- -- Process -- -------------