From ffd4ff43bd2a65a31e5f3808320b98b9851ba91e Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Mon, 19 Sep 2005 15:59:44 +0000 Subject: [PATCH] All Perl_hv_name_set()s need to be plain hv_name_set if they are to work with a macro version. p4raw-id: //depot/perl@25493 --- ext/ByteLoader/bytecode.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ext/ByteLoader/bytecode.h b/ext/ByteLoader/bytecode.h index 99ffd7f..b6bb12d 100644 --- a/ext/ByteLoader/bytecode.h +++ b/ext/ByteLoader/bytecode.h @@ -347,7 +347,7 @@ typedef char *pvindex; mg_set(*hv_store(GvHV(gv_fetchpv("SIG", TRUE, SVt_PVHV)), \ name, strlen(name), cv, 0)) -#define BSET_xhv_name(hv, name) Perl_hv_name_set(aTHX_ (HV*)hv, name, strlen(name), 0) +#define BSET_xhv_name(hv, name) hv_name_set((HV*)hv, name, strlen(name), 0) /* NOTE: the bytecode header only sanity-checks the bytecode. If a script cares about * what version of Perl it's being called under, it should do a 'use 5.006_001' or -- 2.7.4