clic_0.3.0_56bbdc00/src/clic.ads

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
private with  Ada.Strings.UTF_Encoding.Wide_Wide_Strings;

package CLIC
with Preelaborate
is

private

   function U (S          : Wide_Wide_String;
               Output_BOM : Boolean := False)
               return Ada.Strings.UTF_Encoding.UTF_8_String
               renames Ada.Strings.UTF_Encoding.Wide_Wide_Strings.Encode;

   function WW (S          : Ada.Strings.UTF_Encoding.UTF_8_String)
                return Wide_Wide_String
                renames Ada.Strings.UTF_Encoding.Wide_Wide_Strings.Decode;

end CLIC;