diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-02 10:06:14 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-02 10:06:14 +0000 |
| commit | 9b52e7a71a1b2b1f8726fc3b63d4460ec568413c (patch) | |
| tree | 32596f0b0a7fd593fddbf191b5cca6d3fdbd88f6 /gcc/ada/adaint.c | |
| parent | 6dbb316fde669436ba6f551b853088c8c8658d9e (diff) | |
| download | gcc-9b52e7a71a1b2b1f8726fc3b63d4460ec568413c.tar.gz | |
2011-08-02 Thomas Quinot <quinot@adacore.com>
* scos.ads: Update comments.
2011-08-02 Ed Schonberg <schonberg@adacore.com>
* sem_ch3.adb (Build_Derived_Type): Inherit the convention from the
base type, because the parent may be a subtype of a private type whose
convention is established in a private part.
2011-08-02 Hristian Kirtchev <kirtchev@adacore.com>
* exp_ch6.adb (Expand_N_Extended_Return_Statement): Wrap the return
statement in a block when the expansion of the return expression has
created a finalization chain.
* freeze.adb (Freeze_Expression): Alphabetize all choices associated
with the parent node.
Add N_Extended_Return_Statement to handle the case where a transient
object declaration appears in the Return_Object_Declarations list of
an extended return statement.
2011-08-02 Matthew Gingell <gingell@adacore.com>
* adaint.c (__gnat_is_symbolic_link_attr): Supress warning on possibly
unused parameter 'name'.
2011-08-02 Ed Schonberg <schonberg@adacore.com>
* sem_elim.adb (Set_Eliminated): If the overridden operation is an
inherited operation, check whether its alias, which is the source
operastion that it renames, has been marked eliminated.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@177121 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/adaint.c')
| -rw-r--r-- | gcc/ada/adaint.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c index 66c27788557..fd305e67011 100644 --- a/gcc/ada/adaint.c +++ b/gcc/ada/adaint.c @@ -2273,7 +2273,8 @@ __gnat_set_non_readable (char *name) } int -__gnat_is_symbolic_link_attr (char* name, struct file_attributes* attr) +__gnat_is_symbolic_link_attr (char* name ATTRIBUTE_UNUSED, + struct file_attributes* attr) { if (attr->symbolic_link == ATTR_UNSET) { #if defined (__vxworks) || defined (__nucleus__) |