~verifypn-cpn/verifypn/colored

« back to all changes in this revision

Viewing changes to PetriEngine/PQL/PQL.cpp

  • Committer: Jonas Finnemann Jensen
  • Date: 2011-09-15 13:30:00 UTC
  • Revision ID: jopsen@gmail.com-20110915133000-wnywm1odf82emiuw
Import of sources from github

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
/* PeTe - Petri Engine exTremE
 
2
 * Copyright (C) 2011  Jonas Finnemann Jensen <jopsen@gmail.com>,
 
3
 *                     Thomas Søndersø Nielsen <primogens@gmail.com>,
 
4
 *                     Lars Kærlund Østergaard <larsko@gmail.com>,
 
5
 * 
 
6
 * This program is free software: you can redistribute it and/or modify
 
7
 * it under the terms of the GNU General Public License as published by
 
8
 * the Free Software Foundation, either version 3 of the License, or
 
9
 * (at your option) any later version.
 
10
 * 
 
11
 * This program is distributed in the hope that it will be useful,
 
12
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 
13
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
14
 * GNU General Public License for more details.
 
15
 * 
 
16
 * You should have received a copy of the GNU General Public License
 
17
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
18
 */
 
19
#include "PQL.h"
 
20
 
 
21
#include "Contexts.h"
 
22
 
 
23
namespace PetriEngine {
 
24
namespace PQL {
 
25
 
 
26
Expr::~Expr(){}
 
27
 
 
28
bool Condition::evaluate(Structures::State &state) const{
 
29
        return evaluate(EvaluationContext(state.marking(), state.valuation()));
 
30
}
 
31
 
 
32
Condition::~Condition(){}
 
33
 
 
34
 
 
35
void AssignmentExpression::analyze(AnalysisContext& context){
 
36
        for(iter it = assignments.begin(); it != assignments.end(); it++){
 
37
                AnalysisContext::ResolutionResult result = context.resolve(it->identifier);
 
38
                if(result.success && !result.isPlace){
 
39
                        it->offset = result.offset;
 
40
                }else if(result.isPlace){
 
41
                        context.reportError(ExprError("You cannot assign to an place!"));
 
42
                }else{
 
43
                        context.reportError(ExprError("Variable for assignment could not be resolved!"));
 
44
                }
 
45
                it->expr->analyze(context);
 
46
        }
 
47
}
 
48
 
 
49
} // PQL
 
50
} // PetriEngine