diff options
| author | Rick Delaney <rick@consumercontact.com> | 2007-02-21 11:53:16 -0500 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-02-23 18:19:32 +0000 |
| commit | d11ee47c025353980152bb1032c6f7c7192a7260 (patch) | |
| tree | def7a75a7fadff497433dd2c6bed0097207b30f8 /gv.c | |
| parent | 608a105b876e178af7d740d5bad843bf3cce4787 (diff) | |
| download | perl-d11ee47c025353980152bb1032c6f7c7192a7260.tar.gz | |
Re: [perl #41546] perl 5.8.x bug: overloaded 'eq' does not work with 'nomethod'
Message-ID: <20070221215316.GF5646@bort.ca>
p4raw-id: //depot/perl@30383
Diffstat (limited to 'gv.c')
| -rw-r--r-- | gv.c | 13 |
1 files changed, 13 insertions, 0 deletions
@@ -1871,6 +1871,19 @@ Perl_amagic_call(pTHX_ SV *left, SV *right, int method, int flags) } else { not_found: /* No method found, either report or croak */ switch (method) { + case lt_amg: + case le_amg: + case gt_amg: + case ge_amg: + case eq_amg: + case ne_amg: + case slt_amg: + case sle_amg: + case sgt_amg: + case sge_amg: + case seq_amg: + case sne_amg: + postpr = 0; break; case to_sv_amg: case to_av_amg: case to_hv_amg: |