diff --git a/src/mzscheme/src/file.c b/src/mzscheme/src/file.c
index 0686849c2c..ef2652bfc0 100644
--- a/src/mzscheme/src/file.c
+++ b/src/mzscheme/src/file.c
@@ -2358,7 +2358,7 @@ Scheme_Object *scheme_get_fd_identity(Scheme_Object *port, long fd, char *path)
                      FILE_SHARE_READ | FILE_SHARE_WRITE,
                      NULL,
                      OPEN_EXISTING,
-                     0,
+                     FILE_FLAG_BACKUP_SEMANTICS,
                      NULL);
     if (fd == INVALID_HANDLE_VALUE) {
       errid = GetLastError();