From: Karl Heuer <kwzh@gnu.org>
Date: Tue, 15 Mar 1994 00:25:00 +0000 (+0000)
Subject: (terminal-frame) [! MULTI_FRAME]: Create this variable.
X-Git-Tag: emacs-19.34~9497
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=91f5a8d77900b7f3fe8034f98fe07f33b6e7d546;p=emacs.git

(terminal-frame) [! MULTI_FRAME]: Create this variable.
---

diff --git a/src/frame.c b/src/frame.c
index 6a422d037a2..df5ff2b4d2e 100644
--- a/src/frame.c
+++ b/src/frame.c
@@ -1621,6 +1621,8 @@ keys_of_frame ()
 /* 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 @@ and nil for X and Y.")
 
 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 @@ keys_of_frame ()
 }
 
 #endif /* not MULTI_FRAME */
-
-
-
-