Mercurial > emacs
annotate src/terminfo.c @ 104852:e066b8cdbefb
*** empty log message ***
author | Michael Albinus <michael.albinus@gmx.de> |
---|---|
date | Fri, 04 Sep 2009 08:15:28 +0000 |
parents | e038c1a8307c |
children | 68dd71358159 |
rev | line source |
---|---|
484 | 1 /* Interface from Emacs to terminfo. |
75227
e90d04cd455a
Update copyright for years from Emacs 21 to present (mainly adding
Glenn Morris <rgm@gnu.org>
parents:
68651
diff
changeset
|
2 Copyright (C) 1985, 1986, 2001, 2002, 2003, 2004, |
100951 | 3 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc. |
484 | 4 |
5 This file is part of GNU Emacs. | |
6 | |
94963
8971ddf55736
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
79759
diff
changeset
|
7 GNU Emacs is free software: you can redistribute it and/or modify |
484 | 8 it under the terms of the GNU General Public License as published by |
94963
8971ddf55736
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
79759
diff
changeset
|
9 the Free Software Foundation, either version 3 of the License, or |
8971ddf55736
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
79759
diff
changeset
|
10 (at your option) any later version. |
484 | 11 |
12 GNU Emacs is distributed in the hope that it will be useful, | |
13 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
15 GNU General Public License for more details. | |
16 | |
17 You should have received a copy of the GNU General Public License | |
94963
8971ddf55736
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
79759
diff
changeset
|
18 along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ |
484 | 19 |
16118 | 20 #include <config.h> |
25324 | 21 #include "lisp.h" |
16118 | 22 |
484 | 23 /* Define these variables that serve as global parameters to termcap, |
24 so that we do not need to conditionalize the places in Emacs | |
25 that set them. */ | |
26 | |
27 char *UP, *BC, PC; | |
16118 | 28 |
484 | 29 /* Interface to curses/terminfo library. |
30 Turns out that all of the terminfo-level routines look | |
31 like their termcap counterparts except for tparm, which replaces | |
32 tgoto. Not only is the calling sequence different, but the string | |
33 format is different too. | |
34 */ | |
35 | |
36 char * | |
37 tparam (string, outstring, len, arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9) | |
38 char *string; | |
39 char *outstring; | |
48325 | 40 int len, arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9; |
484 | 41 { |
42 char *temp; | |
43 extern char *tparm(); | |
44 | |
45 temp = tparm (string, arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9); | |
46 if (outstring == 0) | |
25324 | 47 outstring = ((char *) (xmalloc ((strlen (temp)) + 1))); |
484 | 48 strcpy (outstring, temp); |
49 return outstring; | |
50 } | |
52401 | 51 |
52 /* arch-tag: a6f96a69-e68f-4e9d-a223-f0b0da26ead5 | |
53 (do not change this comment) */ |