diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-02-28 23:59:59 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-02-28 23:59:59 +0000 |
| commit | 48944bdf88abc95632c13b4206704af5887baf4e (patch) | |
| tree | e7314b536fce3b427f184b379b30cbd43d814dd5 /mg.c | |
| parent | bab3591f9fe41314b6f0fcfe82b37895cadc6fc3 (diff) | |
| download | perl-48944bdf88abc95632c13b4206704af5887baf4e.tar.gz | |
Do not cast pointers into I32s.
p4raw-id: //depot/cfgperl@5334
Diffstat (limited to 'mg.c')
| -rw-r--r-- | mg.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2175,7 +2175,7 @@ static void restore_magic(pTHXo_ void *p) { dTHR; - MGS* mgs = SSPTR((I32)p, MGS*); + MGS* mgs = SSPTR(PTR2IV(p), MGS*); SV* sv = mgs->mgs_sv; if (!sv) |