diff options
| author | Samuel Tardieu <sam@rfc1149.net> | 2008-09-25 15:12:26 +0000 |
|---|---|---|
| committer | Samuel Tardieu <sam@gcc.gnu.org> | 2008-09-25 15:12:26 +0000 |
| commit | 3ca37eb74b96a3ed2140831b356b01145f609fd1 (patch) | |
| tree | bb0fc4433c8510f326db6914c245f69b3995f4cc | |
| parent | 3dcc3ef2a12a9e0965dd80d7c32a26bda892d861 (diff) | |
| download | gcc-3ca37eb74b96a3ed2140831b356b01145f609fd1.zip gcc-3ca37eb74b96a3ed2140831b356b01145f609fd1.tar.gz gcc-3ca37eb74b96a3ed2140831b356b01145f609fd1.tar.bz2 | |
re PR ada/37641 (FILE_WRITE_PROPERTIES is deprecated)
gcc/ada/
PR ada/37641
* adaint.c (__gnat_set_non_writable): Use FILE_WRITE_EA
instead of deprecated FILE_WRITE_PROPERTIES.
From-SVN: r140665
| -rw-r--r-- | gcc/ada/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/ada/adaint.c | 2 |
2 files changed, 7 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index e808ca4..e5a43b2 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,9 @@ +2008-09-25 Samuel Tardieu <sam@rfc1149.net> + + PR ada/37641 + * adaint.c (__gnat_set_non_writable): Use FILE_WRITE_EA + instead of deprecated FILE_WRITE_PROPERTIES. + 2008-09-22 Olivier Hainque <hainque@adacore.com> * gcc-interface/decl.c (gnat_to_gnu_entity): Even when they diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c index 4a87a2b..f12cc54 100644 --- a/gcc/ada/adaint.c +++ b/gcc/ada/adaint.c @@ -1923,7 +1923,7 @@ __gnat_set_non_writable (char *name) __gnat_set_OWNER_ACL (wname, DENY_ACCESS, FILE_WRITE_DATA | FILE_APPEND_DATA | - FILE_WRITE_PROPERTIES | FILE_WRITE_ATTRIBUTES); + FILE_WRITE_EA | FILE_WRITE_ATTRIBUTES); SetFileAttributes (wname, GetFileAttributes (wname) | FILE_ATTRIBUTE_READONLY); #elif ! defined (__vxworks) && ! defined(__nucleus__) |