VMS: Fix curve448 internal test program

[openssl.git] / test / curve448_internal_test.c

diff --git a/test/curve448_internal_test.c b/test/curve448_internal_test.c
index aac4818965a840c37a963ec8d1558f3114978ec3..8c9b09da98bcd90701e45b17d7d0a57e6f9526cf 100644 (file)
--- a/test/curve448_internal_test.c
+++ b/test/curve448_internal_test.c
@@ -10,7 +10,18 @@
 #include <string.h>
 #include <openssl/e_os2.h>
 #include <openssl/evp.h>
+
+#ifdef __VMS
+# pragma names save
+# pragma names as_is,shortened
+#endif
+
 #include "curve448_lcl.h"
+
+#ifdef __VMS
+# pragma names restore
+#endif
+
 #include "testutil.h"
 
 static unsigned int max = 1000;