(FILE_SYSTEM_CASE): New macro.

diff --git a/src/s/vms.h b/src/s/vms.h
index 9f718099eef3cd8535072ef6cda98ce472f6d702..aa4f0991dfe6e9d7fd35c09a2a67e78702a7a6dd 100644 (file)
--- a/src/s/vms.h
+++ b/src/s/vms.h
@@ -135,6 +135,9 @@ Boston, MA 02111-1307, USA.  */
 
 /* #define READ_SYSUAF */
 
+/* Traditionally, filenames on VMS are always upper case.  */
+#define FILE_SYSTEM_CASE Fupcase
+
 /* On VMS these have a different name */
 
 #define index strchr