Mercurial > emacs
changeset 81422:9086f0548bdc
(Fget_internal_run_time) [WINDOWSNT]: Use w32_get_internal_run_time.
author | Jason Rumney <jasonr@gnu.org> |
---|---|
date | Thu, 14 Jun 2007 15:59:06 +0000 |
parents | 5e608f6f217b |
children | e449954b2811 |
files | src/editfns.c |
diffstat | 1 files changed, 11 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/editfns.c Thu Jun 14 15:58:13 2007 +0000 +++ b/src/editfns.c Thu Jun 14 15:59:06 2007 +0000 @@ -84,6 +84,11 @@ extern size_t emacs_strftimeu P_ ((char *, size_t, const char *, const struct tm *, int)); + +#ifdef WINDOWSNT +extern Lisp_Object w32_get_internal_run_time (); +#endif + static int tm_diff P_ ((struct tm *, struct tm *)); static void find_field P_ ((Lisp_Object, Lisp_Object, Lisp_Object, int *, Lisp_Object, int *)); static void update_buffer_properties P_ ((int, int)); @@ -1483,9 +1488,13 @@ return list3 (make_number ((secs >> 16) & 0xffff), make_number ((secs >> 0) & 0xffff), make_number (usecs)); -#else +#else /* ! HAVE_GETRUSAGE */ +#if WINDOWSNT + return w32_get_internal_run_time (); +#else /* ! WINDOWSNT */ return Fcurrent_time (); -#endif +#endif /* WINDOWSNT */ +#endif /* HAVE_GETRUSAGE */ }