Add(Button,12089024,105,161)
{
 Left=105
 Top=160
 link(onClick,3044783:doit,[])
}
Add(InlineCode,3044783,168,161)
{
 WorkPoints=#4:doit|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|21:uses kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|42:      procedure doit(var d:Tdata; i:word);|5: end;|0:|14:implementation|0:|48:procedure THiAsmClass.doit(var d:Tdata; i:word);|14:var p:pointer;|5:begin|27:   getmem(p, 20*1024*1024);|4:end;|0:|4:end.|
}