From 9f13f697497c1bc7d3b9609eafad3ffec52d83b8 Mon Sep 17 00:00:00 2001
From: Janne Blomqvist <jb@gcc.gnu.org>
Date: Wed, 9 Nov 2011 20:30:38 +0200
Subject: Simplify time() usage.

2011-11-09  Janne Blomqvist  <jb@gcc.gnu.org>

	* intrinsics/time_1.h (gf_gettime): Simplify time() usage.

From-SVN: r181228
---
 libgfortran/intrinsics/time_1.h | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'libgfortran/intrinsics')

diff --git a/libgfortran/intrinsics/time_1.h b/libgfortran/intrinsics/time_1.h
index 73977cb..327f7cf 100644
--- a/libgfortran/intrinsics/time_1.h
+++ b/libgfortran/intrinsics/time_1.h
@@ -213,9 +213,8 @@ gf_gettime (time_t * secs, long * usecs)
   *usecs = tv.tv_usec;
   return err;
 #else
-  time_t t, t2;
-  t = time (&t2);
-  *secs = t2;
+  time_t t = time (NULL);
+  *secs = t;
   *usecs = 0;
   if (t == ((time_t)-1))
     return -1;
-- 
cgit v1.1