Commit 92ea8dd2 by Javier Miranda Committed by Pierre-Marie de Rodat

[Ada] Adding support for Ada.Locales package

This patch adds generic support for the Ada.Locales package that
relies on the setlocale() C service.

2018-05-22  Javier Miranda  <miranda@adacore.com>

gcc/ada/

	* locales.c: New implementation for the Ada.Locales package.
	* libgnat/a-locale.ads: Remove comment indicating that this is not
	implemented.
	* doc/gnat_rm/standard_library_routines.rst: Remove comment indicating
	that this is not implemented.
	* gnat_rm.texi: Regenerate.

From-SVN: r260509
parent e5fc0179
2018-05-22 Javier Miranda <miranda@adacore.com>
* locales.c: New implementation for the Ada.Locales package.
* libgnat/a-locale.ads: Remove comment indicating that this is not
implemented.
* doc/gnat_rm/standard_library_routines.rst: Remove comment indicating
that this is not implemented.
* gnat_rm.texi: Regenerate.
2018-05-22 Hristian Kirtchev <kirtchev@adacore.com> 2018-05-22 Hristian Kirtchev <kirtchev@adacore.com>
* exp_ch5.adb, freeze.adb, pprint.adb, sem_ch4.adb, sem_res.adb: Minor * exp_ch5.adb, freeze.adb, pprint.adb, sem_ch4.adb, sem_res.adb: Minor
......
...@@ -273,9 +273,7 @@ the unit is not implemented. ...@@ -273,9 +273,7 @@ the unit is not implemented.
``Ada.Locales`` *(A.19)* ``Ada.Locales`` *(A.19)*
This package provides declarations providing information (Language This package provides declarations providing information (Language
and Country) about the current locale. This package is currently not and Country) about the current locale.
implemented other than by providing stubs which will always return
Language_Unknown/Country_Unknown.
``Ada.Numerics`` ``Ada.Numerics``
......
...@@ -20617,9 +20617,7 @@ This package provides a generic interface to generalized iterators. ...@@ -20617,9 +20617,7 @@ This package provides a generic interface to generalized iterators.
@item @code{Ada.Locales} @emph{(A.19)} @item @code{Ada.Locales} @emph{(A.19)}
This package provides declarations providing information (Language This package provides declarations providing information (Language
and Country) about the current locale. This package is currently not and Country) about the current locale.
implemented other than by providing stubs which will always return
Language_Unknown/Country_Unknown.
@item @code{Ada.Numerics} @item @code{Ada.Numerics}
...@@ -15,10 +15,6 @@ ...@@ -15,10 +15,6 @@
-- -- -- --
------------------------------------------------------------------------------ ------------------------------------------------------------------------------
-- Note that this package is currently not implemented on any platform and
-- functions Language and Country will always return
-- Language_Unknown/Country_Unknown.
package Ada.Locales is package Ada.Locales is
pragma Preelaborate (Locales); pragma Preelaborate (Locales);
pragma Remote_Types (Locales); pragma Remote_Types (Locales);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment