void function_modifiest::get_modifies_lhs(
const local_may_aliast &local_may_alias,
const goto_programt::const_targett t,
const exprt &lhs,
modifiest &modifies)
{
if(lhs.id()==ID_symbol)
modifies.insert(lhs);
else if(lhs.id()==ID_dereference)
{
modifiest m=local_may_alias.get(t, to_dereference_expr(lhs).pointer());
for(modifiest::const_iterator m_it=m.begin();
m_it!=m.end(); m_it++)
get_modifies_lhs(local_may_alias, t, *m_it, modifies);
}
else if(lhs.id()==ID_member)
{
}
else if(lhs.id()==ID_index)
{
}
else if(lhs.id()==ID_if)
{
get_modifies_lhs(local_may_alias, t, to_if_expr(lhs).true_case(), modifies);
get_modifies_lhs(
local_may_alias, t, to_if_expr(lhs).false_case(), modifies);
}
}
void function_modifiest::get_modifies(
const local_may_aliast &local_may_alias,
const goto_programt::const_targett i_it,
modifiest &modifies)
{
const goto_programt::instructiont &instruction=*i_it;
if(instruction.is_assign())
{
const exprt &lhs=to_code_assign(instruction.code).lhs();
get_modifies_lhs(local_may_alias, i_it, lhs, modifies);
}
else if(instruction.is_function_call())
{
const code_function_callt &code_function_call=
to_code_function_call(instruction.code);
const exprt &lhs=code_function_call.lhs();
// return value assignment
if(lhs.is_not_nil())
get_modifies_lhs(local_may_alias, i_it, lhs, modifies);
get_modifies_function(
code_function_call.function(), modifies);
}
}
void k_inductiont::get_modifies(
const loopt &loop,
modifiest &modifies)
{
for(loopt::const_iterator
i_it=loop.begin(); i_it!=loop.end(); i_it++)
{
const goto_programt::instructiont &instruction=**i_it;
if(instruction.is_assign())
{
const exprt &lhs=to_code_assign(instruction.code).lhs();
get_modifies_lhs(*i_it, lhs, modifies);
}
else if(instruction.is_function_call())
{
const exprt &lhs=to_code_function_call(instruction.code).lhs();
get_modifies_lhs(*i_it, lhs, modifies);
}
}
}
