ada: Minor tweaks in comments

They are related to the special support for text encoding on Windows.

gcc/ada/ChangeLog:

	* adaint.c: Replace initialize.c with rtinit.c in comment.
	* sysdep.c (__gnat_set_mode): Fix reference in comment.
	* libgnat/i-cstrea.ads (Content_Encoding): Adjust comment.

diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c
index f26d69a1a2a0fbb29c9323b3cc202a429e418b59..9ccac305dde96d7e44bbdd5c2d42edd2e2f0a1ac 100644 (file)
--- 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 756db48e75c9169d88a43dcae6a4c7da96eeca35..ba75c21b231ddcbbc7e0e94776bcffa710c06168 100644 (file)
--- 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 254c736bec433f2c6b76f044b3f8fca0bd150641..1f65f433f5071d5b48cd3cb0d9c225e72242f17d 100644 (file)
--- 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