rem: { soap->peeked = 1; if (soap->body) soap->level--;
add: { if (!soap->peeked) { soap->peeked = 1; if (soap->body) soap->level--; }
context: soap_revert(struct soap *soap){ soap->peeked = 1;  if (soap->body)    soap->level--;  DBGLOG(TEST, SOAP_MESSAGE(fdebug, "Reverting last element (level=%u)\n", soap->level));}