Don't let [ap]PTBL_? values propagate outside ptable.h

[perl/modules/Lexical-Types.git] / ptable.h

diff --git a/ptable.h b/ptable.h
index fc50652443bb58dc8f117ab9b0ca3ec2c2844efe..07a755198ff6b762a04cbb89493d93b3140cb2f5 100644 (file)
--- a/ptable.h
+++ b/ptable.h
@@ -212,5 +212,10 @@ STATIC void PTABLE_PREFIX(_free)(pPTBL_ ptable * const t) {
  PerlMemShared_free(t);
 }
 
+#undef pPTBL
+#undef pPTBL_
+#undef aPTBL
+#undef aPTBL_
+
 #undef PTABLE_NAME
 #undef PTABLE_VAL_FREE