----- Original Message ----- From: Craig A. Berry <[EMAIL PROTECTED]> To: jesper.naur <[EMAIL PROTECTED]> Cc: VMSPERL mailing list <[EMAIL PROTECTED]> Sent: Friday, March 21, 2003 22:28 Subject: Re: 5.8.1-to-be snapshot: please test
> At 8:08 PM +0100 3/21/03, jesper.naur wrote: > > > >During build I had the same problem with undefined __VMS_WAITPID as described in > > > >http://www.xray.mpe.mpg.de/mailing-lists/vmsperl/2002-08/msg00044.html > > I think we are going to have to hit this with a bigger hammer and > just use 7.2 as the cutoff for enabling this rather than 7.1 and some > change as we have been doing (following wait.h). This is what I did: #if defined(__CRTL_VER) && __CRTL_VER >= 70200322 > > >t/op/pack............................FAILED at test 39 > > Ouch. That one looks pretty nasty and I'd definitely like to see > what's going on. You might have to do a debug build to get a > traceback of the crash. Something like the following might be the > quickest way to get there: > > $ MMK/MACRO=__DEBUG__=1 dbgminiperl.exe > $ set def [.t] > $ mcr [-]dbgminiperl "-I[-.lib}" [.op]pack.t Worked fast and very well: NGFA$ mcr [-]dbgminiperl "-I[-.lib}" [.op]pack.t OpenVMS Alpha DEBUG Version V7.1-000 %DEBUG-I-INITIAL, Language: C, Module: MINIPERLMAIN %DEBUG-I-NOTATMAIN, Type GO to reach MAIN program DBG> go break at routine MINIPERLMAIN\main DBG> go 1..5826 ok 1 ok 2 [snip] ok 37 ok 38 %DEBUG-I-DYNMODSET, setting module PP_PACK %SYSTEM-F-ILLEGAL_SHADOW, illegal formed trap shadow, Imask=00000000, Fmask=0000 0800, summary=03, PC=000000000015C4C0, PS=0000001B break on unhandled exception preceding PP_PACK\Perl_pack_cat\%LINE 47204+12 DBG> show stack invocation block 0 FP: 000000007AFB9460 Procedure Descriptor (000000000002D180): Flags: 3089 KIND: PDSC$K_KIND_FP_STACK (09) FP is Base Register Rsa Offset: 0170 Signature Offset 0000 Entry Address: PP_PACK\Perl_pack_cat Ireg Mask: 2000FFFC <R2,R3,R4,R5,R6,R7,R8,R9,R10,R11,R12,R1 3,R14,R15,FP> RA Saved @ 000000007AFB95D0: 000000000015DA50 R2 Saved @ 000000007AFB95D8: 000000000002D260 R3 Saved @ 000000007AFB95E0: 000000000098F1B8 R4 Saved @ 000000007AFB95E8: 00000000009995D8 R5 Saved @ 000000007AFB95F0: 000000000005646C R6 Saved @ 000000007AFB95F8: 000000000005681C R7 Saved @ 000000007AFB9600: 0000000000056968 R8 Saved @ 000000007AFB9608: 0000000000056964 R9 Saved @ 000000007AFB9610: 0000000000056650 R10 Saved @ 000000007AFB9618: 0000000000056730 R11 Saved @ 000000007AFB9620: 0000000000056780 R12 Saved @ 000000007AFB9628: 000000000005677C R13 Saved @ 000000007AFB9630: FFFFFFFF83B15A90 R14 Saved @ 000000007AFB9638: 0000000000056818 R15 Saved @ 000000007AFB9640: 0000000000A1D389 FP Saved @ 000000007AFB9648: 000000007AFB96A0 Freg Mask: 000003FC <F2,F3,F4,F5,F6,F7,F8,F9> F2 Saved @ 000000007AFB9650: 0000000000000000 F3 Saved @ 000000007AFB9658: 0000000000000000 F4 Saved @ 000000007AFB9660: 0000000000000000 F5 Saved @ 000000007AFB9668: 0000000000000000 F6 Saved @ 000000007AFB9670: 0000000000000000 F7 Saved @ 000000007AFB9678: 0000000000000000 F8 Saved @ 000000007AFB9680: 0000000000000000 F9 Saved @ 000000007AFB9688: 0000000000000000 Size: 00000230 invocation block 1 FP: 000000007AFB96A0 Procedure Descriptor (000000000002D260): Flags: 3089 KIND: PDSC$K_KIND_FP_STACK (09) FP is Base Register Rsa Offset: 0028 Signature Offset 0000 Entry Address: PP_PACK\Perl_pp_pack Ireg Mask: 2000001C <R2,R3,R4,FP> RA Saved @ 000000007AFB96C8: 0000000000096FB0 R2 Saved @ 000000007AFB96D0: 0000000000018528 R3 Saved @ 000000007AFB96D8: 0000000000056780 R4 Saved @ 000000007AFB96E0: 0000000000056508 FP Saved @ 000000007AFB96E8: 000000007AFB96F0 Freg Mask: 00000000 Size: 00000050 invocation block 2 FP: 000000007AFB96F0 Procedure Descriptor (0000000000018528): Flags: 3089 KIND: PDSC$K_KIND_FP_STACK (09) FP is Base Register Rsa Offset: 0008 Signature Offset 0000 Entry Address: PERL_RUNOPS_DEBUG Ireg Mask: 20000FFC <R2,R3,R4,R5,R6,R7,R8,R9,R10,R11,FP> RA Saved @ 000000007AFB96F8: 000000000006C828 R2 Saved @ 000000007AFB9700: 0000000000013300 R3 Saved @ 000000007AFB9708: 0000000000056650 R4 Saved @ 000000007AFB9710: 0000000000056794 R5 Saved @ 000000007AFB9718: 0000000000000001 R6 Saved @ 000000007AFB9720: 00000000009909D8 R7 Saved @ 000000007AFB9728: 0000000000056838 R8 Saved @ 000000007AFB9730: 00000000000565B0 R9 Saved @ 000000007AFB9738: 0000000000000000 R10 Saved @ 000000007AFB9740: 0000000000000400 R11 Saved @ 000000007AFB9748: 0000000000056780 FP Saved @ 000000007AFB9750: 000000007AFB9760 Freg Mask: 00000000 Size: 00000070 invocation block 3 FP: 000000007AFB9760 Procedure Descriptor (0000000000013300): Flags: 30D9 KIND: PDSC$K_KIND_FP_STACK (09) Handler Valid Handler Data Valid FP is Base Register Rsa Offset: 0260 Signature Offset 0000 Entry Address: PERL_RUN Ireg Mask: 20007FFC <R2,R3,R4,R5,R6,R7,R8,R9,R10,R11,R12,R1 3,R14,FP> RA Saved @ 000000007AFB99C0: 00000000000601A0 R2 Saved @ 000000007AFB99C8: 0000000000010848 R3 Saved @ 000000007AFB99D0: 0000000000190000 R4 Saved @ 000000007AFB99D8: 000000007FFCF818 R5 Saved @ 000000007AFB99E0: 00000000005E2710 R6 Saved @ 000000007AFB99E8: 000000007AFB9770 R7 Saved @ 000000007AFB99F0: FFFFFFFF83B14B49 R8 Saved @ 000000007AFB99F8: 000000007FFAC208 R9 Saved @ 000000007AFB9A00: 000000007FFAC410 R10 Saved @ 000000007AFB9A08: 000000007FFAD238 R11 Saved @ 000000007AFB9A10: 000000007FFCE3E0 R12 Saved @ 000000007AFB9A18: 0000000000000000 R13 Saved @ 000000007AFB9A20: FFFFFFFF83B15A90 R14 Saved @ 000000007AFB9A28: 0000000000000000 FP Saved @ 000000007AFB9A30: 000000007AFB9A40 Freg Mask: 00000000 Size: 000002E0 Condition Handler: 5372672 Handler Data: 00000000 00000008 invocation block 4 FP: 000000007AFB9A40 Procedure Descriptor (0000000000010848): Flags: 3089 KIND: PDSC$K_KIND_FP_STACK (09) FP is Base Register Rsa Offset: 0018 Signature Offset 0000 Entry Address: MINIPERLMAIN\main Ireg Mask: 2000000C <R2,R3,FP> RA Saved @ 000000007AFB9A58: 0000000000060070 R2 Saved @ 000000007AFB9A60: 00000000000108D0 R3 Saved @ 000000007AFB9A68: 000000007B0CB879 FP Saved @ 000000007AFB9A70: 000000007AFB9AA0 Freg Mask: 00000000 Size: 00000040 invocation block 5 FP: 000000007AFB9AA0 Procedure Descriptor (00000000000108D0): Flags: 30D9 KIND: PDSC$K_KIND_FP_STACK (09) Handler Valid Handler Data Valid FP is Base Register Rsa Offset: 0030 Signature Offset 0000 Entry Address: MINIPERLMAIN\__main Ireg Mask: 20000004 <R2,FP> RA Saved @ 000000007AFB9AD0: FFFFFFFF83B1316C R2 Saved @ 000000007AFB9AD8: 000000007FFCF880 FP Saved @ 000000007AFB9AE0: 000000007AFB9B30 Freg Mask: 00000000 Size: 00000050 Condition Handler: 5372672 Handler Data: 00000000 00000008 invocation block 6 FP: 000000007AFB9B30 Procedure Descriptor (FFFFFFFF83B15A90): Flags: 3099 KIND: PDSC$K_KIND_FP_STACK (09) Handler Valid FP is Base Register Rsa Offset: 0048 Signature Offset 0001 Entry Address: -2085540000 Ireg Mask: 20002084 <R2,R7,R13,FP> RA Saved @ 000000007AFB9B78: 000000007B0A0DCC R2 Saved @ 000000007AFB9B80: 0000000000000000 R7 Saved @ 000000007AFB9B88: 000000007FFAC9F0 R13 Saved @ 000000007AFB9B90: 000000007B0761E0 FP Saved @ 000000007AFB9B98: 000000007AFB9BB0 Freg Mask: 00000000 Size: 00000070 Condition Handler: -2085528960 DBG> If you need more: Don't hesitate to ask for extra information, which I could get out of the debugger. Best regards Jesper Naur
