diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-04-19 15:06:53 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-04-19 15:06:53 +0000 |
commit | 9edc5bb88e22f179a8e93ef946255446e35178fa (patch) | |
tree | def934a48ffd5c11a485825e15b6d04843463aa8 /mro.c | |
parent | f40a71547d2bd6a615ed0adc05312d62f7dffc29 (diff) | |
download | perl-9edc5bb88e22f179a8e93ef946255446e35178fa.tar.gz |
Fix compilation error with threads
p4raw-id: //depot/perl@30984
Diffstat (limited to 'mro.c')
-rw-r--r-- | mro.c | 7 |
1 files changed, 4 insertions, 3 deletions
@@ -864,9 +864,10 @@ XS(XS_mro_is_universal) class_stash = gv_stashsv(classname, 0); if(!class_stash) Perl_croak(aTHX_ "No such class: '%"SVf"'!", SVfARG(classname)); - HvMROMETA(class_stash)->is_universal - ? XSRETURN_YES - : XSRETURN_NO; + if (HvMROMETA(class_stash)->is_universal) + XSRETURN_YES; + else + XSRETURN_NO; } XS(XS_mro_get_global_sub_generation) |