public override void EnterLibraryCopy(CodeElementsParser.LibraryCopyContext context) { var copy = new LibraryCopyCodeElement(); if (context.UserDefinedWord() != null) { // TCRFUN_LIBRARY_COPY var value = CobolWordsBuilder.CreateAlphanumericValue(context.UserDefinedWord()); copy.Name = new SymbolDefinition(value, SymbolType.FileName);//TODO#278 eww! } Context = context; CodeElement = copy; }
public override void EnterFunctionDeclarationHeader(CodeElementsParser.FunctionDeclarationHeaderContext context) { var visibility = context.PUBLIC() != null ? AccessModifier.Public : AccessModifier.Private; QualifiedName name = null; if (context.UserDefinedWord() != null) { var token = ParseTreeUtils.GetTokenFromTerminalNode(context.UserDefinedWord()); name = new URI(token.Text); } Context = context; CodeElement = new FunctionDeclarationHeader(name, visibility); }
// [COBOL 2002] internal AlphanumericValue CreateAlphanumericValue(CodeElementsParser.Cobol2002TypeClauseContext context) { var result = CreateAlphanumericValue(context.DATE()); if (result != null) return result; return CreateAlphanumericValue(context.UserDefinedWord()); }