perl 5.0 alpha 6

[editor's note: cleaned up from the September '94 InfoMagic CD, just
like the last commit]

1 files changed, 1 insertions, 1 deletions

diff --git a/run.c b/run.c
index 76fd63c5f8..eb3230298c 100644
--- a/run.c
+++ b/run.c
@@ -53,7 +53,7 @@ OP *op;
 	    sv = NEWSV(0,0);
 	    gv_fullname(sv, cGVOP->op_gv);
 	    fprintf(stderr, "(%s)", SvPV(sv, na));
-	    sv_free(sv);
+	    SvREFCNT_dec(sv);
 	}
 	else
 	    fprintf(stderr, "(NULL)");