diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-03-07 17:05:06 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-03-07 17:05:06 +0000 |
commit | 019bce565262aed96f87c465d8913f86b0b9613d (patch) | |
tree | e9906110a74bfb490e965fdd3792fb80d5604268 /gcc/ada/s-osinte-linux.ads | |
parent | 8ac26a19ad6bd65ee17d8f5b3d3b87fdd076a360 (diff) | |
download | gcc-019bce565262aed96f87c465d8913f86b0b9613d.tar.gz |
2012-03-07 Robert Dewar <dewar@adacore.com>
* sem_util.adb, exp_ch4.adb, exp_ch6.adb, sem_ch6.adb: Minor
reformatting.
2012-03-07 Sergey Rybin <rybin@adacore.com frybin>
* gnat_ugn.texi: gnatpp: fix paragraph about sources with
preprocessor directives.
2012-03-07 Arnaud Charlet <charlet@adacore.com>
* s-osinte-linux.ads, s-taprop-linux.adb (prctl): New function.
(Enter_Task): Call prctl when relevant.
2012-03-07 Tristan Gingold <gingold@adacore.com>
* s-osinte-vms.ads: pthread_mutex_setname_np: new function.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@185065 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-osinte-linux.ads')
-rw-r--r-- | gcc/ada/s-osinte-linux.ads | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/gcc/ada/s-osinte-linux.ads b/gcc/ada/s-osinte-linux.ads index 38748663797..31b4c7226b3 100644 --- a/gcc/ada/s-osinte-linux.ads +++ b/gcc/ada/s-osinte-linux.ads @@ -7,7 +7,7 @@ -- S p e c -- -- -- -- Copyright (C) 1991-1994, Florida State University -- --- Copyright (C) 1995-2011, Free Software Foundation, Inc. -- +-- Copyright (C) 1995-2012, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -255,6 +255,12 @@ package System.OS_Interface is function getpid return pid_t; pragma Import (C, getpid, "getpid"); + PR_SET_NAME : constant := 15; + + function prctl + (option : int; arg2, arg3, arg4, arg5 : unsigned_long := 0) return int; + pragma Import (C, prctl); + ------------- -- Threads -- ------------- |