public TProfInstance CreateInstance(string AName, string AFileName) { TProfFunc Func; TProfInstance Inst; Func = FindFunc(AName); if (Func == null) { Func = new TProfFunc(this, AName, AFileName); this.Funcs.Add(Func); this.Map.Add(Func.Name, Func); } Inst = Func.AddInstance(); return(Inst); }
public TProfInstance(TProfFunc AFunc, int AIndex) { Func = AFunc; Calls = new List <TProfInstance>(); Index = AIndex; }