Change 34350 by [EMAIL PROTECTED] on 2008/09/11 21:27:07
Use 1 line of code in place of 6 in Perl_sv_derived_from().
Affected files ...
... //depot/perl/universal.c#196 edit
Differences ...
==== //depot/perl/universal.c#196 (text) ====
Index: perl/universal.c
--- perl/universal.c#195~34349~ 2008-09-11 14:12:51.000000000 -0700
+++ perl/universal.c 2008-09-11 14:27:07.000000000 -0700
@@ -116,12 +116,7 @@
stash = gv_stashsv(sv, 0);
}
- if (stash) {
- return isa_lookup(stash, name);
- }
- else
- return FALSE;
-
+ return stash ? isa_lookup(stash, name) : FALSE;
}
/*
End of Patch.