changeset 36433:20b42ba5a623

(make_frame): Use allocate_frame.
author Gerd Moellmann <gerd@gnu.org>
date Wed, 28 Feb 2001 13:28:35 +0000
parents 28af746067b2
children 40cfe4976f04
files src/frame.c
diffstat 1 files changed, 3 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/src/frame.c	Wed Feb 28 13:28:11 2001 +0000
+++ b/src/frame.c	Wed Feb 28 13:28:35 2001 +0000
@@ -1,5 +1,6 @@
 /* Generic frame functions.
-   Copyright (C) 1993, 1994, 1995, 1997, 1999, 2000 Free Software Foundation.
+   Copyright (C) 1993, 1994, 1995, 1997, 1999, 2000, 2001
+   Free Software Foundation.
 
 This file is part of GNU Emacs.
 
@@ -198,14 +199,8 @@
   register struct frame *f;
   register Lisp_Object root_window;
   register Lisp_Object mini_window;
-  register struct Lisp_Vector *vec;
-  int i;
 
-  vec = allocate_vectorlike ((EMACS_INT) VECSIZE (struct frame));
-  for (i = 0; i < VECSIZE (struct frame); i++)
-    XSETFASTINT (vec->contents[i], 0);
-  vec->size = VECSIZE (struct frame);
-  f = (struct frame *)vec;
+  f = allocate_frame ();
   XSETFRAME (frame, f);
 
   f->desired_matrix = 0;