diff options
| author | Aurelien Jarno <aurelien@aurel32.net> | 2007-11-21 12:16:51 +0000 |
|---|---|---|
| committer | Samuel Tardieu <sam@gcc.gnu.org> | 2007-11-21 12:16:51 +0000 |
| commit | 5f45b299ed3ced2d337a67352d64a66f199de38a (patch) | |
| tree | 8aab02d6169c72d1c60134bad469215bd4a81268 | |
| parent | 11948f6bac2949e7f8158c335e37bb30340d7f86 (diff) | |
| download | gcc-5f45b299ed3ced2d337a67352d64a66f199de38a.zip gcc-5f45b299ed3ced2d337a67352d64a66f199de38a.tar.gz gcc-5f45b299ed3ced2d337a67352d64a66f199de38a.tar.bz2 | |
s-osinte-kfreebsd-gnu.ads (To_Target_Priority): New function.
2007-11-21 Aurelien Jarno <aurelien@aurel32.net>
gcc/ada/
* s-osinte-kfreebsd-gnu.ads (To_Target_Priority): New function.
* Makefile.in: Add EH_MECHANISM=-gcc to kfreebsd-gnu. Remove SYMLIB.
From-SVN: r130330
| -rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/Makefile.in | 2 | ||||
| -rw-r--r-- | gcc/ada/s-osinte-kfreebsd-gnu.ads | 4 |
3 files changed, 10 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index bf19108..dc164f6 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2007-11-21 Aurelien Jarno <aurelien@aurel32.net> + + * s-osinte-kfreebsd-gnu.ads (To_Target_Priority): New function. + * Makefile.in: Add EH_MECHANISM=-gcc to kfreebsd-gnu. Remove SYMLIB. + 2007-11-19 Eric Botcazou <ebotcazou@adacore.com> PR ada/34098 diff --git a/gcc/ada/Makefile.in b/gcc/ada/Makefile.in index 363675c..a03a7ea 100644 --- a/gcc/ada/Makefile.in +++ b/gcc/ada/Makefile.in @@ -879,7 +879,7 @@ ifeq ($(strip $(filter-out %86 kfreebsd%,$(arch) $(osys))),) mlib-tgt.adb<mlib-tgt-linux.adb \ indepsw.adb<indepsw-gnu.adb - SYMLIB = -laddr2line -lbfd -liberty $(LIBINTL) + EH_MECHANISM=-gcc THREADSLIB = -lpthread GNATLIB_SHARED = gnatlib-shared-dual GMEM_LIB = gmemlib diff --git a/gcc/ada/s-osinte-kfreebsd-gnu.ads b/gcc/ada/s-osinte-kfreebsd-gnu.ads index 2068745..05fb928 100644 --- a/gcc/ada/s-osinte-kfreebsd-gnu.ads +++ b/gcc/ada/s-osinte-kfreebsd-gnu.ads @@ -233,6 +233,10 @@ package System.OS_Interface is SCHED_OTHER : constant := 2; SCHED_RR : constant := 3; + function To_Target_Priority + (Prio : System.Any_Priority) return Interfaces.C.int; + -- Maps System.Any_Priority to a POSIX priority. + ------------- -- Process -- ------------- |