From 7766f1371a6d2b58d0f46fbe6a60785860a39c1e Mon Sep 17 00:00:00 2001 From: Gurusamy Sarathy Date: Wed, 1 Dec 1999 01:00:09 +0000 Subject: more complete pseudo-fork() support for Windows p4raw-id: //depot/perl@4602 --- run.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'run.c') diff --git a/run.c b/run.c index a5e63598dd..98780761d4 100644 --- a/run.c +++ b/run.c @@ -71,7 +71,7 @@ Perl_debop(pTHX_ OP *o) Perl_deb(aTHX_ "%s", PL_op_name[o->op_type]); switch (o->op_type) { case OP_CONST: - PerlIO_printf(Perl_debug_log, "(%s)", SvPEEK(cSVOPo->op_sv)); + PerlIO_printf(Perl_debug_log, "(%s)", SvPEEK(cSVOPo_sv)); break; case OP_GVSV: case OP_GV: -- cgit v1.2.1