]> git.vpit.fr Git - perl/modules/Scope-Upper.git/commitdiff
Get rid of a warning produced by -Wparentheses.
authorFlorian Ragwitz <rafl@debian.org>
Wed, 4 Feb 2009 22:09:26 +0000 (23:09 +0100)
committerFlorian Ragwitz <rafl@debian.org>
Wed, 4 Feb 2009 22:09:26 +0000 (23:09 +0100)
Upper.xs

index 367658cdb7a8321fc2be70f85e9424f557cbecd4..c93f44d6c78b070cd0eb0c9b0cb3c508ede1a2f3 100644 (file)
--- a/Upper.xs
+++ b/Upper.xs
@@ -295,11 +295,12 @@ STATIC void su_call(pTHX_ void *ud_) {
   * when the new sub scope will be created in call_sv. */
 
 #if SU_HAS_PERL(5, 10, 0)
- if (dieing)
+ if (dieing) {
   if (cxstack_ix < cxstack_max)
    ++cxstack_ix;
   else
    cxstack_ix = Perl_cxinc(aTHX);
+ }
 #endif
 
  call_sv(ud->cb, G_VOID);