Adriano Ferreira prefers blead as upstream

[perl5.git] / overload.c

diff --git a/overload.c b/overload.c
index 2f1f870..909a0ee 100644 (file)
--- a/overload.c
+++ b/overload.c
@@ -82,6 +82,7 @@ static const U8 PL_AMG_namelens[NofAMmeth] = {
     2,
     3,
     3,
+    3,
     7
 };
 
@@ -157,5 +158,6 @@ static const char * const PL_AMG_names[NofAMmeth] = {
     "(.",
     "(.=",
     "(~~",
+    "(-X",
     "DESTROY"
 };