Searched refs:badtype (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dop.c5046 char *badtype = Nullch; local
5051 badtype = "a SCALAR";
5055 badtype = "an ARRAY";
5067 badtype = "a HASH";
5072 badtype = "a CODE";
5075 if (badtype)
5076 Perl_croak(aTHX_ "Constant is not %s reference", badtype);

Completed in 35 milliseconds