aboutsummaryrefslogtreecommitdiffstats
path: root/gcc-4.8.3/gcc/ada/a-suenco.ads
diff options
context:
space:
mode:
authorDan Albert <danalbert@google.com>2016-02-24 13:48:45 -0800
committerDan Albert <danalbert@google.com>2016-02-24 13:51:18 -0800
commitb9de1157289455b0ca26daff519d4a0ddcd1fa13 (patch)
tree4c56cc0a34b91f17033a40a455f26652304f7b8d /gcc-4.8.3/gcc/ada/a-suenco.ads
parent098157a754787181cfa10e71325832448ddcea98 (diff)
downloadtoolchain_gcc-b9de1157289455b0ca26daff519d4a0ddcd1fa13.tar.gz
toolchain_gcc-b9de1157289455b0ca26daff519d4a0ddcd1fa13.tar.bz2
toolchain_gcc-b9de1157289455b0ca26daff519d4a0ddcd1fa13.zip
Update 4.8.1 to 4.8.3.
My previous drop was the wrong version. The platform mingw is currently using 4.8.3, not 4.8.1 (not sure how I got that wrong). From ftp://ftp.gnu.org/gnu/gcc/gcc-4.8.3/gcc-4.8.3.tar.bz2. Bug: http://b/26523949 Change-Id: Id85f1bdcbbaf78c7d0b5a69e74c798a08f341c35
Diffstat (limited to 'gcc-4.8.3/gcc/ada/a-suenco.ads')
-rw-r--r--gcc-4.8.3/gcc/ada/a-suenco.ads61
1 files changed, 61 insertions, 0 deletions
diff --git a/gcc-4.8.3/gcc/ada/a-suenco.ads b/gcc-4.8.3/gcc/ada/a-suenco.ads
new file mode 100644
index 000000000..0aa4f88b2
--- /dev/null
+++ b/gcc-4.8.3/gcc/ada/a-suenco.ads
@@ -0,0 +1,61 @@
+------------------------------------------------------------------------------
+-- --
+-- GNAT RUN-TIME COMPONENTS --
+-- --
+-- ADA.STRINGS.UTF_ENCODING.CONVERSIONS --
+-- --
+-- S p e c --
+-- --
+-- This specification is derived from the Ada Reference Manual for use with --
+-- GNAT. In accordance with the copyright of that document, you can freely --
+-- copy and modify this specification, provided that if you redistribute a --
+-- modified version, any changes that you have made are clearly indicated. --
+-- --
+------------------------------------------------------------------------------
+
+-- This is an Ada 2012 package defined in AI05-0137-1. It provides conversions
+-- from one UTF encoding method to another. Note: this package is consistent
+-- with Ada 95, and may be used in Ada 95 or Ada 2005 mode.
+
+package Ada.Strings.UTF_Encoding.Conversions is
+ pragma Pure (Conversions);
+
+ -- In the following conversion routines, a BOM in the input that matches
+ -- the encoding scheme is ignored, an incorrect BOM causes Encoding_Error
+ -- to be raised. A BOM is present in the output if the Output_BOM parameter
+ -- is set to True.
+
+ function Convert
+ (Item : UTF_String;
+ Input_Scheme : Encoding_Scheme;
+ Output_Scheme : Encoding_Scheme;
+ Output_BOM : Boolean := False) return UTF_String;
+ -- Convert from input encoded in UTF-8, UTF-16LE, or UTF-16BE as specified
+ -- by the Input_Scheme argument, and generate an output encoded in one of
+ -- these three schemes as specified by the Output_Scheme argument.
+
+ function Convert
+ (Item : UTF_String;
+ Input_Scheme : Encoding_Scheme;
+ Output_BOM : Boolean := False) return UTF_16_Wide_String;
+ -- Convert from input encoded in UTF-8, UTF-16LE, or UTF-16BE as specified
+ -- by the Input_Scheme argument, and generate an output encoded in UTF-16.
+
+ function Convert
+ (Item : UTF_8_String;
+ Output_BOM : Boolean := False) return UTF_16_Wide_String;
+ -- Convert from UTF-8 to UTF-16
+
+ function Convert
+ (Item : UTF_16_Wide_String;
+ Output_Scheme : Encoding_Scheme;
+ Output_BOM : Boolean := False) return UTF_String;
+ -- Convert from UTF-16 to UTF-8, UTF-16LE, or UTF-16BE as specified by
+ -- the Output_Scheme argument.
+
+ function Convert
+ (Item : UTF_16_Wide_String;
+ Output_BOM : Boolean := False) return UTF_8_String;
+ -- Convert from UTF-16 to UTF-8
+
+end Ada.Strings.UTF_Encoding.Conversions;