comparison src/term.c @ 16894:cd8d6bf6b320

(fatal): Print a newline at the end. (term_init): Calls to fatal changed.
author Richard M. Stallman <rms@gnu.org>
date Mon, 20 Jan 1997 02:21:19 +0000
parents ddd632f61ce3
children 84b0e9794a87
comparison
equal deleted inserted replaced
16893:5889a6e7c71b 16894:cd8d6bf6b320
1472 1472
1473 status = tgetent (buffer, terminal_type); 1473 status = tgetent (buffer, terminal_type);
1474 if (status < 0) 1474 if (status < 0)
1475 { 1475 {
1476 #ifdef TERMINFO 1476 #ifdef TERMINFO
1477 fatal ("Cannot open terminfo database file.\n"); 1477 fatal ("Cannot open terminfo database file");
1478 #else 1478 #else
1479 fatal ("Cannot open termcap database file.\n"); 1479 fatal ("Cannot open termcap database file");
1480 #endif 1480 #endif
1481 } 1481 }
1482 if (status == 0) 1482 if (status == 0)
1483 { 1483 {
1484 #ifdef TERMINFO 1484 #ifdef TERMINFO
1485 fatal ("Terminal type %s is not defined.\n\ 1485 fatal ("Terminal type %s is not defined.\n\
1486 If that is not the actual type of terminal you have,\n\ 1486 If that is not the actual type of terminal you have,\n\
1487 use the Bourne shell command `TERM=... export TERM' (C-shell:\n\ 1487 use the Bourne shell command `TERM=... export TERM' (C-shell:\n\
1488 `setenv TERM ...') to specify the correct type. It may be necessary\n\ 1488 `setenv TERM ...') to specify the correct type. It may be necessary\n\
1489 to do `unset TERMINFO' (C-shell: `unsetenv TERMINFO') as well.\n", 1489 to do `unset TERMINFO' (C-shell: `unsetenv TERMINFO') as well.",
1490 terminal_type); 1490 terminal_type);
1491 #else 1491 #else
1492 fatal ("Terminal type %s is not defined.\n\ 1492 fatal ("Terminal type %s is not defined.\n\
1493 If that is not the actual type of terminal you have,\n\ 1493 If that is not the actual type of terminal you have,\n\
1494 use the Bourne shell command `TERM=... export TERM' (C-shell:\n\ 1494 use the Bourne shell command `TERM=... export TERM' (C-shell:\n\
1495 `setenv TERM ...') to specify the correct type. It may be necessary\n\ 1495 `setenv TERM ...') to specify the correct type. It may be necessary\n\
1496 to do `unset TERMCAP' (C-shell: `unsetenv TERMCAP') as well.\n", 1496 to do `unset TERMCAP' (C-shell: `unsetenv TERMCAP') as well.",
1497 terminal_type); 1497 terminal_type);
1498 #endif 1498 #endif
1499 } 1499 }
1500 #ifdef TERMINFO 1500 #ifdef TERMINFO
1501 area = (char *) malloc (2044); 1501 area = (char *) malloc (2044);
1600 if (FRAME_HEIGHT (selected_frame) <= 0) 1600 if (FRAME_HEIGHT (selected_frame) <= 0)
1601 FRAME_HEIGHT (selected_frame) = tgetnum ("li"); 1601 FRAME_HEIGHT (selected_frame) = tgetnum ("li");
1602 1602
1603 if (FRAME_HEIGHT (selected_frame) < 3 1603 if (FRAME_HEIGHT (selected_frame) < 3
1604 || FRAME_WIDTH (selected_frame) < 3) 1604 || FRAME_WIDTH (selected_frame) < 3)
1605 fatal ("Screen size %dx%d is too small.\n", 1605 fatal ("Screen size %dx%d is too small",
1606 FRAME_HEIGHT (selected_frame), FRAME_WIDTH (selected_frame)); 1606 FRAME_HEIGHT (selected_frame), FRAME_WIDTH (selected_frame));
1607 1607
1608 min_padding_speed = tgetnum ("pb"); 1608 min_padding_speed = tgetnum ("pb");
1609 TN_standout_width = tgetnum ("sg"); 1609 TN_standout_width = tgetnum ("sg");
1610 TabWidth = tgetnum ("tw"); 1610 TabWidth = tgetnum ("tw");
1724 #ifdef VMS 1724 #ifdef VMS
1725 fatal ("Terminal type \"%s\" is not powerful enough to run Emacs.\n\ 1725 fatal ("Terminal type \"%s\" is not powerful enough to run Emacs.\n\
1726 It lacks the ability to position the cursor.\n\ 1726 It lacks the ability to position the cursor.\n\
1727 If that is not the actual type of terminal you have, use either the\n\ 1727 If that is not the actual type of terminal you have, use either the\n\
1728 DCL command `SET TERMINAL/DEVICE= ...' for DEC-compatible terminals,\n\ 1728 DCL command `SET TERMINAL/DEVICE= ...' for DEC-compatible terminals,\n\
1729 or `define EMACS_TERM \"terminal type\"' for non-DEC terminals.\n", 1729 or `define EMACS_TERM \"terminal type\"' for non-DEC terminals.",
1730 terminal_type); 1730 terminal_type);
1731 #else /* not VMS */ 1731 #else /* not VMS */
1732 # ifdef TERMINFO 1732 # ifdef TERMINFO
1733 fatal ("Terminal type \"%s\" is not powerful enough to run Emacs.\n\ 1733 fatal ("Terminal type \"%s\" is not powerful enough to run Emacs.\n\
1734 It lacks the ability to position the cursor.\n\ 1734 It lacks the ability to position the cursor.\n\
1735 If that is not the actual type of terminal you have,\n\ 1735 If that is not the actual type of terminal you have,\n\
1736 use the Bourne shell command `TERM=... export TERM' (C-shell:\n\ 1736 use the Bourne shell command `TERM=... export TERM' (C-shell:\n\
1737 `setenv TERM ...') to specify the correct type. It may be necessary\n\ 1737 `setenv TERM ...') to specify the correct type. It may be necessary\n\
1738 to do `unset TERMINFO' (C-shell: `unsetenv TERMINFO') as well.\n", 1738 to do `unset TERMINFO' (C-shell: `unsetenv TERMINFO') as well.",
1739 terminal_type); 1739 terminal_type);
1740 # else /* TERMCAP */ 1740 # else /* TERMCAP */
1741 fatal ("Terminal type \"%s\" is not powerful enough to run Emacs.\n\ 1741 fatal ("Terminal type \"%s\" is not powerful enough to run Emacs.\n\
1742 It lacks the ability to position the cursor.\n\ 1742 It lacks the ability to position the cursor.\n\
1743 If that is not the actual type of terminal you have,\n\ 1743 If that is not the actual type of terminal you have,\n\
1744 use the Bourne shell command `TERM=... export TERM' (C-shell:\n\ 1744 use the Bourne shell command `TERM=... export TERM' (C-shell:\n\
1745 `setenv TERM ...') to specify the correct type. It may be necessary\n\ 1745 `setenv TERM ...') to specify the correct type. It may be necessary\n\
1746 to do `unset TERMCAP' (C-shell: `unsetenv TERMCAP') as well.\n", 1746 to do `unset TERMCAP' (C-shell: `unsetenv TERMCAP') as well.",
1747 terminal_type); 1747 terminal_type);
1748 # endif /* TERMINFO */ 1748 # endif /* TERMINFO */
1749 #endif /*VMS */ 1749 #endif /*VMS */
1750 if (FRAME_HEIGHT (selected_frame) <= 0 1750 if (FRAME_HEIGHT (selected_frame) <= 0
1751 || FRAME_WIDTH (selected_frame) <= 0) 1751 || FRAME_WIDTH (selected_frame) <= 0)
1752 fatal ("The frame size has not been specified."); 1752 fatal ("The frame size has not been specified");
1753 1753
1754 delete_in_insert_mode 1754 delete_in_insert_mode
1755 = TS_delete_mode && TS_insert_mode 1755 = TS_delete_mode && TS_insert_mode
1756 && !strcmp (TS_delete_mode, TS_insert_mode); 1756 && !strcmp (TS_delete_mode, TS_insert_mode);
1757 1757
1793 fatal (str, arg1, arg2) 1793 fatal (str, arg1, arg2)
1794 char *str, *arg1, *arg2; 1794 char *str, *arg1, *arg2;
1795 { 1795 {
1796 fprintf (stderr, "emacs: "); 1796 fprintf (stderr, "emacs: ");
1797 fprintf (stderr, str, arg1, arg2); 1797 fprintf (stderr, str, arg1, arg2);
1798 fprintf (stderr, "\n");
1798 fflush (stderr); 1799 fflush (stderr);
1799 exit (1); 1800 exit (1);
1800 } 1801 }
1801 1802
1802 syms_of_term () 1803 syms_of_term ()