(time): Declare it only if not HAVE_UNISTD_H.
This commit is contained in:
parent
ef6675c8e0
commit
49bdcd3e96
1 changed files with 7 additions and 4 deletions
11
src/fns.c
11
src/fns.c
|
@ -60,6 +60,13 @@ Lisp_Object Qcursor_in_echo_area;
|
|||
Lisp_Object Qwidget_type;
|
||||
|
||||
static int internal_equal ();
|
||||
|
||||
extern long get_random ();
|
||||
extern void seed_random ();
|
||||
|
||||
#ifndef HAVE_UNISTD_H
|
||||
extern long time ();
|
||||
#endif
|
||||
|
||||
DEFUN ("identity", Fidentity, Sidentity, 1, 1, 0,
|
||||
"Return the argument unchanged.")
|
||||
|
@ -69,10 +76,6 @@ DEFUN ("identity", Fidentity, Sidentity, 1, 1, 0,
|
|||
return arg;
|
||||
}
|
||||
|
||||
extern long get_random ();
|
||||
extern void seed_random ();
|
||||
extern long time ();
|
||||
|
||||
DEFUN ("random", Frandom, Srandom, 0, 1, 0,
|
||||
"Return a pseudo-random number.\n\
|
||||
All integers representable in Lisp are equally likely.\n\
|
||||
|
|
Loading…
Add table
Reference in a new issue