Fix refcounts for lock/magic_mutexfree. Make OP_LOCK auto-ref

its argument using ck_rfun as OP_DEFINED. Make pp_lock return
a ref to its argument for AV, HV, CV.

p4raw-id: //depot/perl@170

1 files changed, 1 insertions, 1 deletions

diff --git a/opcode.h b/opcode.h
index 7cf7f66800..1b465ddb30 100644
--- a/opcode.h
+++ b/opcode.h
@@ -2137,7 +2137,7 @@ EXT OP * (*check[]) _((OP *op)) = {
 	ck_null,	/* egrent */
 	ck_null,	/* getlogin */
 	ck_fun,		/* syscall */
-	ck_null,	/* lock */
+	ck_rfun,	/* lock */
 };
 #endif