# define MYSWAP
#endif
-#if !defined(PERL_FOR_X2P) && !defined(WIN32)
+#if !defined(PERL_FOR_X2P) && !(defined(WIN32)||defined(VMS))
# include "embed.h"
#endif
#else
# if defined(VMS)
# include "vmsish.h"
+# include "embed.h"
# else
# if defined(PLAN9)
# include "./plan9/plan9ish.h"
#include "wince.h"
#endif
-/* These definitions are sneaky.
- * Their only purpose is to avoid warnings on strict ANSI (non-VMS)
- * compilers which get huffy about dollars in identifiers,
- * which is common practise in VMS. The definitions in the
- * non-VMS branch are not used -- but their only point is to
- * be something non-dollared. Neither are all instances of
- * dollared variables hidden this way, only at the spots where
- * non-VMS platforms see them. */
-#ifdef VMS
-#define VMS_LIB_INVARGV LIB$_INVARG
-#define VMS_RMS_DIR RMS$_DIR
-#define VMS_RMS_FAC RMS$_FAC
-#define VMS_RMS_IFI RMS$_IFI
-#define VMS_RMS_ISI RMS$_ISI
-#define VMS_SS_ACCVIO SS$_ACCVIO
-#define VMS_SS_IVCHAN SS$_IVCHAN
-#define VMS_SS_NORMAL SS$_NORMAL
-#else
-#define VMS_LIB_INVARG EINVAL
-#define VMS_RMS_DIR EBADF
-#define VMS_RMS_FAC 0
-#define VMS_RMS_IFI EBADF
-#define VMS_RMS_ISI EBADF
-#define VMS_SS_ACCVIO EFAULT
-#define VMS_SS_IVCHAN EBADF
-#define VMS_SS_NORMAL 0
-#endif
-
#endif /* Include guard */