Avoid duplicate calls to xfree for the same pointer
[emacs.git] / lib / localtime-buffer.c
blobc96c577ac1f42b0c03e7692baa1cdb2e22b9f83a
1 /* Provide access to the last buffer returned by localtime() or gmtime().
3 Copyright (C) 2001-2003, 2005-2007, 2009-2017 Free Software Foundation, Inc.
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 3, or (at your option)
8 any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, see <https://www.gnu.org/licenses/>. */
18 /* written by Jim Meyering */
20 #include <config.h>
22 /* Specification. */
23 #include "localtime-buffer.h"
25 #if GETTIMEOFDAY_CLOBBERS_LOCALTIME || TZSET_CLOBBERS_LOCALTIME
27 static struct tm tm_zero_buffer;
28 struct tm *localtime_buffer_addr = &tm_zero_buffer;
30 /* This is a wrapper for localtime.
32 On the first call, record the address of the static buffer that
33 localtime uses for its result. */
35 struct tm *
36 rpl_localtime (time_t const *timep)
38 struct tm *tm = localtime (timep);
40 if (localtime_buffer_addr == &tm_zero_buffer)
41 localtime_buffer_addr = tm;
43 return tm;
46 /* Same as above, since gmtime and localtime use the same buffer. */
47 struct tm *
48 rpl_gmtime (time_t const *timep)
50 struct tm *tm = gmtime (timep);
52 if (localtime_buffer_addr == &tm_zero_buffer)
53 localtime_buffer_addr = tm;
55 return tm;
58 #endif