andr3/scyther
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

- Order of claim processing now corresponds to the order in which they

Browse Source 
occur in the file.
This commit is contained in:
ccremers 2006-08-07 09:56:55 +00:00
parent 1350c0cd03
commit 2ef343ba6e
1 changed files with 18 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
src/compiler.c
View File

@ -464,8 +464,24 @@ claimCreate (const System sys, const Protocol protocol, const Role role,
cl->roles = NULL; cl->roles = NULL;
cl->alwaystrue = false; cl->alwaystrue = false;
cl->warnings = false; cl->warnings = false;
cl->next = sys->claimlist;
sys->claimlist = cl; /* add the claim to the end of the current list */
cl->next = NULL;
if (sys->claimlist == NULL)
{
sys->claimlist = cl;
}
else
{
Claimlist cl2;
cl2 = sys->claimlist;
while (cl2->next != NULL)
{
cl2 = cl2->next;
}
cl2->next = cl;
}
/* add the role event */ /* add the role event */
role->roledef = roledefAdd (role->roledef, CLAIM, label, role->roledef = roledefAdd (role->roledef, CLAIM, label,