Commit 8be6f318 authored by Paul Eggert's avatar Paul Eggert
Browse files

Move 'make_time' to be next to its inverse 'lisp_time_argument'.

* dired.c (make_time): Move to ...
* editfns.c (make_time): ... here.
* systime.h: Note the move.
parent 14239447
2011-03-11 Paul Eggert <eggert@cs.ucla.edu>
Move 'make_time' to be next to its inverse 'lisp_time_argument'.
* dired.c (make_time): Move to ...
* editfns.c (make_time): ... here.
* systime.h: Note the move.
2011-03-11 Tom Tromey <tromey@redhat.com>
 
* buffer.c (syms_of_buffer): Remove obsolete comment.
......@@ -848,13 +848,6 @@ file_name_completion_stat (Lisp_Object dirname, DIRENTRY *dp, struct stat *st_ad
return value;
}
Lisp_Object
make_time (time_t time)
{
return Fcons (make_number (time >> 16),
Fcons (make_number (time & 0177777), Qnil));
}
static char *
stat_uname (struct stat *st)
{
......
......@@ -1476,6 +1476,19 @@ on systems that do not provide resolution finer than a second. */)
}
/* Make a Lisp list that represents the time T. */
Lisp_Object
make_time (time_t t)
{
return Fcons (make_number (t >> 16),
Fcons (make_number (t & 0177777), Qnil));
}
/* Decode a Lisp list SPECIFIED_TIME that represents a time.
If SPECIFIED_TIME is nil, use the current time.
Set *RESULT to seconds since the Epoch.
If USEC is not null, set *USEC to the microseconds component.
Return nonzero if successful. */
int
lisp_time_argument (Lisp_Object specified_time, time_t *result, int *usec)
{
......
......@@ -144,10 +144,8 @@ extern void set_waiting_for_input (EMACS_TIME *);
happen when this files is used outside the src directory).
Use GCPRO1 to determine if lisp.h was included. */
#ifdef GCPRO1
/* defined in dired.c */
extern Lisp_Object make_time (time_t);
/* defined in editfns.c*/
extern Lisp_Object make_time (time_t);
extern int lisp_time_argument (Lisp_Object, time_t *, int *);
#endif
......@@ -172,4 +170,3 @@ extern int lisp_time_argument (Lisp_Object, time_t *, int *);
#define EMACS_TIME_LE(T1, T2) (EMACS_TIME_CMP (T1, T2) <= 0)
#endif /* EMACS_SYSTIME_H */
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment