blob: 17ee29828f20445252e0a767ad62c248c5451122 [file] [log] [blame]
/*******************************************************************************
* Copyright (c) 2007 University of Illinois at Urbana-Champaign and others.
* All rights reserved. This program and the accompanying materials
* are made available under the terms of the Eclipse Public License v1.0
* which accompanies this distribution, and is available at
* http://www.eclipse.org/legal/epl-v10.html
*
* Contributors:
* UIUC - Initial API and implementation
*******************************************************************************/
package org.eclipse.photran.internal.core.parser;
import java.io.PrintStream;
import java.util.Iterator;
import java.util.List;
import org.eclipse.photran.internal.core.parser.ASTListNode;
import org.eclipse.photran.internal.core.parser.ASTNode;
import org.eclipse.photran.internal.core.parser.ASTNodeWithErrorRecoverySymbols;
import org.eclipse.photran.internal.core.parser.IASTListNode;
import org.eclipse.photran.internal.core.parser.IASTNode;
import org.eclipse.photran.internal.core.parser.IASTVisitor;
import org.eclipse.photran.internal.core.lexer.Token;
import org.eclipse.photran.internal.core.lexer.*; import org.eclipse.photran.internal.core.analysis.binding.ScopingNode; import org.eclipse.photran.internal.core.SyntaxException; import java.io.IOException;
@SuppressWarnings("all")
public class ASTDerivedTypeDefNode extends ScopingNode implements IDeclarationConstruct
{
ASTDerivedTypeStmtNode derivedTypeStmt; // in ASTDerivedTypeDefNode
ASTTypeParamDefStmtNode typeParamDefStmt; // in ASTDerivedTypeDefNode
IASTListNode<IDerivedTypeBodyConstruct> derivedTypeBody; // in ASTDerivedTypeDefNode
ASTTypeBoundProcedurePartNode typeBoundProcedurePart; // in ASTDerivedTypeDefNode
ASTEndTypeStmtNode endTypeStmt; // in ASTDerivedTypeDefNode
public ASTDerivedTypeStmtNode getDerivedTypeStmt()
{
return this.derivedTypeStmt;
}
public void setDerivedTypeStmt(ASTDerivedTypeStmtNode newValue)
{
this.derivedTypeStmt = newValue;
if (newValue != null) newValue.setParent(this);
}
public ASTTypeParamDefStmtNode getTypeParamDefStmt()
{
return this.typeParamDefStmt;
}
public void setTypeParamDefStmt(ASTTypeParamDefStmtNode newValue)
{
this.typeParamDefStmt = newValue;
if (newValue != null) newValue.setParent(this);
}
public IASTListNode<IDerivedTypeBodyConstruct> getDerivedTypeBody()
{
return this.derivedTypeBody;
}
public void setDerivedTypeBody(IASTListNode<IDerivedTypeBodyConstruct> newValue)
{
this.derivedTypeBody = newValue;
if (newValue != null) newValue.setParent(this);
}
public ASTTypeBoundProcedurePartNode getTypeBoundProcedurePart()
{
return this.typeBoundProcedurePart;
}
public void setTypeBoundProcedurePart(ASTTypeBoundProcedurePartNode newValue)
{
this.typeBoundProcedurePart = newValue;
if (newValue != null) newValue.setParent(this);
}
public ASTEndTypeStmtNode getEndTypeStmt()
{
return this.endTypeStmt;
}
public void setEndTypeStmt(ASTEndTypeStmtNode newValue)
{
this.endTypeStmt = newValue;
if (newValue != null) newValue.setParent(this);
}
@Override
public void accept(IASTVisitor visitor)
{
visitor.visitASTDerivedTypeDefNode(this);
visitor.visitIDeclarationConstruct(this);
visitor.visitASTNode(this);
}
@Override protected int getNumASTFields()
{
return 5;
}
@Override protected IASTNode getASTField(int index)
{
switch (index)
{
case 0: return this.derivedTypeStmt;
case 1: return this.typeParamDefStmt;
case 2: return this.derivedTypeBody;
case 3: return this.typeBoundProcedurePart;
case 4: return this.endTypeStmt;
default: throw new IllegalArgumentException("Invalid index");
}
}
@Override protected void setASTField(int index, IASTNode value)
{
switch (index)
{
case 0: this.derivedTypeStmt = (ASTDerivedTypeStmtNode)value; if (value != null) value.setParent(this); return;
case 1: this.typeParamDefStmt = (ASTTypeParamDefStmtNode)value; if (value != null) value.setParent(this); return;
case 2: this.derivedTypeBody = (IASTListNode<IDerivedTypeBodyConstruct>)value; if (value != null) value.setParent(this); return;
case 3: this.typeBoundProcedurePart = (ASTTypeBoundProcedurePartNode)value; if (value != null) value.setParent(this); return;
case 4: this.endTypeStmt = (ASTEndTypeStmtNode)value; if (value != null) value.setParent(this); return;
default: throw new IllegalArgumentException("Invalid index");
}
}
}