- Added '--check' switch, to see whether your protocol terminates at all

if there is no intruder.
- Restructered many switches.
This commit is contained in:
ccremers
2005-12-29 12:52:51 +00:00
parent a50245734d
commit 3b897c3872
3 changed files with 147 additions and 133 deletions

View File

@@ -2958,6 +2958,20 @@ add_claim_specifics (const Claimlist cl, const Roledef rd)
cl->count = statesIncrease (cl->count);
goal_add (rd->message, 0, cl->ev, 0); // Assumption that all claims are in run 0
}
if (cl->type == CLAIM_Reachable)
{
if (switches.check)
{
// For reachability claims in check mode, we restrict the number of runs to the number of roles of this protocol
Protocol protocol;
int rolecount;
protocol = (Protocol) cl->protocol;
rolecount = termlistLength (protocol->rolenames);
switches.runs = rolecount;
}
}
}
//! Count a false claim