aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorGerd Moellmann2000-11-19 14:35:15 +0000
committerGerd Moellmann2000-11-19 14:35:15 +0000
commit20ee9f081e043b15b6654bc2228a1c935989d8b2 (patch)
tree1340ef540bb4e083a829fc27c5d559c4c54a2107 /src
parentf29d1e7532f578ed2563542733db71a1aaf3d5b6 (diff)
downloademacs-20ee9f081e043b15b6654bc2228a1c935989d8b2.tar.gz
emacs-20ee9f081e043b15b6654bc2228a1c935989d8b2.zip
(ospeed): Remove.
(tputs) [!emacs]: Remove unused code. (tgetent): Avoid a compiler warning.
Diffstat (limited to 'src')
-rw-r--r--src/termcap.c14
1 files changed, 2 insertions, 12 deletions
diff --git a/src/termcap.c b/src/termcap.c
index 472005f1393..f802704383c 100644
--- a/src/termcap.c
+++ b/src/termcap.c
@@ -1,5 +1,5 @@
1/* Work-alike for termcap, plus extra features. 1/* Work-alike for termcap, plus extra features.
2 Copyright (C) 1985, 86, 93, 94, 95 Free Software Foundation, Inc. 2 Copyright (C) 1985, 86, 93, 94, 95, 2000 Free Software Foundation, Inc.
3 3
4This program is free software; you can redistribute it and/or modify 4This program is free software; you can redistribute it and/or modify
5it under the terms of the GNU General Public License as published by 5it under the terms of the GNU General Public License as published by
@@ -288,7 +288,6 @@ tgetst1 (ptr, area)
288 288
289/* Outputting a string with padding. */ 289/* Outputting a string with padding. */
290 290
291short ospeed;
292/* If OSPEED is 0, we use this as the actual baud rate. */ 291/* If OSPEED is 0, we use this as the actual baud rate. */
293int tputs_baud_rate; 292int tputs_baud_rate;
294char PC; 293char PC;
@@ -316,21 +315,12 @@ tputs (str, nlines, outfun)
316 register int padcount = 0; 315 register int padcount = 0;
317 register int speed; 316 register int speed;
318 317
319#ifdef emacs
320 extern int baud_rate; 318 extern int baud_rate;
321 speed = baud_rate; 319 speed = baud_rate;
322 /* For quite high speeds, convert to the smaller 320 /* For quite high speeds, convert to the smaller
323 units to avoid overflow. */ 321 units to avoid overflow. */
324 if (speed > 10000) 322 if (speed > 10000)
325 speed = - speed / 100; 323 speed = - speed / 100;
326#else
327 if (ospeed == 0)
328 speed = tputs_baud_rate;
329 else if (ospeed > 0 && ospeed < (sizeof speeds / sizeof speeds[0]))
330 speed = speeds[ospeed];
331 else
332 speed = 0;
333#endif
334 324
335 if (!str) 325 if (!str)
336 return; 326 return;
@@ -453,7 +443,7 @@ tgetent (bp, name)
453 char *term; 443 char *term;
454 int malloc_size = 0; 444 int malloc_size = 0;
455 register int c; 445 register int c;
456 char *tcenv; /* TERMCAP value, if it contains :tc=. */ 446 char *tcenv = NULL; /* TERMCAP value, if it contains :tc=. */
457 char *indirect = NULL; /* Terminal type in :tc= in TERMCAP value. */ 447 char *indirect = NULL; /* Terminal type in :tc= in TERMCAP value. */
458 int filep; 448 int filep;
459 449