Exec_stat MCMarking::exec(MCExecPoint &ep)
{
if (card != NULL)
{
MCObject *optr;
uint4 parid;
if (card->getobj(ep, optr, parid, True) != ES_NORMAL
|| optr->gettype() != CT_CARD)
{
MCeerror->add
(EE_MARK_BADCARD, line, pos);
return ES_ERROR;
}
ep.setboolean(mark);
return optr->setprop(0, P_MARKED, ep, False);
}
if (tofind == NULL)
MCdefaultstackptr->mark(ep, where, mark);
else
{
if (tofind->eval(ep) != ES_NORMAL)
{
MCeerror->add
(EE_MARK_BADSTRING, line, pos);
return ES_ERROR;
}
MCdefaultstackptr->markfind(ep, mode, ep.getsvalue(), field, mark);
}
return ES_NORMAL;
}
