This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
embed.fnc: Mark freetmps as Core only
authorKarl Williamson <khw@cpan.org>
Wed, 22 Jul 2020 12:38:02 +0000 (06:38 -0600)
committerKarl Williamson <khw@cpan.org>
Sat, 15 Aug 2020 11:51:47 +0000 (05:51 -0600)
The macro FREETMPS is what one is supposed to use for this functionality.

embed.fnc

index d66a09e..2e2bce9 100644 (file)
--- a/embed.fnc
+++ b/embed.fnc
@@ -823,7 +823,7 @@ Sd  |OP*    |traverse_op_tree|NN OP* top|NN OP* o
 #endif
 Afpd   |char*  |form           |NN const char* pat|...
 Ap     |char*  |vform          |NN const char* pat|NULLOK va_list* args
-Ap     |void   |free_tmps
+Cp     |void   |free_tmps
 #if defined(PERL_IN_OP_C)
 S      |void   |gen_constant_list|NULLOK OP* o
 #endif