summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThien-Thi Nguyen <ttn@gnuvola.org>2005-03-03 20:56:40 +0000
committerThien-Thi Nguyen <ttn@gnuvola.org>2005-03-03 20:56:40 +0000
commit030d4f6224c52dadfd63faf7d061effcb2c89f7f (patch)
treeec90c96d802a1f1d8c8090ba7fd04cfeacaf8de9
parentb87ed9f079cc3c16a66cddf518521417c0e4cdf5 (diff)
downloademacs-030d4f6224c52dadfd63faf7d061effcb2c89f7f.tar.gz
(FILE_SYSTEM_CASE): New macro.
-rw-r--r--src/s/vms.h7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/s/vms.h b/src/s/vms.h
index e95212c5624..aa4f0991dfe 100644
--- a/src/s/vms.h
+++ b/src/s/vms.h
@@ -130,11 +130,14 @@ Boston, MA 02111-1307, USA. */
#define LINK_CRTL_SHARE
/* Define this if you want to read the file SYS$SYSTEM:SYSUAF.DAT for user
- information. If you do use this, you must either make SYSUAF.DAT world
+ information. If you do use this, you must either make SYSUAF.DAT world
readable or install Emacs with SYSPRV. */
/* #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
@@ -192,7 +195,7 @@ extern double mth$dmod(double, double);
/* If user asks for TERM, check first for EMACS_TERM. */
#define getenv sys_getenv
-
+
/* Standard C abort is less useful than it should be. */
#define abort sys_abort