summaryrefslogtreecommitdiff
path: root/pp_hot.c
diff options
context:
space:
mode:
authorMalcolm Beattie <mbeattie@sable.ox.ac.uk>1997-07-24 14:57:53 +0000
committerMalcolm Beattie <mbeattie@sable.ox.ac.uk>1997-07-24 14:57:53 +0000
commit12ca11f6c16e7b63e13bbf5bc251f214e8de5211 (patch)
tree2ad63340b2a0d6974dbb2bbf088695113f3c49b4 /pp_hot.c
parentf2134d958aef4e3c1a25fdd268452df90105e99b (diff)
downloadperl-12ca11f6c16e7b63e13bbf5bc251f214e8de5211.tar.gz
Start support for fake threads.
pp_lock now returns its argument. p4raw-id: //depot/perl@41
Diffstat (limited to 'pp_hot.c')
-rw-r--r--pp_hot.c14
1 files changed, 0 insertions, 14 deletions
diff --git a/pp_hot.c b/pp_hot.c
index f45fa681b3..07f0754cd5 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -41,20 +41,6 @@ void *cvarg;
MUTEX_UNLOCK(CvMUTEXP(cv));
SvREFCNT_dec(cv);
}
-
-#if 0
-void
-mutex_unlock(m)
-void *m;
-{
-#ifdef DEBUGGING
- dTHR;
- DEBUG_L((fprintf(stderr, "0x%lx unlocking mutex 0x%lx\n",
- (unsigned long) thr, (unsigned long) m)));
-#endif /* DEBUGGING */
- MUTEX_UNLOCK((pthread_mutex_t *) m);
-}
-#endif
#endif /* USE_THREADS */
PP(pp_const)