From 678bfa7fcacaddc6f22a90bae410ec4957175b38 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@cs.utah.edu>
Date: Thu, 30 Dec 2010 10:43:52 -0700
Subject: [PATCH] win32: fix transaction creation

---
 src/racket/src/file.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/racket/src/file.c b/src/racket/src/file.c
index 5e821beed4..a6bc63d2cf 100644
--- a/src/racket/src/file.c
+++ b/src/racket/src/file.c
@@ -3740,7 +3740,7 @@ static Scheme_Object *delete_file(int argc, Scheme_Object **argv)
 
 #ifdef DOS_FILE_SYSTEM
 static int tried_get_transaction;
-typedef HANDLE (WINAPI * CreateTransaction_proc)(void*, LPGUID, DWORD, DWORD, DWORD, DWORD, wchar_t);
+typedef HANDLE (WINAPI * CreateTransaction_proc)(void*, LPGUID, DWORD, DWORD, DWORD, DWORD, wchar_t*);
 static CreateTransaction_proc mzCreateTransaction;
 typedef BOOL (WINAPI * CommitTransaction_proc)(HANDLE);
 static CommitTransaction_proc mzCommitTransaction;
@@ -3801,7 +3801,7 @@ static Scheme_Object *rename_file(int argc, Scheme_Object **argv)
   if (mzCreateTransaction) {
     HANDLE t;
     tried_transaction = 1;
-    t = mzCreateTransaction(NULL, 0, 0, 0, 0, 0, 0);
+    t = mzCreateTransaction(NULL, 0, 0, 0, 0, 0, NULL);
     if (t) {
       if (mzMoveFileTransactedW(WIDE_PATH_COPY(src), 
 				WIDE_PATH(dest),