From 79acb9edfa893b5072350c82fd0645d023b13b03 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Martin=20v=2E=20L=C3=B6wis?= Date: Fri, 6 Dec 2002 12:48:53 +0000 Subject: Patch #614055: Support OpenVMS. --- Python/import.c | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'Python/import.c') diff --git a/Python/import.c b/Python/import.c index 4d0cdbb9f9..d921d74405 100644 --- a/Python/import.c +++ b/Python/import.c @@ -693,8 +693,11 @@ open_exclusive(char *filename) #ifdef O_BINARY |O_BINARY /* necessary for Windows */ #endif - - , 0666); +#ifdef __VMS + , 0666, "ctxt=bin", "shr=nil"); +#else + , 0666); +#endif if (fd < 0) return NULL; return fdopen(fd, "wb"); -- cgit v1.2.1