diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2012-07-06 18:57:42 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2012-07-06 18:57:42 -0700 |
| commit | 31571fd712d8c1796f7d31739f1b48cf25948d64 (patch) | |
| tree | 36e8f03e132306f2824b8711827fcd8a6514279a /src/fileio.c | |
| parent | 4516fbef7207ca23ca72da28d060dad979319310 (diff) | |
| download | emacs-31571fd712d8c1796f7d31739f1b48cf25948d64.tar.gz | |
Do not require float-time's arg to fit in time_t (Bug#11825).
This works better on hosts where time_t is unsigned, and where
float-time is applied to the (negative) difference between two times.
* editfns.c (decode_time_components): Last arg is now double *,
not int *, and means to store all the result as a double, without
worrying about whether the seconds part fits in time_t.
All callers changed.
(lisp_time_argument): Remove last int * arg, as it's no longer needed.
All callers changed.
(Ffloat_time): Do not fail merely because the specified time falls
outside of time_t range.
Diffstat (limited to 'src/fileio.c')
| -rw-r--r-- | src/fileio.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/fileio.c b/src/fileio.c index 0f6a1d5f799..8f3b9e92257 100644 --- a/src/fileio.c +++ b/src/fileio.c @@ -3031,7 +3031,7 @@ Use the current time if TIMESTAMP is nil. TIMESTAMP is in the format of { Lisp_Object absname, encoded_absname; Lisp_Object handler; - EMACS_TIME t = lisp_time_argument (timestamp, 0); + EMACS_TIME t = lisp_time_argument (timestamp); absname = Fexpand_file_name (filename, BVAR (current_buffer, directory)); @@ -5159,7 +5159,7 @@ An argument specifies the modification time value to use { if (!NILP (time_list)) { - current_buffer->modtime = lisp_time_argument (time_list, 0); + current_buffer->modtime = lisp_time_argument (time_list); current_buffer->modtime_size = -1; } else |