diff options
author | Vincent Pit <perl@profvince.com> | 2008-02-06 11:39:58 +0100 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-02-08 15:18:45 +0000 |
commit | 3468c7eaa8d7687e8ae89928492b408a4d6c752f (patch) | |
tree | 5517a8cec371cfee9bd973f3784d9b61954b4bc5 /ext | |
parent | 099b16d3b50ccbb639491fa8bd48153ec3225450 (diff) | |
download | perl-3468c7eaa8d7687e8ae89928492b408a4d6c752f.tar.gz |
mg_copy ought to take an I32
From: "Vincent Pit" <perl@profvince.com>
Message-ID: <39468.147.210.17.175.1202290798.squirrel@147.210.17.175>
p4raw-id: //depot/perl@33256
Diffstat (limited to 'ext')
-rw-r--r-- | ext/threads/shared/shared.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/threads/shared/shared.xs b/ext/threads/shared/shared.xs index 9e66dfab66..7decc4da6e 100644 --- a/ext/threads/shared/shared.xs +++ b/ext/threads/shared/shared.xs @@ -1035,7 +1035,7 @@ sharedsv_array_mg_free(pTHX_ SV *sv, MAGIC *mg) */ int sharedsv_array_mg_copy(pTHX_ SV *sv, MAGIC* mg, - SV *nsv, const char *name, int namlen) + SV *nsv, const char *name, I32 namlen) { MAGIC *nmg = sv_magicext(nsv,mg->mg_obj, toLOWER(mg->mg_type),&sharedsv_elem_vtbl, |