public ktValue(ktString Name, ktString Type, ktIntObj Object,
bool HardType, bool Constant, ktClass CallbackClass)
: base("ktValue", 0)
{
m_Object = Object;
SetName(Name);
SetType(Type);
SetHardType(HardType);
SetConstant(Constant);
SetCallback(CallbackClass);
}
public ktClass(ktString Name, ktClass Parent, ktList Properties, ktList Methods,
bool AddIfNotSet, bool IsClass_, bool HardType = false, bool IsConstant = false)
: base("ktClass", 0)
{
m_Name = Name;
m_Parent = Parent;
m_Properties = Properties;
m_Methods = Methods;
m_AddIfNotSet = AddIfNotSet;
m_IsClass = IsClass_;
m_HardType = HardType;
m_IsConstant = IsConstant;
}
public ktClass(ktClass Parent)
: this("", Parent, null, null, Parent.AddIfNotSet, false)
{
}
public bool AddClass(ktClass Class)
{
if (Class == null)
return false;
if (m_Classes == null)
m_Classes = new ktList();
ktNode Node = new ktNode(Class);
Node.Name = Class.Name;
return m_Classes.Add(Node);
}
public void SetCallback()
{
m_Callback = null;
}
public void SetCallback(ktClass Callback)
{
m_Callback = Callback;
}