// [COBOL 2002] internal AlphanumericValue CreateAlphanumericValue(CodeElementsParser.Cobol2002TypeClauseContext context) { var result = CreateAlphanumericValue(context.DATE()); if (result != null) return result; return CreateAlphanumericValue(context.UserDefinedWord()); }
internal SymbolReference CreateSymbolReference(CodeElementsParser.SymbolReference12Context context, SymbolType symbolType) { AlphanumericValue nameLiteral = null; if (context.alphanumericValue4() != null) { nameLiteral = CreateAlphanumericValue(context.alphanumericValue4()); } else if(context.DATE() != null) { nameLiteral = new AlphanumericValue(ParseTreeUtils.GetFirstToken(context.DATE())); } var symbolReference = new SymbolReference(nameLiteral, symbolType); symbolInformationForTokens[nameLiteral.Token] = symbolReference; return symbolReference; }