From 8c0364339f063fa32be742877e8206c8b6203de0 Mon Sep 17 00:00:00 2001 From: David Mitchell Date: Fri, 17 Mar 2017 13:40:03 +0000 Subject: [PATCH] PERL_GLOBAL_STRUCT_PRIVATE: fix scope.c:arg_counts t/porting/libperl.t under -DPERL_GLOBAL_STRUCT_PRIVATE doesn't like non-const static data structures --- scope.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scope.c b/scope.c index c51a125..a7c17e8 100644 --- a/scope.c +++ b/scope.c @@ -788,7 +788,7 @@ Perl_save_alloc(pTHX_ I32 size, I32 pad) } -static U8 arg_counts[] = { +static const U8 arg_counts[] = { 0, /* SAVEt_ALLOC */ 0, /* SAVEt_CLEARPADRANGE */ 0, /* SAVEt_CLEARSV */ -- 1.8.3.1