What I meant is this:

        if (count != 1) {
            status = OK;
        }
        else {
            SV* status_sv = POPs;
            if (status_sv == &PL_sv_undef) {
                /* ModPerl::Util::exit returns undef */
                status = OK;
            }
            else {
                status = (IV)SvIV(status_sv);

I don't think you don't need that cast.


            }
            /* assume OK for 200 (HTTP_OK) */
            if ((status == 200)) {
                status = OK;
            }
        }

ok, so the difference between the approaches is that mine is explicit, giving us some useful debug messages for coerced strings in case we have future problems.



I just tested that the undef problem disappears (I can easily reproduce it) and the rest works just as before.

well, better than before, since the pv/iv issue is removed :)


it doesn't matter to me whether we do it your way or my way, so long as the string issue is fixed. I happen to prefer more explicit debug messages myself.


I'll try again at getting a test reproduce this problem.

should be just a matter of setting PerlSwitches -w in the test suite (though who knows what that will start doing :)


--Geoff


--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]



Reply via email to