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

- Omitted some addnew tests, although they ought to work.

Browse Source
This commit is contained in:
ccremers 2004-12-09 15:45:14 +00:00
parent 635470d976
commit 93ab6a29f4
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/system.c
View File

@ -688,8 +688,8 @@ roleInstanceArachne (const System sys, const Protocol protocol,
* Thus, it needs a local copy. * Thus, it needs a local copy.
*/ */
newt = makeTermType (VARIABLE, TermSymb (newt), rid); newt = makeTermType (VARIABLE, TermSymb (newt), rid);
artefacts = termlistAddNew (artefacts, newt);
newt->stype = oldt->stype; newt->stype = oldt->stype;
artefacts = termlistAddNew (artefacts, newt);
} }
/* Now we add any role names to the agent list. Note that /* Now we add any role names to the agent list. Note that
* instantiations do not matter: because if the variable is * instantiations do not matter: because if the variable is
@ -757,7 +757,7 @@ roleInstanceArachne (const System sys, const Protocol protocol,
artefacts = termlistAddNew (artefacts, newt); artefacts = termlistAddNew (artefacts, newt);
if (realTermVariable (newt)) if (realTermVariable (newt))
{ {
sys->variables = termlistAddNew (sys->variables, newt); sys->variables = termlistAdd (sys->variables, newt);
} }
fromlist = termlistAdd (fromlist, t); fromlist = termlistAdd (fromlist, t);
tolist = termlistAdd (tolist, newt); tolist = termlistAdd (tolist, newt);