Mercurial > emacs
changeset 1597:60566fdb3a25
* systty.h: Doc fix.
* systty.h, process.c, buffer.h, callproc.c, sysdep.c, dired.c:
Added VMS changes from Roland Roberts.
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Mon, 16 Nov 1992 00:55:34 +0000 |
parents | 0e105bd23f44 |
children | 3e9dadf2d13c |
files | src/systty.h |
diffstat | 1 files changed, 43 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/src/systty.h Mon Nov 16 00:54:53 1992 +0000 +++ b/src/systty.h Mon Nov 16 00:55:34 1992 +0000 @@ -1,4 +1,4 @@ -/* systerm.h - System-dependent definitions for terminals. +/* systty.h - System-dependent definitions for terminals. Copyright (C) 1992 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -29,7 +29,42 @@ #else /* neither HAVE_TERMIO nor HAVE_TERMIOS */ #ifndef VMS #include <sgtty.h> -#endif /* not VMS */ +#else /* VMS */ +#include <descrip.h> +static struct iosb +{ + short status; + short offset; + short termlen; + short term; +} input_iosb; + +extern int waiting_for_ast; +extern int stop_input; +extern int input_ef = 0; +extern int timer_ef = 0; +extern int process_ef = 0; +extern int input_eflist; +extern int timer_eflist; + +static $DESCRIPTOR (input_dsc, "TT"); +static int terminator_mask[2] = { 0, 0 }; + +static struct sensemode { + short status; + unsigned char xmit_baud; + unsigned char rcv_baud; + unsigned char crfill; + unsigned char lffill; + unsigned char parity; + unsigned char unused; + char class; + char type; + short scr_wid; + unsigned long tt_char : 24, scr_len : 8; + unsigned long tt2_char; +} sensemode_iosb; +#endif /* VMS */ #endif /* not HAVE_TERMIOS */ #endif /* not HAVE_TERMIO */ @@ -261,12 +296,12 @@ /* These definitions will really only work in sysdep.c, because of their use of input_iosb. I don't know enough about VMS QIO to fix this. */ -#define EMACS_GET_TTY_1(fd, p) \ - SYS$QIOW (0, (fd), IO$_SENSEMODE, (p), 0, 0, \ - &(p)->main.class, 12, 0, 0, 0, 0); -#define EMACS_SET_TTY_1(fd, p, waitp) \ - SYS$QIOW (0, (fd), IO$_SETMODE, &input_iosb, 0, 0, \ - &(p)->main.class, 12, 0, 0, 0, 0); +#define EMACS_GET_TTY_1(fd, p) \ + (1 & SYS$QIOW (0, (fd), IO$_SENSEMODE, (p), 0, 0, \ + &(p)->main.class, 12, 0, 0, 0, 0)) +#define EMACS_SET_TTY_1(fd, p, waitp) \ + (1 & SYS$QIOW (0, (fd), IO$_SETMODE, &input_iosb, 0, 0, \ + &(p)->main.class, 12, 0, 0, 0, 0)) #else