tweak C++isms

p4raw-id: //depot/perl@3510

2 files changed, 3 insertions, 2 deletions

diff --git a/win32/dl_win32.xs b/win32/dl_win32.xs
index 8a91973fe2..6c1b424740 100644
--- a/win32/dl_win32.xs
+++ b/win32/dl_win32.xs
@@ -102,6 +102,7 @@ dl_load_file(filename,flags=0)
     int			flags
     PREINIT:
     CODE:
+  {
     WCHAR wfilename[MAX_PATH];
     DLDEBUG(1,PerlIO_printf(PerlIO_stderr(),"dl_load_file(%s):\n", filename));
     if (dl_static_linked(filename) == 0) {
@@ -122,7 +123,7 @@ dl_load_file(filename,flags=0)
 		  OS_Error_String(PERL_OBJECT_THIS)) ;
     else
 	sv_setiv( ST(0), (IV)RETVAL);
-
+  }
 
 void *
 dl_find_symbol(libhandle, symbolname)
diff --git a/win32/win32.c b/win32/win32.c
index 20aa4eef81..3bf6bc6037 100644
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -2276,12 +2276,12 @@ win32_open(const char *path, int flag, ...)
 {
     va_list ap;
     int pmode;
+    WCHAR wBuffer[MAX_PATH];
 
     va_start(ap, flag);
     pmode = va_arg(ap, int);
     va_end(ap);
 
-    WCHAR wBuffer[MAX_PATH];
     if (stricmp(path, "/dev/null")==0)
 	path = "NUL";