# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 892707716 0
# Node ID 061d5d4f79678f973a9453a5b184cf53156478f6
# Parent  b26c7c2891b40a9feaff2fd283a7e9c2227dc483
(time): Declare it only if not HAVE_UNISTD_H.

diff -r b26c7c2891b4 -r 061d5d4f7967 src/fns.c
--- a/src/fns.c	Thu Apr 16 06:00:49 1998 +0000
+++ b/src/fns.c	Thu Apr 16 06:21:56 1998 +0000
@@ -60,6 +60,13 @@
 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 @@
   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\