This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[perl #114864] Don’t use amt for DESTROY
[perl5.git] / lib / overload / numbers.pm
index d9daab5..a90c175 100644 (file)
@@ -1,15 +1,15 @@
 # -*- buffer-read-only: t -*-
 #
 # -*- buffer-read-only: t -*-
 #
-#   lib/overload/numbers.pm
+#    lib/overload/numbers.pm
 #
 #
-#   Copyright (C) 2008 by Larry Wall and others
+#    Copyright (C) 2008 by Larry Wall and others
 #
 #
-#   You may distribute under the terms of either the GNU General Public
-#   License or the Artistic License, as specified in the README file.
+#    You may distribute under the terms of either the GNU General Public
+#    License or the Artistic License, as specified in the README file.
 #
 # !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
 #
 # !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
-# This file is built by overload.pl
-#
+# This file is built by regen/overload.pl.
+# Any changes made here will be lost!
 
 package overload::numbers;
 
 
 package overload::numbers;
 
@@ -82,7 +82,6 @@ our @names = qw#
     (~~
     (-X
     (qr
     (~~
     (-X
     (qr
-    DESTROY
 #;
 
 our @enums = qw#
 #;
 
 our @enums = qw#
@@ -154,10 +153,10 @@ our @enums = qw#
     smart
     ftest
     regexp
     smart
     ftest
     regexp
-    DESTROY
 #;
 
 { my $i = 0; our %names = map { $_ => $i++ } @names }
 
 { my $i = 0; our %enums = map { $_ => $i++ } @enums }
 
 #;
 
 { my $i = 0; our %names = map { $_ => $i++ } @names }
 
 { my $i = 0; our %enums = map { $_ => $i++ } @enums }
 
+# ex: set ro: