diff options
| author | Nicholas Clark <nick@ccl4.org> | 2006-10-06 21:27:13 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2006-10-06 21:27:13 +0000 |
| commit | 8c798f879fd93d8d52542fe5d6d63725e8005251 (patch) | |
| tree | 3e2059e5e7801786251ab33490fb6d984ae5a0fc /overload.pl | |
| parent | bab3dc31a54b991bcbbb7b33bb5ede8251f0e056 (diff) | |
| download | perl-8c798f879fd93d8d52542fe5d6d63725e8005251.tar.gz | |
Fix typo spotted by Rafael. Close the file handle explicity and check
for errors. Add overload.pl to regen.pl
p4raw-id: //depot/perl@28951
Diffstat (limited to 'overload.pl')
| -rw-r--r-- | overload.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/overload.pl b/overload.pl index 640f4fdf29..1bddd3ff1e 100644 --- a/overload.pl +++ b/overload.pl @@ -2,7 +2,7 @@ # # Generate overload.h -# This allows the order of overloading consants to be changed. +# This allows the order of overloading constants to be changed. # BEGIN { @@ -74,6 +74,8 @@ EXTCONST char * PL_AMG_names[NofAMmeth]; #endif /* def INITAMAGIC */ EOT +close H or die $!; + __DATA__ # Fallback should be the first fallback () |