summaryrefslogtreecommitdiff
path: root/gv.c
diff options
context:
space:
mode:
authorIlya Zakharevich <ilya@math.berkeley.edu>1998-10-29 17:04:54 -0500
committerGurusamy Sarathy <gsar@cpan.org>1998-10-30 20:08:57 +0000
commitf5284f61fe8b13877bd529c3798fd763ed884651 (patch)
tree8bfc68967a6c489fadc50e542317f03fffaa21f7 /gv.c
parent893af57aeb05cb9ca3ec13a262068d56558e4325 (diff)
downloadperl-f5284f61fe8b13877bd529c3798fd763ed884651.tar.gz
Overloaded <> and deref again
Message-Id: <199810300304.WAA23291@monk.mps.ohio-state.edu> p4raw-id: //depot/perl@2150
Diffstat (limited to 'gv.c')
-rw-r--r--gv.c9
1 files changed, 9 insertions, 0 deletions
diff --git a/gv.c b/gv.c
index 1d24fa45e3..f4f0044c7f 100644
--- a/gv.c
+++ b/gv.c
@@ -1269,6 +1269,15 @@ amagic_call(SV *left, SV *right, int method, int flags)
lr = 1;
}
break;
+ case iter_amg: /* XXXX Eventually should do to_gv. */
+ case to_sv_amg:
+ case to_av_amg:
+ case to_hv_amg:
+ case to_gv_amg:
+ case to_cv_amg:
+ /* FAIL safe */
+ return NULL; /* Delegate operation to standard mechanisms. */
+ break;
default:
goto not_found;
}