Mercurial > emacs

changeset 6355:8d624c058f31

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(terminal-frame) [! MULTI_FRAME]: Create this variable.
author Karl Heuer <kwzh@gnu.org>
date Tue, 15 Mar 1994 00:25:00 +0000
parents a74524e1c961
children 3d2f4fb43924
files src/frame.c
diffstat 1 files changed, 6 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/frame.c	Tue Mar 15 00:04:25 1994 +0000
+++ b/src/frame.c	Tue Mar 15 00:25:00 1994 +0000
@@ -1621,6 +1621,8 @@
 /* If we're not using multi-frame stuff, we still need to provide some
    support functions.  */
 
+Lisp_Object Vterminal_frame;
+
 /* Unless this function is defined, providing set-frame-height and
    set-frame-width doesn't help compatibility any, since they both
    want this as their first argument.  */
@@ -1812,6 +1814,10 @@
 
 syms_of_frame ()
 {
+  DEFVAR_LISP ("terminal-frame", &Vterminal_frame,
+    "The initial frame-object, which represents Emacs's stdout.");
+  XFASTINT (Vterminal_frame) = 0;
+
   defsubr (&Sselected_frame);
   defsubr (&Sframep);
   defsubr (&Sframe_char_height);
@@ -1835,7 +1841,3 @@
 }
 
 #endif /* not MULTI_FRAME */
-
-
-
-