VMS: Fix internals test programs

[openssl.git] / test / chacha_internal_test.c

diff --git a/test/chacha_internal_test.c b/test/chacha_internal_test.c
index 0c0be9b38792b552a07dabb9a60692c6784475f2..1c8d90a1afcd362bbe02f8d0134f3352ba714852 100644 (file)
--- a/test/chacha_internal_test.c
+++ b/test/chacha_internal_test.c
@@ -16,8 +16,18 @@
 #include <openssl/opensslconf.h>
 #include "test_main.h"
 #include "testutil.h"
+
+#ifdef __VMS
+# pragma names save
+# pragma names as_is,shortened
+#endif
+
 #include "internal/chacha.h"
 
+#ifdef __VMS
+# pragma names restore
+#endif
+
 const static unsigned int key[] = {
     0x03020100, 0x07060504, 0x0b0a0908, 0x0f0e0d0c,
     0x13121110, 0x17161514, 0x1b1a1918, 0x1f1e1d1c