diff options
| author | Tony Cook <tony@develop-help.com> | 2013-07-15 14:17:25 +1000 |
|---|---|---|
| committer | Tony Cook <tony@develop-help.com> | 2013-07-24 15:44:01 +1000 |
| commit | f4632cecdf704cb1c4c4df67e1071c3b957d7e36 (patch) | |
| tree | aadb2f23677ce0893db17b8a1ccd652b2461266b /dist | |
| parent | 591596833b093b3ccc1a21ffd39c5a416591b91c (diff) | |
| download | perl-f4632cecdf704cb1c4c4df67e1071c3b957d7e36.tar.gz | |
[perl #118907] fix some issues with patch
Diffstat (limited to 'dist')
| -rw-r--r-- | dist/Storable/Storable.xs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/dist/Storable/Storable.xs b/dist/Storable/Storable.xs index a149d415f1..300ba66dde 100644 --- a/dist/Storable/Storable.xs +++ b/dist/Storable/Storable.xs @@ -1033,7 +1033,7 @@ static const char byteorderstr_56[] = {BYTEORDER_BYTES_56, 0}; TRACEME(("aseen(#%d) = 0x%"UVxf" (refcnt=%d)", cxt->tagnum-1, \ PTR2UV(y), SvREFCNT(y)-1)); \ if (stash) \ - BLESS((SV *) (y), stash); \ + BLESS((SV *) (y), (HV *)(stash)); \ } STMT_END /* @@ -4773,7 +4773,7 @@ static SV *retrieve_tied_idx(pTHX_ stcxt_t *cxt, const char *cname) { SV *tv; SV *sv; - SV *stash; + HV *stash; I32 idx; TRACEME(("retrieve_tied_idx (#%d)", cxt->tagnum)); |