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

adding experimental changes

Browse Source
This commit is contained in:
hyung-hwan
2021-10-30 01:57:19 +00:00
parent b7de031e72
commit 442d45fb9e
10 changed files with 496 additions and 74 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@ -22,10 +22,10 @@ package H3.MM is
procedure Create (R: in out Ref_Counted; V: in Item_Type);
function Get_Item_Pointer (R: in Ref_Counted) return Item_Pointer;
pragma Inline(Get_Item_Pointer);
pragma Inline (Get_Item_Pointer);
function Is_Shared (R: in Ref_Counted) return Boolean;
pragma Inline(Is_Shared);
pragma Inline (Is_Shared);
overriding procedure Initialize (R: in out Ref_Counted);
overriding procedure Adjust (R: in out Ref_Counted);