/******************************************************************************* * * Copyright (C) 2008 Fujitsu Services Ltd. * * Author: Nick Battle * * This file is part of VDMJ. * * VDMJ is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * VDMJ is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with VDMJ. If not, see <http://www.gnu.org/licenses/>. * ******************************************************************************/ package org.overture.pog.contexts; import org.overture.ast.expressions.ALetDefExp; import org.overture.ast.expressions.PExp; import org.overture.ast.util.Utils; public class POLetDefContext extends POContext { public final ALetDefExp exp; public POLetDefContext(ALetDefExp exp) { this.exp = exp; } @Override public boolean isScopeBoundary() { return true; } @Override public PExp getContextNode(PExp stitch) { if (!exp.getLocalDefs().isEmpty()) { ALetDefExp letDefExp = new ALetDefExp(); letDefExp.setLocalDefs(exp.clone().getLocalDefs()); letDefExp.setExpression(stitch); return letDefExp; } else { return stitch; } } @Override public String getContext() { StringBuilder sb = new StringBuilder(); if (!exp.getLocalDefs().isEmpty()) { sb.append("let "); sb.append(Utils.listToString(exp.getLocalDefs())); sb.append(" in"); } return sb.toString(); } }