- Some cleanup writes, e.g. making initalisation code order correspond

to struct field order.
This commit is contained in:
ccremers 2004-08-12 13:22:49 +00:00
parent 032d322952
commit b9f4d11d0a
3 changed files with 8 additions and 5 deletions

View File

@ -73,7 +73,7 @@ arachneInit (const System mysys)
rd = NULL;
r->next = INTRUDER->roles;
INTRUDER->roles = r;
compute_role_variables (sys, INTRUDER, r);
// compute_role_variables (sys, INTRUDER, r);
return r;
}
@ -160,6 +160,9 @@ iterate_role_sends (int (*func) ())
{
if (rd->type == SEND)
{
int x;
x = 1;
if (!func (p, r, rd, index))
return 0;
}

View File

@ -191,10 +191,10 @@ roleCreate (Term name)
r = memAlloc (sizeof (struct role));
r->nameterm = name;
r->next = NULL;
r->roledef = NULL;
r->locals = NULL;
r->variables = NULL;
r->roledef = NULL;
r->next = NULL;
return r;
}

View File

@ -798,10 +798,10 @@ protocolCreate (Term name)
p = memAlloc (sizeof (struct protocol));
p->nameterm = name;
p->rolenames = NULL;
p->next = NULL;
p->roles = NULL;
p->rolenames = NULL;
p->locals = NULL;
p->next = NULL;
return p;
}