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);