[Emacs-diffs] /srv/bzr/emacs/emacs-24 r108428: * alloc.c, lisp.h (make_pure_vector): Now static.

[Paul Eggert]

------------------------------------------------------------
revno: 108428
committer: Paul Eggert <address@hidden>
branch nick: trunk
timestamp: Wed 2012-05-30 00:59:44 -0700
message:
  * alloc.c, lisp.h (make_pure_vector): Now static.
modified:
  src/ChangeLog
  src/alloc.c
  src/lisp.h

=== modified file 'src/ChangeLog'
--- a/src/ChangeLog     2012-05-30 03:59:42 +0000
+++ b/src/ChangeLog     2012-05-30 07:59:44 +0000
@@ -1,3 +1,7 @@
+2012-05-30  Paul Eggert  <address@hidden>
+
+       * alloc.c, lisp.h (make_pure_vector): Now static.
+
 2012-05-30  Stefan Monnier  <address@hidden>
 
        * eval.c (Fdefun, Fdefmacro, Vmacro_declaration_function):

=== modified file 'src/alloc.c'
--- a/src/alloc.c       2012-05-25 18:19:24 +0000
+++ b/src/alloc.c       2012-05-30 07:59:44 +0000
@@ -273,6 +273,7 @@
 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 @@
 /* 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;

=== modified file 'src/lisp.h'
--- a/src/lisp.h        2012-05-30 03:59:42 +0000
+++ b/src/lisp.h        2012-05-30 07:59:44 +0000
@@ -2871,7 +2871,6 @@
 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);