Skip to content

Commit fc41e15

Browse files
committed
bisect-runner.pl should supply a prototype for Gv_AMupdate
This was missing prior to perl-5.001
1 parent 541f97f commit fc41e15

File tree

1 file changed

+17
-0
lines changed

1 file changed

+17
-0
lines changed

Porting/bisect-runner.pl

Lines changed: 17 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -3437,6 +3437,23 @@ sub patch_C {
34373437
# This is ordered by $major, as it's likely that different platforms may
34383438
# well want to share code.
34393439
3440+
if ($major == 0) {
3441+
apply_patch(<<'EOPATCH');
3442+
diff --git a/proto.h b/proto.h
3443+
index 9ffc6bbabc..16da198342 100644
3444+
--- a/proto.h
3445+
+++ b/proto.h
3446+
@@ -8,6 +8,7 @@
3447+
#endif
3448+
#ifdef OVERLOAD
3449+
SV* amagic_call _((SV* left,SV* right,int method,int dir));
3450+
+bool Gv_AMupdate _((HV* stash));
3451+
#endif /* OVERLOAD */
3452+
OP* append_elem _((I32 optype, OP* head, OP* tail));
3453+
OP* append_list _((I32 optype, LISTOP* first, LISTOP* last));
3454+
EOPATCH
3455+
}
3456+
34403457
if ($major == 2 && extract_from_file('perl.c', qr/^\tfclose\(e_fp\);$/)) {
34413458
# need to patch perl.c to avoid calling fclose() twice on e_fp when
34423459
# using -e

0 commit comments

Comments
 (0)