mcalsuca:

If you had actual information on the error^[1] in your post, perhaps someone could point you to the error. As it is, someone would have to download your code, build the project and compile it themselves to see the error message(s) that you should have provided.

I'm not that motivated to go downstairs and fire up the windows box to give it a try.

Please update your node and give some more details...

Notes:

[1] Including compiler messages, linker messages, messages while executing the code, stack dumps, etc. can be pretty helpful for remote diagnosis of problems...

...roboticus

use warnings;
use Inline C => Config =>
    BUILD_NOISY => 1;

use Inline C => <<'EOC';

void call_Subtract(int a , int b) {
        dSP;
        int count;

        ENTER;
        SAVETMPS;

        PUSHMARK(SP);
        XPUSHs(sv_2mortal(newSViv(a)));
        XPUSHs(sv_2mortal(newSViv(b)));
        PUTBACK;

        printf("PL_errgv2 = %p\n", PL_errgv);

        //count = call_pv("Subtract", G_EVAL|G_SCALAR);
        count = call_pv("Subtract", G_SCALAR);

        SPAGAIN;

        printf("PL_errgv3 = %p\n", PL_errgv);

        /* Check the eval first */
        if (SvTRUE(ERRSV))  /* crashes here */
        {
            STRLEN n_a;
            printf ("Uh oh - %s\n", SvPV(ERRSV, n_a));
            POPs;
        }
        else
        {
            if (count != 1)
               croak("call_Subtract: wanted 1 value from 'Subtract', g
+ot %d\n",
                        count);

            printf ("%d - %d = %d\n", a, b, POPi);
        }

        PUTBACK;
        FREETMPS;
        LEAVE;
    }


EOC

call_Subtract(25, 12);

sub Subtract {
    my $ret = $_[0] - $_[1];
    return $ret;
}
[download]

PL_errgv2 = 002E3F20
PL_errgv3 = 002E3F20
25 - 12 = 13
[download]

Hi , Thanks for the replies
Just like to mention , i am using VC8 (VC2005) compiler then it crashes
--------------------------- perl10.exe - Application Error --------------------------- The exception unknown software exception (0xc0000005) occurred in the application at location 0x00401064. Click on OK to terminate the program Click on CANCEL to debug the program --------------------------- OK Cancel ---------------------------
But this works fine for VC6 compiler.
And it crashes at the if (SvTRUE(ERRSV)) line.
Please help
Best Regards Manoj

Google produces lots (probably far too many) of hits for '0xc0000005'.

My best guess is that afoken's post is closest to the mark.

That is, you've come up against some sort of wtf - probably a handle allocated by msvcr80.dll is passed to msvcrt.dll, and msvcrt.dll doesn't know what to do with this handle (... nor should it).

Cheers,
Rob

I am using the VC 2005 form tetsing the code. This code works fine for Perl 5.8. But it crashes for perl 5.10.

Are you sure both perls were compiled using VC 2005? As far as I know, very ugly things can happen to perl when you mix compilers and linkers. If you want to play safe, use the compiler, linker, and make utility that were used to compile perl.

Alexander