public override object Visit(PropertySetRegion PropertySetRegion, object data)
 {
     return null;
 }
Example #2
0
	void SetAccessorDecl(
#line  1241 "VBNET.ATG" 
out PropertySetRegion setBlock, ArrayList attributes) {

#line  1243 "VBNET.ATG" 
		Statement stmt = null;
		ArrayList p = null;
		
		Expect(158);
		if (la.kind == 25) {
			lexer.NextToken();
			if (StartOf(4)) {
				FormalParameterList(
#line  1247 "VBNET.ATG" 
out p);
			}
			Expect(26);
		}
		Expect(1);
		Block(
#line  1249 "VBNET.ATG" 
out stmt);

#line  1251 "VBNET.ATG" 
		setBlock = new PropertySetRegion((BlockStatement)stmt, attributes);
		setBlock.Parameters = p;
		
		Expect(89);
		Expect(158);
		Expect(1);
	}
 public object Visit(PropertySetRegion propertySetRegion, object data)
 {
     DebugOutput(propertySetRegion);
     exitConstructStack.Push(new DictionaryEntry(typeof(PropertyDeclaration), null));
     AppendAttributes(propertySetRegion.Attributes);
     AppendIndentation();
     sourceText.Append("set {");
     AppendNewLine();
     if (propertySetRegion.Block != null) {
         ++indentLevel;
         propertySetRegion.Block.AcceptVisitor(this, data);
         --indentLevel;
     }
     AppendIndentation();
     sourceText.Append("}");
     AppendNewLine();
     GenerateExitConstructLabel();
     return null;
 }
Example #4
0
	void AccessorDecls(
#line  1202 "VBNET.ATG" 
out PropertyGetRegion getBlock, out PropertySetRegion setBlock) {

#line  1204 "VBNET.ATG" 
		ArrayList attributes = new ArrayList(); 
		AttributeSection section;
		getBlock = null;
		setBlock = null; 
		
		while (la.kind == 28) {
			AttributeSection(
#line  1209 "VBNET.ATG" 
out section);

#line  1209 "VBNET.ATG" 
			attributes.Add(section); 
		}
		if (la.kind == 102) {
			GetAccessorDecl(
#line  1211 "VBNET.ATG" 
out getBlock, attributes);
			if (la.kind == 28 || la.kind == 158) {

#line  1213 "VBNET.ATG" 
				attributes = new ArrayList(); 
				while (la.kind == 28) {
					AttributeSection(
#line  1214 "VBNET.ATG" 
out section);

#line  1214 "VBNET.ATG" 
					attributes.Add(section); 
				}
				SetAccessorDecl(
#line  1215 "VBNET.ATG" 
out setBlock, attributes);
			}
		} else if (la.kind == 158) {
			SetAccessorDecl(
#line  1218 "VBNET.ATG" 
out setBlock, attributes);
			if (la.kind == 28 || la.kind == 102) {

#line  1220 "VBNET.ATG" 
				attributes = new ArrayList(); 
				while (la.kind == 28) {
					AttributeSection(
#line  1221 "VBNET.ATG" 
out section);

#line  1221 "VBNET.ATG" 
					attributes.Add(section); 
				}
				GetAccessorDecl(
#line  1222 "VBNET.ATG" 
out getBlock, attributes);
			}
		} else SynErr(212);
	}
 public virtual object Visit(PropertySetRegion propertySetRegion, object data)
 {
     blockStack.Push(propertySetRegion.Block);
     foreach (AttributeSection a in propertySetRegion.Attributes) {
         a.AcceptVisitor(this, data);
     }
     object ret = null;
     if (propertySetRegion.Block != null) {
         ret = propertySetRegion.Block.AcceptChildren(this, data);
     }
     blockStack.Pop();
     return ret;
 }