Select Code to Download

$ perl ppport.h --patch=the.patch
Scanning ./BeginLift.xs ...
...
*** WARNING: Uses sv_derived_from, which may not be portable below per
+l 5.004, even with 'ppport.h'
Needs to include 'ppport.h'
Analysis completed (2 warnings)

$ objdump -p C:\perl\5.14.1\bin\MSWin32-x86-multi-thread\perl514.dll |
+ grep pad
        [  47] PL_ppaddr
...
        [ 648] Perl_pad_findmy
        [ 649] Perl_pad_push
        [ 765] Perl_save_padsv_and_mortalize

embed.h
1173 #define pad_swipe(a,b)          Perl_pad_swipe(aTHX_ a,b)
...
1512         Perl_croak(aTHX_ "panic: pad_swipe curpad, %p!=%p",
1515         Perl_croak(aTHX_ "panic: pad_swipe po=%ld, fill=%ld",
1705 /* XXX DAPM integrate with pad_swipe ???? */