hyung-hwan/hcl
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

added code to handle temporary object pointers

Browse Source
This commit is contained in:
hyung-hwan
2014-01-15 09:21:26 +00:00
parent 967f70fd34
commit 7a80455258
6 changed files with 125 additions and 60 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
h2/lib/h2-utf8.ads
View File

@ -1,20 +1,20 @@
generic
type Utf8_Character_Type is (<>);
type Unicode_Character_Type is (<>);
type UTF8_Character_Type is (<>);
package H2.UTF8 is
package H2.Utf8 is
Invalid_Unicode_Character: exception;
subtype Unicode_Character is Unicode_Character_Type;
subtype UTF8_Character is UTF8_Character_Type;
subtype Utf8_Character is Utf8_Character_Type;
type UTF8_String is array(System_Index range<>) of UTF8_Character;
type Utf8_String is array(System_Index range<>) of Utf8_Character;
type Unicode_String is array(System_Index range<>) of Unicode_Character;
function Unicode_To_UTF8 (UC: in Unicode_Character) return UTF8_String;
function Unicode_To_UTF8 (US: in Unicode_String) return UTF8_String;
function Unicode_To_Utf8 (UC: in Unicode_Character) return Utf8_String;
function Unicode_To_Utf8 (US: in Unicode_String) return Utf8_String;
--procedure UTF8_To_Unicode (UTF8: in UTF8_String;
--procedure Utf8_To_Unicode (Utf8: in Utf8_String;
-- UC: out Unicode_Character_Type);
end H2.UTF8;
end H2.Utf8;