X-Git-Url: http://git.sourceforge.jp/view?a=blobdiff_plain;f=gcc%2Fada%2Fmkdir.c;h=debd8067779bd982aa9b65e1ce49f1f96de9a9fc;hb=17052c8f8f63239deccec6d06ff1d9a9ebfc4640;hp=cd458c5266dece30e85552c263ca75b206375755;hpb=6bc9506f51c864af73250f5e6c99da261bd98b11;p=pf3gnuchains%2Fgcc-fork.git

diff --git a/gcc/ada/mkdir.c b/gcc/ada/mkdir.c
index cd458c5266d..debd8067779 100644
--- a/gcc/ada/mkdir.c
+++ b/gcc/ada/mkdir.c
@@ -65,7 +65,7 @@ __gnat_mkdir (char *dir_name)
 #elif defined (__MINGW32__)
   TCHAR wname [GNAT_MAX_PATH_LEN + 2];
 
-  S2WSU (wname, dir_name, GNAT_MAX_PATH_LEN + 2);
+  S2WSC (wname, dir_name, GNAT_MAX_PATH_LEN + 2);
   return _tmkdir (wname);
 #else
   return mkdir (dir_name, S_IRWXU | S_IRWXG | S_IRWXO);