コード例 #1
0
 public override object Visit(PropertyGetRegion propertyGetRegion, object data)
 {
     return null;
 }
コード例 #2
0
	void GetAccessorDecl(
#line  1228 "VBNET.ATG" 
out PropertyGetRegion getBlock, ArrayList attributes) {

#line  1229 "VBNET.ATG" 
		Statement stmt = null; 
		Expect(102);
		Expect(1);
		Block(
#line  1232 "VBNET.ATG" 
out stmt);

#line  1234 "VBNET.ATG" 
		getBlock = new PropertyGetRegion((BlockStatement)stmt, attributes);
		
		Expect(89);
		Expect(102);
		Expect(1);
	}
コード例 #3
0
 public object Visit(PropertyGetRegion propertyGetRegion, object data)
 {
     DebugOutput(propertyGetRegion);
     exitConstructStack.Push(new DictionaryEntry(typeof(PropertyDeclaration), null));
     AppendAttributes(propertyGetRegion.Attributes);
     AppendIndentation();
     sourceText.Append("get {");
     AppendNewLine();
     if (propertyGetRegion.Block != null) {
         ++indentLevel;
         propertyGetRegion.Block.AcceptVisitor(this, data);
         --indentLevel;
     }
     AppendIndentation();
     sourceText.Append("}");
     AppendNewLine();
     GenerateExitConstructLabel();
     return null;
 }
コード例 #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);
	}
コード例 #5
0
 public virtual object Visit(PropertyGetRegion propertyGetRegion, object data)
 {
     blockStack.Push(propertyGetRegion.Block);
     foreach (AttributeSection a in propertyGetRegion.Attributes) {
         a.AcceptVisitor(this, data);
     }
     object ret = null;
     if (propertyGetRegion.Block != null) {
         ret = propertyGetRegion.Block.AcceptChildren(this, data);
     }
     blockStack.Pop();
     return ret;
 }