CVS difference for ais/ai-00285.txt

Differences between 1.25 and version 1.26
Log of other versions for file ais/ai-00285.txt

--- ais/ai-00285.txt	2005/02/08 07:12:29	1.25
+++ ais/ai-00285.txt	2005/02/10 05:46:29	1.26
@@ -1,4 +1,4 @@
-!standard 2.1(1)                                      05-01-26  AI95-00285/13
+!standard 2.1(1)                                      05-02-08  AI95-00285/14
 !standard 2.1(2)
 !standard 2.1(3)
 !standard 2.1(4)
@@ -2158,7 +2158,8 @@
 @dby
 @xcode<   -- @ft<@i<The predefined operators for this type correspond to those for String.>>
 
-    @b<type> Wide_Wide_String @b<is array> (Positive @b<range> <@>) of Wide_Wide_Character;
+    @b<type> Wide_Wide_String @b<is array> (Positive @b<range> <@>)
+       @b<of> Wide_Wide_Character;
     @b<pragma> Pack (Wide_Wide_String);
 
     -- @ft<@i<The predefined operators for this type correspond to those for String.>>>
@@ -2230,6 +2231,7 @@
 @dinst
 @xcode<   @b<function> To_Character (Item :       @b<in> Wide_Wide_Character;
                           Substitute : @b<in> Character := ' ') @b<return> Character;
+
    @b<function> To_String    (Item :       @b<in> Wide_Wide_String;
                           Substitute : @b<in> Character := ' ') @b<return> String;>
 
@@ -2273,9 +2275,40 @@
 
 !corrigendum A.3.2(43)
 
-@drepl
+@ddel
 @xhang<@xterm<Is_Character>
 Returns True if Wide_Character'Pos(Item) <= Character'Pos(Character'Last).>
+
+!corrigendum A.3.2(44)
+
+@ddel
+@xhang<@xterm<Is_String>
+Returns True if Is_Character(Item(I)) is True for each I in Item'Range.>
+
+!corrigendum A.3.2(45)
+
+@ddel
+@xhang<@xterm<To_Character>
+Returns the Character corresponding to Item if Is_Character(Item), and returns the Substitute Character otherwise.>
+
+!corrigendum A.3.2(46)
+
+@ddel
+@xhang<@xterm<To_String>
+Returns the String whose range is 1..Item'Length and each of whose elements is given by To_Character of the corresponding element in Item.>
+
+!corrigendum A.3.2(47)
+
+@ddel
+@xhang<@xterm<To_Wide_Character>
+Returns the Wide_Character X such that Character'Pos(Item) = Wide_Character'Pos(X).>
+
+
+!corrigendum A.3.2(48)
+
+@drepl
+@xhang<@xterm<To_Wide_String
+Returns the Wide_String whose range is 1..Item'Length and each of whose elements is given by To_Wide_Character of the corresponding element in Item.>
 @dby
 @xcode<@b<function> Is_Character (Item : @b<in> Wide_Character) @b<return> Boolean;>
 @xindent<Returns True if Wide_Character'Pos(Item) <= Character'Pos(Character'Last).>
@@ -2287,12 +2320,6 @@
 @xindent<Returns True if Wide_Wide_Character'Pos(Item) <=
 Wide_Character'Pos(Wide_Character'Last).>
 
-!corrigendum A.3.2(44)
-
-@drepl
-@xhang<@xterm<Is_String>
-Returns True if Is_Character(Item(I)) is True for each I in Item'Range.>
-@dby
 @xcode<@b<function> Is_String (Item : @b<in> Wide_String)      @b<return> Boolean;
 @b<function> Is_String (Item : @b<in> Wide_Wide_String) @b<return> Boolean;>
 @xindent<Returns True if Is_Character(Item(I)) is True for each I in Item'Range.>
@@ -2300,13 +2327,6 @@
 @xcode<@b<function> Is_Wide_String (Item : @b<in> Wide_Wide_String) @b<return> Boolean;>
 @xindent<Returns True if Is_Wide_Character(Item(I)) is True for each I in Item'Range.>
 
-
-!corrigendum A.3.2(45)
-
-@drepl
-@xhang<@xterm<To_Character>
-Returns the Character corresponding to Item if Is_Character(Item), and returns the Substitute Character otherwise.>
-@dby
 @xcode<@b<function> To_Character (Item :       @b<in> Wide_Character;
                        Substitute : @b<in> Character := ' ') @b<return> Character;
 @b<function> To_Character (Item :       @b<in> Wide_Wide_Character;
@@ -2334,12 +2354,6 @@
 @xindent<Returns the Wide_Wide_Character X such that Wide_Character'Pos(Item) =
 Wide_Wide_Character'Pos (X).>
 
-!corrigendum A.3.2(46)
-
-@drepl
-@xhang<@xterm<To_String>
-Returns the String whose range is 1..Item'Length and each of whose elements is given by To_Character of the corresponding element in Item.>
-@dby
 @xcode<@b<function> To_String (Item :       @b<in> Wide_String;
                     Substitute : @b<in> Character := ' ') @b<return> String;
 @b<function> To_String (Item :       @b<in> Wide_Wide_String;
@@ -2364,21 +2378,6 @@
 elements is given by To_Wide_Wide_Character of the corresponding element in
 Item.>
 
-
-!corrigendum A.3.2(47)
-
-@ddel
-@xhang<@xterm<To_Wide_Character>
-Returns the Wide_Character X such that Character'Pos(Item) = Wide_Character'Pos(X).>
-
-
-!corrigendum A.3.2(48)
-
-@ddel
-@xhang<@xterm<To_Wide_String
-Returns the Wide_String whose range is 1..Item'Length and each of whose elements is given by To_Wide_Character of the corresponding element in Item.>
-
-
 !corrigendum A.3.2(49)
 
 @ddel
@@ -2428,6 +2427,7 @@
    -- @ft<@i<Characters.Handling.Is_Character(WC) is True>>>
 
 !comment Updated for AI-161 change.
+!comment Updated for AI-301 changes.
 !corrigendum A.4.8(01)
 
 @dinsc
@@ -2554,10 +2554,12 @@
 @xbullet<Null_Bounded_Wide_Wide_String replaces Null_Bounded_String>
 @xbullet<To_Bounded_Wide_Wide_String replaces To_Bounded_String>
 @xbullet<To_Wide_Wide_String replaces To_String>
+@xbullet<Set_Bounded_Wide_Wide_String replaces Set_Bounded_String>
 @xbullet<Unbounded_Wide_Wide_String replaces Unbounded_String>
 @xbullet<Null_Unbounded_Wide_Wide_String replaces Null_Unbounded_String>
 @xbullet<Wide_Wide_String_Access replaces String_Access>
 @xbullet<To_Unbounded_Wide_Wide_String replaces To_Unbounded_String>
+@xbullet<Set_Unbounded_Wide_Wide_String replaces Set_Unbounded_String>
 
 The following additional declarations are present in
 Strings.Wide_Wide_Maps.Wide_Wide_Constants:
@@ -6253,29 +6255,9 @@
 ****************************************************************
 
 From: Robert Dewar
-Sent: Saturday, January 29, 2005 5:03 AM
-
-Pascal Leroy wrote:
+Sent: Saturday, January 29, 2005  1:53 AM
 
-> These tables were posted when Rational was still an independent company,
-> and Rational had a very lax policy with respect to IP, so it would have
-> been fine at the time to incorporate them in a product.  They didn't have
-> a copyright notice, and that was on purpose.
+[Robert posts tables. Find them in AI-395.]
 
-a) copyright notices have zero legal sigficance (true since 1986)
-b) tables like this are not copyrightable anyway
-
->
-> This is an irrelevant question.  The only document you need to implement
-> Ada-related products is the AARM for Ada 2005, and certainly the copyright
-> situation for the AARM is very clear.
-
-That surely is NOT true here, the necessary information for implementing
-the unicode stuff is not incorporated in the AARM (should it be? I would
-think the answer should be yes, we should include the tables in the AARM).
-
-Is the copyright situation for the AARM clear. It is owned by everyone
-who has contributed text. Have they all signed waivers or assignments?
-
-*************************************************************
+****************************************************************
 

Questions? Ask the ACAA Technical Agent