Mercurial > emacs
annotate src/terminfo.c @ 107437:0a2bb00a71bd
* s-region.el: Move to obsolete.
| author | Juri Linkov <juri@jurta.org> |
|---|---|
| date | Sat, 20 Mar 2010 03:29:12 +0200 |
| parents | 1d1d5d9bd884 |
| children | aec1143e8d85 376148b31b5e |
| 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, |
| 106815 | 3 2005, 2006, 2007, 2008, 2009, 2010 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> |
|
105669
68dd71358159
* alloc.c: Do not define struct catchtag.
Dan Nicolaescu <dann@ics.uci.edu>
parents:
100951
diff
changeset
|
21 #include <setjmp.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) */ |
