* alloc.c, lisp.h (make_pure_vector): Now static.

src/ChangeLog

+2012-05-30  Paul Eggert  <eggert@cs.ucla.edu>
+
+	* alloc.c, lisp.h (make_pure_vector): Now static.
+
 2012-05-30  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* eval.c (Fdefun, Fdefmacro, Vmacro_declaration_function):

src/alloc.c

@@ -273,6 +273,7 @@ static Lisp_Object Qpost_gc_hook;
 static void mark_buffer (Lisp_Object);
 static void mark_terminals (void);
 static void gc_sweep (void);
+static Lisp_Object make_pure_vector (ptrdiff_t);
 static void mark_glyph_matrix (struct glyph_matrix *);
 static void mark_face_cache (struct face_cache *);
 
@@ -4937,7 +4938,7 @@ make_pure_float (double num)
 /* Return a vector with room for LEN Lisp_Objects allocated from
    pure space.  */
 
-Lisp_Object
+static Lisp_Object
 make_pure_vector (ptrdiff_t len)
 {
   Lisp_Object new;

src/lisp.h

@@ -2871,7 +2871,6 @@ EXFUN (Fpurecopy, 1);
 extern Lisp_Object make_pure_string (const char *, ptrdiff_t, ptrdiff_t, int);
 extern Lisp_Object make_pure_c_string (const char *data);
 extern Lisp_Object pure_cons (Lisp_Object, Lisp_Object);
-extern Lisp_Object make_pure_vector (ptrdiff_t);
 EXFUN (Fgarbage_collect, 0);
 EXFUN (Fmake_byte_code, MANY);
 EXFUN (Fmake_bool_vector, 2);