diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-11-30 15:28:21 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-11-30 15:28:21 +0100 |
| commit | 0727601add7a6b06c1b114389707878a33b731a6 (patch) | |
| tree | f1d314e310e2f974d4f736f5f0aac7a9c88a149d /gcc/ada/adaint.c | |
| parent | 90e9a6bef63cb79b87f6c7e58133f7e4cc9de52c (diff) | |
| download | gcc-0727601add7a6b06c1b114389707878a33b731a6.zip gcc-0727601add7a6b06c1b114389707878a33b731a6.tar.gz gcc-0727601add7a6b06c1b114389707878a33b731a6.tar.bz2 | |
[multiple changes]
2009-11-30 Jerome Lambourg <lambourg@adacore.com>
* exp_ch3.adb (Make_Predefined_Primitive_Specs): Improve comment for
the Value_Type case.
2009-11-30 Thomas Quinot <quinot@adacore.com>
* a-textio.adb: Minor reformatting
2009-11-30 Pascal Obry <obry@adacore.com>
* adaint.c: Fix bug in passing parameter.
* expect.c: Include io.h to get definition of _open_osfhandle
From-SVN: r154810
Diffstat (limited to 'gcc/ada/adaint.c')
| -rw-r--r-- | gcc/ada/adaint.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c index 5bce387..b4446f7 100644 --- a/gcc/ada/adaint.c +++ b/gcc/ada/adaint.c @@ -697,7 +697,7 @@ __gnat_os_filename (char *filename ATTRIBUTE_UNUSED, char *encoding ATTRIBUTE_UNUSED, int *e_length) { #if defined (_WIN32) && ! defined (__vxworks) && ! defined (IS_CROSS) - WS2SC (os_name, (TCHAR *)w_filename, (DWORD)o_length); + WS2SC (os_name, (TCHAR *)w_filename, (DWORD)*o_length); *o_length = strlen (os_name); strcpy (encoding, "encoding=utf8"); *e_length = strlen (encoding); |