diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2002-01-15 15:08:43 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2002-01-15 15:08:43 +0000 |
| commit | 5a8e194fce7241d2bd0867584a5f8b0c0e672556 (patch) | |
| tree | 2aa874996169166812b79a55783aa5a7116f7b2f /intrpvar.h | |
| parent | 6916a0abaebd67f9eaa2ffb20dbbb5aaf1b1719d (diff) | |
| download | perl-5a8e194fce7241d2bd0867584a5f8b0c0e672556.tar.gz | |
Correct slab allocator for case where sizeof(IV) > sizeof(IV *)
e.g. -Duse64bitint on a 32-bit platform.
Now uses I32 for use-count and is more careful with its casts.
p4raw-id: //depot/perlio@14281
Diffstat (limited to 'intrpvar.h')
| -rw-r--r-- | intrpvar.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/intrpvar.h b/intrpvar.h index 4486d2f636..00005963b5 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -513,9 +513,9 @@ PERLVAR(Idebug_pad, struct perl_debug_pad) /* always needed because of the re ex PERLVAR(Itaint_warn, bool) /* taint warns instead of dying */ #ifdef PL_OP_SLAB_ALLOC -PERLVAR(IOpPtr,IV **) -PERLVARI(IOpSpace,int,0) -PERLVAR(IOpSlab,IV *) +PERLVAR(IOpPtr,I32 **) +PERLVARI(IOpSpace,I32,0) +PERLVAR(IOpSlab,I32 *) #endif /* New variables must be added to the very end for binary compatibility. |