tosquash use EXTERN_C to keep g++ happy (thanks alh)

Perl · Oct 2, 2024 · bf454f3 · bf454f3
1 parent 713e1d7
commit bf454f3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/op.c b/op.c
@@ -172,7 +172,7 @@ recursive, but it's recursive on basic blocks, not on tree nodes.
 static const char array_passed_to_stat[] = "Array passed to stat will be coerced to a scalar";
 
 /* UGH!! */
-extern void XS_builtin_indexed(pTHX_ CV *);
+EXTERN_C void XS_builtin_indexed(pTHX_ CV *);
 
 /* remove any leading "empty" ops from the op_next chain whose first
  * node's address is stored in op_p. Store the updated address of the