This is the mail archive of the
gcc-cvs@gcc.gnu.org
mailing list for the GCC project.
r118240 - in /trunk/gcc/ada: adaint.c adaint.h ...
- From: charlet at gcc dot gnu dot org
- To: gcc-cvs at gcc dot gnu dot org
- Date: Tue, 31 Oct 2006 17:47:24 -0000
- Subject: r118240 - in /trunk/gcc/ada: adaint.c adaint.h ...
Author: charlet
Date: Tue Oct 31 17:47:20 2006
New Revision: 118240
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=118240
Log:
2006-10-31 Pascal Obry <obry@adacore.com>
Eric Botcazou <ebotcazou@adacore.com>
Vincent Celier <celier@adacore.com>
* adaint.c (__gnat_get_libraries_from_registry): Call explicitly the
ASCII version of the registry API. This is needed as the GNAT runtime
is now UNICODE by default.
Include version.h.
(get_gcc_version): Do not hardcode the return value.
(__gnat_file_time_name): On Windows properly set the default returned
value to -1 which corresponds to Invalid_Time.
(__gnat_fopen): New routine. A simple wrapper on all plateforms
except on Windows where it does conversion for unicode support.
(__gnat_freopen): Idem.
(__gnat_locate_exec_on_path): If environment variable PATH does not
exist, return a NULL pointer
* adaint.h: (__gnat_fopen): Declare.
(__gnat_freopen): Likewise.
* mingw32.h (_tfreopen): Define this macro here for older MingW
version.
Activate the unicode support on platforms using a MingW runtime
version 3.9 or newer.
* s-crtl.ads (fopen): Is now an import to the wrapper __gnat_freopen.
This is needed for proper unicode support on Windows.
(freopen): Idem.
Modified:
trunk/gcc/ada/adaint.c
trunk/gcc/ada/adaint.h
trunk/gcc/ada/mingw32.h
trunk/gcc/ada/s-crtl.ads