Change 34351 by [EMAIL PROTECTED] on 2008/09/11 21:27:43
The stash argument to S_isa_lookup() actually never is NULL.
Affected files ...
... //depot/perl/embed.fnc#617 edit
... //depot/perl/proto.h#951 edit
Differences ...
==== //depot/perl/embed.fnc#617 (text) ====
Index: perl/embed.fnc
--- perl/embed.fnc#616~34349~ 2008-09-11 14:12:51.000000000 -0700
+++ perl/embed.fnc 2008-09-11 14:27:43.000000000 -0700
@@ -1660,7 +1660,7 @@
#endif
#if defined(PERL_IN_UNIVERSAL_C) || defined(PERL_DECL_PROT)
-s |bool|isa_lookup |NULLOK HV *stash|NN const char * const name
+s |bool|isa_lookup |NN HV *stash|NN const char * const name
#endif
#if defined(PERL_IN_LOCALE_C) || defined(PERL_DECL_PROT)
==== //depot/perl/proto.h#951 (text+w) ====
Index: perl/proto.h
--- perl/proto.h#950~34349~ 2008-09-11 14:12:51.000000000 -0700
+++ perl/proto.h 2008-09-11 14:27:43.000000000 -0700
@@ -5852,9 +5852,10 @@
#if defined(PERL_IN_UNIVERSAL_C) || defined(PERL_DECL_PROT)
STATIC bool S_isa_lookup(pTHX_ HV *stash, const char * const name)
+ __attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_2);
#define PERL_ARGS_ASSERT_ISA_LOOKUP \
- assert(name)
+ assert(stash); assert(name)
#endif
End of Patch.
