2 * Copyright (c) 1993, 1994
3 * The Regents of the University of California. All rights reserved.
4 * Copyright (c) 1993, 1994, 1995, 1996
5 * Keith Bostic. All rights reserved.
7 * See the LICENSE file for redistribution information.
13 static const char sccsid
[] = "@(#)tk_screen.c 8.9 (Berkeley) 5/24/96";
16 #include <sys/types.h>
17 #include <sys/queue.h>
19 #include <bitstring.h>
28 #include "../common/common.h"
33 * Initialize/shutdown the Tcl/Tk screen.
35 * PUBLIC: int tk_screen __P((SCR *, u_int32_t));
46 /* See if we're already in the right mode. */
47 if (LF_ISSET(SC_VI
) && F_ISSET(sp
, SC_SCR_VI
))
50 /* Ex isn't possible. */
54 /* Initialize terminal based information. */
58 /* Put up the first file name. */
62 F_SET(tkp
, TK_SCR_VI_INIT
);
68 * Shutdown the screens.
70 * PUBLIC: int tk_quit __P((GS *));
79 /* Clean up the terminal mappings. */
80 rval
= tk_term_end(gp
);
83 F_CLR(tkp
, TK_SCR_VI_INIT
);