aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/mkdir.c
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2009-04-17 11:51:08 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2009-04-17 11:51:08 +0200
commitffec8e81da21c8fd1726d4e5dbf4800aa0fe9e88 (patch)
tree764f35cd7165193222fc6482634c43fce750c1af /gcc/ada/mkdir.c
parent432e3422d04283b2012498781115b032830ba6e1 (diff)
downloadgcc-ffec8e81da21c8fd1726d4e5dbf4800aa0fe9e88.zip
gcc-ffec8e81da21c8fd1726d4e5dbf4800aa0fe9e88.tar.gz
gcc-ffec8e81da21c8fd1726d4e5dbf4800aa0fe9e88.tar.bz2
[multiple changes]
2009-04-17 Eric Botcazou <ebotcazou@adacore.com> * exp_ch4.adb (Expand_Concatenation): Do not use calls at -Os. 2009-04-17 Pascal Obry <obry@adacore.com> * mingw32.h: Add S2WSC and WS2SC macros to convert to/from CurrentCodePage. * adaint.h: Encoding_Unspecified is now defined. Corresponds to the value when no encoding form paramter is set on Text_IO services. * adaint.c: CurrentCodePage new variable on Windows. Use new macros S2WSC and WS2SC instead of the UTF-8 oriented ones. * mkdir.c: Use new macros S2WSC and WS2SC instead of the UTF-8 oriented ones. * initialize.c: Initialize CurrentCodePage depending on GNAT_CODE_PAGE environment variable value. Default is UTF-8. * s-crtl.ads: Filename_Encoding add Unspecified in the enumeration type. fopen and freopen encoding parameter is now set to Unspecified. The default value is in this case UTF-8 (as it was before) but use the new macros that convert to/from the code page set at runtime (CurrentCodePage). * s-fileio.adb: When no encoding specified use Unspecified value. 2009-04-17 Ed Schonberg <schonberg@adacore.com> * atree.adb, atree.ads: Remove dead code. From-SVN: r146235
Diffstat (limited to 'gcc/ada/mkdir.c')
-rw-r--r--gcc/ada/mkdir.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/mkdir.c b/gcc/ada/mkdir.c
index cd458c5..debd806 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);