2008-08-05 Vincent Celier <celier@adacore.com>
authorVincent Celier <celier@adacore.com>
Tue, 5 Aug 2008 13:42:08 +0000 (15:42 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Tue, 5 Aug 2008 13:42:08 +0000 (15:42 +0200)
commit486fd7f5d7da98d37a02887cfbb2d178ee6191bb
tree41315687c8149a8c962459a87f301abcc4795770
parentc336d2c7ff465c4f262122895710874afa422e8c
2008-08-05  Vincent Celier  <celier@adacore.com>

* s-wchwts.adb:
(Wide_String_To_String): Returns a String with the same 'First as its
parameter S.
(Wide_Wide_String_To_String): Ditto

* s-wchwts.ads:
(Wide_String_To_String): Document that the lowest index of the returned
String is equal to S'First.

From-SVN: r138708
gcc/ada/s-wchwts.adb
gcc/ada/s-wchwts.ads