From: Arnaud Charlet <charlet@adacore.com>
Date: Mon, 16 Jul 2018 14:10:37 +0000 (+0000)
Subject: [Ada] adaint.c: minor code cleanup
X-Git-Tag: basepoints/gcc-10~5355
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=192d0b1583c01fd783d46526e5be1f58eaf340c5;p=thirdparty%2Fgcc.git

[Ada] adaint.c: minor code cleanup

2018-07-16  Arnaud Charlet  <charlet@adacore.com>

gcc/ada/

	* adaint.c (__gnat_set_file_time_name): Code clean up.

From-SVN: r262709
---

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 163118f50273..975d807e9606 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2018-07-16  Arnaud Charlet  <charlet@adacore.com>
+
+	* adaint.c (__gnat_set_file_time_name): Code clean up.
+
 2018-07-16  Javier Miranda  <miranda@adacore.com>
 
 	* inline.adb (Build_Body_To_Inline): Minor code reorganization that
diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c
index 552bd4404c34..2bd033a78d79 100644
--- a/gcc/ada/adaint.c
+++ b/gcc/ada/adaint.c
@@ -1475,7 +1475,7 @@ __gnat_set_file_time_name (char *name, time_t time_stamp)
   utimbuf.modtime = time_stamp;
 
   /* Set access time to now in local time.  */
-  t = time ((time_t) 0);
+  t = time (NULL);
   utimbuf.actime = mktime (localtime (&t));
 
   utime (name, &utimbuf);