diff options
author | Father Chrysostomos <sprout@cpan.org> | 2011-12-27 00:46:10 -0800 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-12-27 00:49:41 -0800 |
commit | de6f7947b44879bbebfed2608d00b04515a09859 (patch) | |
tree | 8c6c1fe17fd4dbfde78aa7aeb35c833c830c79e2 /gv.c | |
parent | ca53083acb4ada65258b6b39379f6ebe3e340289 (diff) | |
download | perl-de6f7947b44879bbebfed2608d00b04515a09859.tar.gz |
Move diag_listed_as entry in gv.c
It wasn’t close enough for diag.t to see it.
Diffstat (limited to 'gv.c')
-rw-r--r-- | gv.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -62,12 +62,12 @@ Perl_gv_add_by_type(pTHX_ GV *gv, svtype type) */ what = OP_IS_DIRHOP(PL_op->op_type) ? "dirhandle" : "filehandle"; - /* diag_listed_as: Bad symbol for filehandle */ } else if (type == SVt_PVHV) { what = "hash"; } else { what = type == SVt_PVAV ? "array" : "scalar"; } + /* diag_listed_as: Bad symbol for filehandle */ Perl_croak(aTHX_ "Bad symbol for %s", what); } |