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

Is_Code in H3.CC.

Browse Source 
Use Wide_Character'First instead of Wide_Character'Val(0) 
Removed the terminator parameter in the H3.Strings
This commit is contained in:
hyung-hwan
2021-10-27 15:34:30 +00:00
parent 664c083373
commit 21c94d5ead
11 changed files with 95 additions and 61 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
h2/lib2/h3-mm.ads
View File

@ -24,7 +24,7 @@ package H3.MM is
function Get_Item_Pointer (R: in Ref_Counted) return Item_Pointer;
pragma Inline(Get_Item_Pointer);
function Is_Shared (R: in Ref_Counted) return Standard.Boolean;
function Is_Shared (R: in Ref_Counted) return Boolean;
pragma Inline(Is_Shared);
overriding procedure Initialize (R: in out Ref_Counted);