Mercurial > emacs

comparison src/sysdep.c @ 10049:aef1cc7e56a0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(init_sys_modes): Tes AIXHFT, not AIX. (reset_sys_modes): Test AIXHFT. (hft_init, hft_reset): Test AIXHFT, not AIX.
author Richard M. Stallman <rms@gnu.org>
date Tue, 22 Nov 1994 19:24:38 +0000
parents cd2db9aeeb25
children 2844db63605f
comparison
equal deleted inserted replaced
10048:db01a04d2afb 10049:aef1cc7e56a0
1384 1384
1385 #if defined (HAVE_TERMIOS) || defined (HPUX9) 1385 #if defined (HAVE_TERMIOS) || defined (HPUX9)
1386 if (!flow_control) tcflow (input_fd, TCOON); 1386 if (!flow_control) tcflow (input_fd, TCOON);
1387 #endif 1387 #endif
1388 1388
1389 #ifdef AIX 1389 #ifdef AIXHFT
1390 hft_init (); 1390 hft_init ();
1391 #ifdef IBMR2AIX 1391 #ifdef IBMR2AIX
1392 { 1392 {
1393 /* IBM's HFT device usually thinks a ^J should be LF/CR. We need it 1393 /* IBM's HFT device usually thinks a ^J should be LF/CR. We need it
1394 to be only LF. This is the way that is done. */ 1394 to be only LF. This is the way that is done. */
1396 1396
1397 if (ioctl (1, HFTGETID, &tty) != -1) 1397 if (ioctl (1, HFTGETID, &tty) != -1)
1398 write (1, "\033[20l", 5); 1398 write (1, "\033[20l", 5);
1399 } 1399 }
1400 #endif 1400 #endif
1401 #endif 1401 #endif /* AIXHFT */
1402 1402
1403 #ifdef VMS 1403 #ifdef VMS
1404 /* Appears to do nothing when in PASTHRU mode. 1404 /* Appears to do nothing when in PASTHRU mode.
1405 SYS$QIOW (0, input_fd, IO$_SETMODE|IO$M_OUTBAND, 0, 0, 0, 1405 SYS$QIOW (0, input_fd, IO$_SETMODE|IO$M_OUTBAND, 0, 0, 0,
1406 interrupt_signal, oob_chars, 0, 0, 0, 0); 1406 interrupt_signal, oob_chars, 0, 0, 0, 0);
1595 } 1595 }
1596 #endif 1596 #endif
1597 clear_end_of_line (FRAME_WIDTH (selected_frame)); 1597 clear_end_of_line (FRAME_WIDTH (selected_frame));
1598 /* clear_end_of_line may move the cursor */ 1598 /* clear_end_of_line may move the cursor */
1599 cursor_to (FRAME_HEIGHT (selected_frame) - 1, 0); 1599 cursor_to (FRAME_HEIGHT (selected_frame) - 1, 0);
1600 #ifdef IBMR2AIX 1600 #if defined (IBMR2AIX) && defined (AIXHFT)
1601 { 1601 {
1602 /* HFT devices normally use ^J as a LF/CR. We forced it to 1602 /* HFT devices normally use ^J as a LF/CR. We forced it to
1603 do the LF only. Now, we need to reset it. */ 1603 do the LF only. Now, we need to reset it. */
1604 struct termio tty; 1604 struct termio tty;
1605 1605
1641 1641
1642 #ifdef MSDOS /* Demacs 1.1.2 91/10/20 Manabu Higashida */ 1642 #ifdef MSDOS /* Demacs 1.1.2 91/10/20 Manabu Higashida */
1643 dos_ttcooked (); 1643 dos_ttcooked ();
1644 #endif 1644 #endif
1645 1645
1646 #ifdef AIX 1646 #ifdef AIXHFT
1647 hft_reset (); 1647 hft_reset ();
1648 #endif 1648 #endif
1649 1649
1650 #ifdef BSD_PGRPS 1650 #ifdef BSD_PGRPS
1651 widen_foreground_group (); 1651 widen_foreground_group ();
4849 { 4849 {
4850 srand (seed); 4850 srand (seed);
4851 } 4851 }
4852 #endif /* VMS */ 4852 #endif /* VMS */
4853 4853
4854 #ifdef AIX 4854 #ifdef AIXHFT
4855 4855
4856 /* Called from init_sys_modes. */ 4856 /* Called from init_sys_modes. */
4857 hft_init () 4857 hft_init ()
4858 { 4858 {
4859 int junk; 4859 int junk;
4941 #endif /* not IBMR2AIX */ 4941 #endif /* not IBMR2AIX */
4942 keymap.hfkey[1].hf_char = 8; 4942 keymap.hfkey[1].hf_char = 8;
4943 hftctl (0, HFSKBD, &buf); 4943 hftctl (0, HFSKBD, &buf);
4944 } 4944 }
4945 4945
4946 #endif /* AIX */ 4946 #endif /* AIXHFT */
4947 4947
4948 #ifdef USE_DL_STUBS 4948 #ifdef USE_DL_STUBS
4949 4949
4950 /* These are included on Sunos 4.1 when we do not use shared libraries. 4950 /* These are included on Sunos 4.1 when we do not use shared libraries.
4951 X11 libraries may refer to these functions but (we hope) do not 4951 X11 libraries may refer to these functions but (we hope) do not