From 48bae372e9090652168600d845e85ac19b2b64d4 Mon Sep 17 00:00:00 2001
From: Bram Moolenaar <Bram@vim.org>
Date: Thu, 29 Jul 2010 23:12:15 +0200
Subject: [PATCH] Few more fixes for VMS.

---
 src/os_unix.c            | 6 ++++--
 src/testdir/Make_vms.mms | 4 ++--
 2 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/src/os_unix.c b/src/os_unix.c
index 4fb3d1ad01..6d4d499d82 100644
--- a/src/os_unix.c
+++ b/src/os_unix.c
@@ -421,9 +421,10 @@ mch_inchar(buf, maxlen, wtime, tb_change_cnt)
 	/* Process the queued netbeans messages. */
 	netbeans_parse_messages();
 #endif
+#ifndef VMS  /* VMS: must try reading, WaitForChar() does nothing. */
 	/*
-	 * we want to be interrupted by the winch signal
-	 * or by an event on the monitored file descriptors
+	 * We want to be interrupted by the winch signal
+	 * or by an event on the monitored file descriptors.
 	 */
 	if (WaitForChar(-1L) == 0)
 	{
@@ -431,6 +432,7 @@ mch_inchar(buf, maxlen, wtime, tb_change_cnt)
 		handle_resize();
 	    return 0;
 	}
+#endif
 
 	/* If input was put directly in typeahead buffer bail out here. */
 	if (typebuf_changed(tb_change_cnt))
diff --git a/src/testdir/Make_vms.mms b/src/testdir/Make_vms.mms
index afeb9fad84..f52e8f8b0c 100644
--- a/src/testdir/Make_vms.mms
+++ b/src/testdir/Make_vms.mms
@@ -4,7 +4,7 @@
 # Authors:	Zoltan Arpadffy, <arpadffy@polarhome.com>
 #		Sandor Kopanyi,  <sandor.kopanyi@mailbox.hu>
 #
-# Last change:  2009 Sep 11
+# Last change:  2010 Jul 29
 #
 # This has been tested on VMS 6.2 to 8.3 on DEC Alpha, VAX and IA64.
 # Edit the lines in the Configuration section below to select.
@@ -70,7 +70,7 @@ SCRIPT = test1.out  test2.out  test3.out  test4.out  test5.out  \
 	 test56.out test57.out test60.out \
 	 test61.out test62.out test63.out test64.out test65.out \
 	 test66.out test67.out test68.out test69.out test70.out \
-	 test71.out test72.out
+	 test71.out # test72.out
 
 .IFDEF WANT_GUI
 SCRIPT_GUI = test16.out
-- 
GitLab