perl-invalid-void-use.patch

   1 --- perl-5.18.0/sv.h~   2013-05-10 04:30:48.000000000 +0200
   2 +++ perl-5.18.0/sv.h    2013-06-09 21:11:34.889499879 +0200
   3 @@ -330,7 +330,7 @@
   4  /* this is defined in this peculiar way to avoid compiler warnings.
   5   * See the <20121213131428.GD1842@iabyn.com> thread in p5p */
   6  #define SvUPGRADE(sv, mt) \
   7 -    ((void)(SvTYPE(sv) >= (mt) || (sv_upgrade(sv, mt),1)))
   8 +    (SvTYPE(sv) >= (mt) || (sv_upgrade(sv, mt),1))
   9
  10  #define SVf_IOK                0x00000100  /* has valid public integer value */
  11  #define SVf_NOK                0x00000200  /* has valid public numeric value */