6 lines
326 B
Ada
6 lines
326 B
Ada
Latin_1_Str : String := "Hello World";
|
|
UCS_16_Str : Wide_String := "Hello World";
|
|
Unicode_Str : Wide_Wide_String := "Hello World";
|
|
Latin_1_Length : constant Natural := Latin_1_Str'Length;
|
|
UCS_16_Length : constant Natural := UCS_16_Str'Length;
|
|
Unicode_Length : constant Natural := Unicode_Str'Length;
|