Roxen.git/ server/ etc/ modules/ RXML.pmod/ module.pmod

2002-08-14

2002-08-14 18:22:55 by Martin Stjernholm <mast@lysator.liu.se>

• 2b058b6daa3ba0affc6f59d2134e3629bf9e145c (7 lines) (+6/-1) ^{[ Show | Annotate ]}
  Branch: 5.2

Turn off nested result collection through Context.evaled_p_code during
execution of exec arrays. (This bug surfaced due to the fix of the
previous one.)

Rev: server/etc/modules/RXML.pmod/module.pmod:1.290

2:   //   // Created 1999-07-30 by Martin Stjernholm.   // - // $Id: module.pmod,v 1.289 2002/08/12 21:55:51 mast Exp $ + // $Id: module.pmod,v 1.290 2002/08/14 18:22:55 mast Exp $      // Kludge: Must use "RXML.refs" somewhere for the whole module to be   // loaded correctly.
3368:    mixed res = nil;    Parser subparser = 0;    int orig_make_p_code = ctx->make_p_code; +  PCode orig_evaled_p_code = ctx->evaled_p_code; +  ctx->evaled_p_code = 0;       mixed err = catch {    for (; i < sizeof (exec); i++) {
3492:    else res = result;       ctx->make_p_code = orig_make_p_code; +  ctx->evaled_p_code = orig_evaled_p_code;    return res;    };       if (result_type->sequential) result = result + (result = 0, res);       ctx->make_p_code = orig_make_p_code; -  +  ctx->evaled_p_code = orig_evaled_p_code;    if (objectp (err) && ([object] err)->thrown_at_unwind) {    THIS_TAG_DEBUG ("Exec: Interrupted at position %d\n", i);    UNWIND_STATE ustate;