ada: Fix file access time information in __gnat_copy_attribs

gcc/ada/ChangeLog:

	* adaint.c (__gnat_copy_attribs): Fix call to SetFileTime

diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c
index a63408370f7b8f15c966305a573868a74a9fee24..a290a22a62b3b8f835c752cee66d56f9bdfa6915 100644 (file)
--- a/gcc/ada/adaint.c
+++ b/gcc/ada/adaint.c
@@ -3221,7 +3221,7 @@ __gnat_copy_attribs (char *from ATTRIBUTE_UNUSED, char *to ATTRIBUTE_UNUSED,
        return -1;
 
      res = SetFileTime
-       (hto, NULL, &info.ftCreationTime, &info.ftLastAccessTime);
+       (hto, &info.ftCreationTime, &info.ftLastAccessTime, &info.ftLastWriteTime);
 
      CloseHandle (hto);