484
|
1 /* Interface from Emacs to terminfo.
|
|
2 Copyright (C) 1985, 1986 Free Software Foundation, Inc.
|
|
3
|
|
4 This file is part of GNU Emacs.
|
|
5
|
|
6 GNU Emacs is free software; you can redistribute it and/or modify
|
|
7 it under the terms of the GNU General Public License as published by
|
3427
|
8 the Free Software Foundation; either version 2, or (at your option)
|
484
|
9 any later version.
|
|
10
|
|
11 GNU Emacs is distributed in the hope that it will be useful,
|
|
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
14 GNU General Public License for more details.
|
|
15
|
|
16 You should have received a copy of the GNU General Public License
|
|
17 along with GNU Emacs; see the file COPYING. If not, write to
|
64084
|
18 the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
|
|
19 Boston, MA 02110-1301, USA. */
|
484
|
20
|
16118
|
21 #include <config.h>
|
25324
|
22 #include "lisp.h"
|
16118
|
23
|
484
|
24 /* Define these variables that serve as global parameters to termcap,
|
|
25 so that we do not need to conditionalize the places in Emacs
|
|
26 that set them. */
|
|
27
|
|
28 char *UP, *BC, PC;
|
16118
|
29
|
484
|
30 /* Interface to curses/terminfo library.
|
|
31 Turns out that all of the terminfo-level routines look
|
|
32 like their termcap counterparts except for tparm, which replaces
|
|
33 tgoto. Not only is the calling sequence different, but the string
|
|
34 format is different too.
|
|
35 */
|
|
36
|
|
37 char *
|
|
38 tparam (string, outstring, len, arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9)
|
|
39 char *string;
|
|
40 char *outstring;
|
48325
|
41 int len, arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9;
|
484
|
42 {
|
|
43 char *temp;
|
|
44 extern char *tparm();
|
|
45
|
|
46 temp = tparm (string, arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9);
|
|
47 if (outstring == 0)
|
25324
|
48 outstring = ((char *) (xmalloc ((strlen (temp)) + 1)));
|
484
|
49 strcpy (outstring, temp);
|
|
50 return outstring;
|
|
51 }
|
52401
|
52
|
|
53 /* arch-tag: a6f96a69-e68f-4e9d-a223-f0b0da26ead5
|
|
54 (do not change this comment) */
|