X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=dump.c;h=631f37cbb25fbd24b9f4b9f06e6bcdd53384d8fb;hb=4f4d7508b0c2c114e5f52420e0e87a853c5f642a;hp=6bfe5f401511cb2fcb8c403eca012c43cde70b32;hpb=dd9035cd5bdeced1187df399d27d526f3b30194b;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/dump.c b/dump.c
index 6bfe5f4..631f37c 100644
--- a/dump.c
+++ b/dump.c
@@ -645,6 +645,8 @@ S_pm_description(pTHX_ const PMOP *pm)
 	sv_catpv(desc, ",RETAINT");
     if (pmflags & PMf_EVAL)
 	sv_catpv(desc, ",EVAL");
+    if (pmflags & PMf_NONDESTRUCT)
+	sv_catpv(desc, ",NONDESTRUCT");
     return desc;
 }