public wrapped_common_type_node(PCUReader pr, type_node base_type, string name, SemanticTree.type_access_level type_access_level,
common_namespace_node comprehensive_namespace, SymbolTable.ClassScope cs, location loc, int offset) :
base(base_type, name, type_access_level, comprehensive_namespace, cs, loc)
{
this.pr = pr;
this.offset = offset;
}
public WrappedUnitInterfaceScope(PCUReader pr)
: base(PascalABCCompiler.SystemLibrary.SystemLibrary.symtab, null, new Scope[0] {
}, "")
{
this.pr = pr;
Name = Path.GetFileName(pr.FileName);
}
public wrapped_function_body(PCUReader pr, int offset) : base(null)
{
this.pr = pr;
this.offset = offset;
}
public wrapped_expression(PCUReader pr, int offset)
{
this.pr = pr;
this.offset = offset;
}
public wrapped_type_synonym(PCUReader pr, string name, int offset) : base(offset, pr)
{
this.name = name;
is_synonim = true;
}
public WrappedInterfaceScope(PCUReader pr, Scope TopScope, Scope[] vTopInterfaceScopeArray)
:
base(pr, TopScope, null)
{
_TopInterfaceScopeArray = vTopInterfaceScopeArray;
}
public WrappedInterfaceScope(PCUReader pr, Scope TopScope, Scope BaseClassScope, Scope[] vTopInterfaceScopeArray)
:
base(pr, TopScope, BaseClassScope)
{
_TopInterfaceScopeArray = vTopInterfaceScopeArray;
}
public WrappedClassScope(PCUReader pr, Scope top_scope, Scope up_scope)
: base(SystemLibrary.SystemLibrary.symtab, top_scope, up_scope, "")
{
this.pr = pr;
}
public WrappedUnitImplementationScope(PCUReader pr, Scope TopScope)
: base(PascalABCCompiler.SystemLibrary.SystemLibrary.symtab, TopScope, new Scope[0] {
}, "")
{
this.pr = pr;
}
public WrappedUnitInterfaceScope(PCUReader pr)
: base(PascalABCCompiler.SystemLibrary.SystemLibrary.symtab, null, new Scope[0] {
})
{
this.pr = pr;
}
public WrappedClassScope(PCUReader pr, Scope top_scope, Scope up_scope)
: base(PascalABCCompiler.SystemLibrary.SystemLibrary.symtab, top_scope, up_scope)
{
this.pr = pr;
}
public WrappedUnitImplementationScope(PCUReader pr, Scope TopScope)
: base(SystemLibrary.symtab, TopScope, new Scope[0] {
})
{
this.pr = pr;
}
