Update ptable.h

[perl/modules/autovivification.git] / autovivification.xs

diff --git a/autovivification.xs b/autovivification.xs
index a42b9803aa74ef2d46f71c976a885715d575df41..f198b1d8768373cbe900fd3b8b9119ebf68e28fd 100644 (file)
--- a/autovivification.xs
+++ b/autovivification.xs
@@ -389,7 +389,7 @@ STATIC void a_map_delete(pTHX_ const OP *o) {
  MUTEX_LOCK(&a_op_map_mutex);
 #endif
 
- ptable_map_store(a_op_map, o, NULL);
+ ptable_map_delete(a_op_map, o);
 
 #ifdef USE_ITHREADS
  MUTEX_UNLOCK(&a_op_map_mutex);