* fns.c (get_random, seed_random): Move extern decls from here ...

* lisp.h: ... to here, so that they can be checked.

3 files changed, 5 insertions, 3 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index d695c20be42..e45fed84108 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2011-03-14  Paul Eggert  <eggert@cs.ucla.edu>
 
+        * fns.c (get_random, seed_random): Move extern decls from here ...
+        * lisp.h: ... to here, so that they can be checked.
+
         * sysdep.c (reset_io): Now static.
         (wait_for_termination_signal): Remove; unused.
 
diff --git a/src/fns.c b/src/fns.c
index b54d52e3003..0026c9d12e4 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -57,9 +57,6 @@ Lisp_Object Qcodeset, Qdays, Qmonths, Qpaper;
 
 static int internal_equal (Lisp_Object , Lisp_Object, int, int);
 
-extern long get_random (void);
-extern void seed_random (long);
-
 #ifndef HAVE_UNISTD_H
 extern long time ();
 #endif
diff --git a/src/lisp.h b/src/lisp.h
index 541302cb56b..eacd68e42cb 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -3340,6 +3340,8 @@ extern void child_setup_tty (int);
 extern void setup_pty (int);
 extern int set_window_size (int, int, int);
 extern void create_process (Lisp_Object, char **, Lisp_Object);
+extern long get_random (void);
+extern void seed_random (long);
 extern int emacs_open (const char *, int, int);
 extern int emacs_close (int);
 extern int emacs_read (int, char *, unsigned int);