Fix io.c to build on VMS.

2 files changed, 9 insertions, 0 deletions

diff --git a/ChangeLog b/ChangeLog
index 6f9f2867..ea821c7f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2018-01-08         John E. Malmberg      <wb8tyw@qsl.net>
+
+        * io.c (set_slave_pty_attributes) Currently no termios on VMS.
+        (set_slave_pty_attributes) No fork on VMS.
+
 2018-01-04         Arnold D. Robbins     <arnold@skeeve.com>
 
 	Refactor handling of slave pty. On AIX and HP-UX open
diff --git a/io.c b/io.c
index 994eb4a5..8b9cc960 100644
--- a/io.c
+++ b/io.c
@@ -1923,6 +1923,7 @@ push_pty_line_disciplines(int slave)
 static void
 set_slave_pty_attributes(int slave)
 {
+#ifdef HAVE_TERMIOS_H
 	struct termios st;
 
 	tcgetattr(slave, & st);
@@ -1951,6 +1952,7 @@ set_slave_pty_attributes(int slave)
 	st.c_cc[VEOF] = '\004'; /* ^d */
 #endif
 	tcsetattr(slave, TCSANOW, & st);
+#endif /* HAVE_TERMIOS_H */
 }
 
 
@@ -2026,6 +2028,7 @@ fork_and_open_slave_pty(const char *slavenam, int master, const char *command, p
 	}
 }
 #else
+#ifndef VMS
 static bool
 fork_and_open_slave_pty(const char *slavenam, int master, const char *command, pid_t *pid)
 {
@@ -2091,6 +2094,7 @@ fork_and_open_slave_pty(const char *slavenam, int master, const char *command, p
 	return true;
 }
 #endif
+#endif
 
 /* two_way_open --- open a two way communications channel */