diff options
| author | Jose Ruiz <ruiz@adacore.com> | 2010-10-18 13:54:23 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-10-18 15:54:23 +0200 |
| commit | 0ae44446c2b6cd370e212fd94fcb8c261f3ef231 (patch) | |
| tree | fd8be92505a77963bb3e3da7c663b98880cdba33 /gcc/ada/gcc-interface/utils.c | |
| parent | 3fd9f17cdc0903732072cd64349ef14912d9cab0 (diff) | |
| download | gcc-0ae44446c2b6cd370e212fd94fcb8c261f3ef231.zip gcc-0ae44446c2b6cd370e212fd94fcb8c261f3ef231.tar.gz gcc-0ae44446c2b6cd370e212fd94fcb8c261f3ef231.tar.bz2 | |
adaint.c (__gnat_pthread_setaffinity_np, [...]): Remove wrappers, no longer needed.
2010-10-18 Jose Ruiz <ruiz@adacore.com>
* adaint.c (__gnat_pthread_setaffinity_np,
__gnat_pthread_attr_setaffinity_np): Remove wrappers, no longer needed.
* s-osinte-linux.ads (pthread_setaffinity_np,
pthread_attr_setaffinity_np): Remove use of wrappers.
* s-taprop-linux.adb (Create_Task, Initialize): Restore check to verify
whether the affinity functionality is available in the OS.
* gcc-interface/utils.c: Set TREE_STATIC on functions only when there
are defined.
From-SVN: r165635
Diffstat (limited to 'gcc/ada/gcc-interface/utils.c')
| -rw-r--r-- | gcc/ada/gcc-interface/utils.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/ada/gcc-interface/utils.c b/gcc/ada/gcc-interface/utils.c index 876556c..9973d27 100644 --- a/gcc/ada/gcc-interface/utils.c +++ b/gcc/ada/gcc-interface/utils.c @@ -1783,7 +1783,6 @@ create_subprog_decl (tree subprog_name, tree asm_name, DECL_EXTERNAL (subprog_decl) = extern_flag; TREE_PUBLIC (subprog_decl) = public_flag; - TREE_STATIC (subprog_decl) = 1; TREE_READONLY (subprog_decl) = TYPE_READONLY (subprog_type); TREE_THIS_VOLATILE (subprog_decl) = TYPE_VOLATILE (subprog_type); TREE_SIDE_EFFECTS (subprog_decl) = TYPE_VOLATILE (subprog_type); @@ -1831,6 +1830,9 @@ begin_subprog_body (tree subprog_decl) announce_function (subprog_decl); + /* This function is being defined. */ + TREE_STATIC (subprog_decl) = 1; + current_function_decl = subprog_decl; /* Enter a new binding level and show that all the parameters belong to |