aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/adaint.c
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2013-09-10 17:02:33 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2013-09-10 17:02:33 +0200
commit3699edc41f1cc0acb60c6656baa3d08dddedc3e7 (patch)
tree2c817b19f453cea2fbcdaf67c1d047c212e3dcae /gcc/ada/adaint.c
parent860917b625a20ed2cc2d72bd86e89717966f6f92 (diff)
downloadgcc-3699edc41f1cc0acb60c6656baa3d08dddedc3e7.zip
gcc-3699edc41f1cc0acb60c6656baa3d08dddedc3e7.tar.gz
gcc-3699edc41f1cc0acb60c6656baa3d08dddedc3e7.tar.bz2
[multiple changes]
2013-09-10 Thomas Quinot <quinot@adacore.com> * adaint.c (__gnat_is_executable_file_attr): Should be true for an executable regular file only only (not for a directory that has the executable permission). 2013-09-10 Ed Schonberg <schonberg@adacore.com> * sem_res.adb: Further work on operator calls in ASIS. 2013-09-10 Yannick Moy <moy@adacore.com> * sinfo.ads, sem_prag.ads, sem_ch13.adb: Minor correction and comment update. From-SVN: r202459
Diffstat (limited to 'gcc/ada/adaint.c')
-rw-r--r--gcc/ada/adaint.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c
index 850e1fc..f76edb7 100644
--- a/gcc/ada/adaint.c
+++ b/gcc/ada/adaint.c
@@ -2264,7 +2264,7 @@ __gnat_is_executable_file_attr (char* name, struct file_attributes* attr)
#endif
}
- return attr->executable;
+ return attr->regular && attr->executable;
}
int