aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gcc/ada/adaint.c2
-rw-r--r--gcc/ada/libgnat/i-cstrea.ads2
-rw-r--r--gcc/ada/sysdep.c8
3 files changed, 6 insertions, 6 deletions
diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c
index f26d69a..9ccac30 100644
--- a/gcc/ada/adaint.c
+++ b/gcc/ada/adaint.c
@@ -175,7 +175,7 @@ extern "C" {
#include "mingw32.h"
-/* Current code page and CCS encoding to use, set in initialize.c. */
+/* Current code page and CCS encoding to use, set in rtinit.c. */
UINT __gnat_current_codepage;
UINT __gnat_current_ccs_encoding;
diff --git a/gcc/ada/libgnat/i-cstrea.ads b/gcc/ada/libgnat/i-cstrea.ads
index 756db48..ba75c21 100644
--- a/gcc/ada/libgnat/i-cstrea.ads
+++ b/gcc/ada/libgnat/i-cstrea.ads
@@ -235,9 +235,9 @@ package Interfaces.C_Streams is
-- In this mode we are eventually using the system-wide
-- translation if activated.
-- Text : Text encoding activated
+ -- U8text : Unicode UTF-8 encoding
-- Wtext : Unicode mode
-- U16text : Unicode UTF-16 encoding
- -- U8text : Unicode UTF-8 encoding
--
-- This encoding is system dependent and only used on Windows systems.
--
diff --git a/gcc/ada/sysdep.c b/gcc/ada/sysdep.c
index 254c736..1f65f43 100644
--- a/gcc/ada/sysdep.c
+++ b/gcc/ada/sysdep.c
@@ -177,8 +177,8 @@ __gnat_set_text_mode (int handle)
void
__gnat_set_mode (int handle, int mode)
{
- /* the values here must be synchronized with
- System.File_Control_Block.Content_Encodding:
+ /* The values here must be synchronized with
+ Interfaces.C_Streams.Content_Encoding:
None = 0
Default_Text = 1
@@ -200,8 +200,8 @@ __gnat_set_mode (int handle, int mode)
void
__gnat_set_mode (int handle, int mode)
{
- /* the values here must be synchronized with
- System.File_Control_Block.Content_Encodding:
+ /* The values here must be synchronized with
+ Interfaces.C_Streams.Content_Encoding:
None = 0
Default_Text = 1