This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Force inclusion of both Perl_runops_* in perl itself,
authorNick Ing-Simmons <nik@tiuk.ti.com>
Sun, 18 Nov 2001 12:50:19 +0000 (12:50 +0000)
committerNick Ing-Simmons <nik@tiuk.ti.com>
Sun, 18 Nov 2001 12:50:19 +0000 (12:50 +0000)
so they are available for Peek.xs etc.

p4raw-id: //depot/perlio@13067

perlvars.h

index 7041924..606f7a5 100644 (file)
@@ -40,3 +40,8 @@ PERLVAR(Gop_mutex,    perl_mutex)     /* Mutex for op refcounting */
 PERLVAR(Gsharedsv_space, PerlInterpreter*) /* The shared sv space */
 PERLVAR(Gsharedsv_space_mutex, perl_mutex) /* Mutex protecting the shared sv space */
 #endif
+
+/* Force inclusion of both runops options */
+PERLVARI(Grunops_std,  runops_proc_t,  MEMBER_TO_FPTR(Perl_runops_standard))
+PERLVARI(Grunops_dbg,  runops_proc_t,  MEMBER_TO_FPTR(Perl_runops_debug))
+