// [COBOL 2002] private void EnterTypeDefinitionEntry(TypeDefinitionEntry typedef) { SetCurrentNodeToTopLevelItem(typedef.LevelNumber.Value); var node = new Nodes.TypeDefinition(typedef); Enter(node); node.SymbolTable.AddType(node); }
// [COBOL 2002] private void EnterTypeDefinitionEntry(DataTypeDescriptionEntry typedef) { SetCurrentNodeToTopLevelItem(typedef.LevelNumber); var node = new Nodes.TypeDefinition(typedef); Enter(node); var table = node.SymbolTable; if (node.CodeElement().IsGlobal) // TCTYPE_GLOBAL_TYPEDEF while(table.CurrentScope != SymbolTable.Scope.Global) table = table.EnclosingScope; table.AddType(node); }