summaryrefslogtreecommitdiff
path: root/gcc/ada/adaint.h
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2009-04-17 09:51:08 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2009-04-17 09:51:08 +0000
commitf60cc57dd8b8f3fdb555b23fcc2b5aeba03e5c01 (patch)
tree764f35cd7165193222fc6482634c43fce750c1af /gcc/ada/adaint.h
parent8fea528f6f6da82d9922dacf9c69646a54a3701a (diff)
downloadgcc-f60cc57dd8b8f3fdb555b23fcc2b5aeba03e5c01.tar.gz
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. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@146235 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/adaint.h')
-rw-r--r--gcc/ada/adaint.h5
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/ada/adaint.h b/gcc/ada/adaint.h
index 5ed4d76a91b..2ecaf730528 100644
--- a/gcc/ada/adaint.h
+++ b/gcc/ada/adaint.h
@@ -39,8 +39,9 @@
#include <dirent.h>
/* Constants used for the form parameter encoding values */
-#define Encoding_UTF8 0
-#define Encoding_8bits 1
+#define Encoding_UTF8 0 /* UTF-8 */
+#define Encoding_8bits 1 /* Standard 8bits, CP_ACP on Windows. */
+#define Encoding_Unspecified 2 /* Based on GNAT_CODE_PAGE env variable. */
typedef long OS_Time; /* Type corresponding to GNAT.OS_Lib.OS_Time */