From 2a80844c38fb63103e114a2ed77cd7c734271917 Mon Sep 17 00:00:00 2001
From: Alan Coopersmith <alan.coopersmith@oracle.com>
Date: Sun, 11 Feb 2024 13:37:47 -0800
Subject: unifdef VMS

Signed-off-by: Alan Coopersmith <alan.coopersmith@oracle.com>
---
 src/Intrinsic.c | 8 --------
 1 file changed, 8 deletions(-)

(limited to 'src')

diff --git a/src/Intrinsic.c b/src/Intrinsic.c
index cbff486..7790994 100644
--- a/src/Intrinsic.c
+++ b/src/Intrinsic.c
@@ -78,9 +78,7 @@ in this Software without prior written authorization from The Open Group.
 #ifndef NO_IDENTIFY_WINDOWS
 #include <X11/Xatom.h>
 #endif
-#ifndef VMS
 #include <sys/stat.h>
-#endif                          /* VMS */
 #ifdef WIN32
 #include <direct.h>             /* for _getdrives() */
 #endif
@@ -964,7 +962,6 @@ AccessFile(char *path, char *pathbuf, int len_pathbuf, char **pathret)
 static Boolean
 TestFile(String path)
 {
-#ifndef VMS
     int ret = 0;
     struct stat status;
 
@@ -987,9 +984,6 @@ TestFile(String path)
            (status.st_mode & S_IFMT) != S_IFDIR);       /* not a directory */
 #endif                          /* X_NOT_POSIX else */
     return (Boolean) ret;
-#else                           /* VMS */
-    return TRUE;                /* Who knows what to do here? */
-#endif                          /* VMS */
 }
 
 /* return of TRUE = resolved string fit, FALSE = didn't fit.  Not
@@ -1374,14 +1368,12 @@ XtResolvePathname(Display *dpy,
     LOCK_PROCESS;
     pd = _XtGetPerDisplay(dpy);
     if (path == NULL) {
-#ifndef VMS
         if (defaultPath == NULL) {
             defaultPath = getenv("XFILESEARCHPATH");
             if (defaultPath == NULL)
                 defaultPath = impl_default;
         }
         path = defaultPath;
-#endif                          /* VMS */
     }
 
     if (path == NULL)
-- 
cgit v1.2.3