diff options
author | Steve Hay <SteveHay@planit.com> | 2006-02-10 17:46:35 +0000 |
---|---|---|
committer | Steve Hay <SteveHay@planit.com> | 2006-02-10 17:46:35 +0000 |
commit | b0e6ae5b51a7c163ac7cdb0d18b54bb1819f6c13 (patch) | |
tree | c2baf77778e67f08289fdb499b42ff16d1f93003 /sv.c | |
parent | 9a083ecf3183b31c0b60e9c5dac947cd40829810 (diff) | |
download | perl-b0e6ae5b51a7c163ac7cdb0d18b54bb1819f6c13.tar.gz |
A better fix than 27148
Subject: Win32 assert (was Re: Smoke [5.9.4] 27145 FAIL(M) MSWin32 WinXP/.Net SP2 (x86/2 cpu))
From: Nicholas Clark <nick@ccl4.org>
Date: Fri, 10 Feb 2006 14:58:47 +0000
Message-ID: <20060210145847.GA85020@plum.flirble.org>
Subject: RE: Win32 assert (was Re: Smoke [5.9.4] 27145 FAIL(M) MSWin32 WinXP/.Net SP2 (x86/2 cpu))
From: "Jan Dubois" <jand@ActiveState.com>
Date: Fri, 10 Feb 2006 09:03:41 -0800
Message-ID: <024401c62e63$f1e53c10$6062a8c0@candy>
p4raw-id: //depot/perl@27152
Diffstat (limited to 'sv.c')
-rw-r--r-- | sv.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -9294,7 +9294,7 @@ Perl_ptr_table_new(pTHX) /* map an existing pointer using a table */ STATIC PTR_TBL_ENT_t * -S_ptr_table_find(pTHX_ PTR_TBL_t *tbl, const void *sv) { +S_ptr_table_find(PTR_TBL_t *tbl, const void *sv) { PTR_TBL_ENT_t *tblent; const UV hash = PTR_TABLE_HASH(sv); assert(tbl); @@ -9309,7 +9309,7 @@ S_ptr_table_find(pTHX_ PTR_TBL_t *tbl, const void *sv) { void * Perl_ptr_table_fetch(pTHX_ PTR_TBL_t *tbl, const void *sv) { - PTR_TBL_ENT_t const *const tblent = S_ptr_table_find(aTHX_ tbl, sv); + PTR_TBL_ENT_t const *const tblent = ptr_table_find(tbl, sv); return tblent ? tblent->newval : (void *) 0; } @@ -9318,7 +9318,7 @@ Perl_ptr_table_fetch(pTHX_ PTR_TBL_t *tbl, const void *sv) void Perl_ptr_table_store(pTHX_ PTR_TBL_t *tbl, const void *oldsv, void *newsv) { - PTR_TBL_ENT_t *tblent = S_ptr_table_find(aTHX_ tbl, oldsv); + PTR_TBL_ENT_t *tblent = S_ptr_table_find(tbl, oldsv); if (tblent) { tblent->newval = newsv; |