Re: assert.h breaks perl.h
Alexey Tourbin [Thu, 16 Oct 2003 22:24:35 +0000 (02:24 +0400)]
Message-Id: <20031016182434.GH1724@julia.office.altlinux.ru>

p4raw-id: //depot/perl@21468

sv.h

diff --git a/sv.h b/sv.h
index 38fdb12..5d2fab2 100644 (file)
--- a/sv.h
+++ b/sv.h
@@ -529,7 +529,7 @@ Set the length of the string which is in the SV.  See C<SvCUR>.
                                                  SVp_IOK|SVp_NOK|SVf_IVisUV))
 
 #if defined(__GNUC__) && !defined(PERL_GCC_BRACE_GROUPS_FORBIDDEN)
-#define assert_not_ROK(sv)     ({assert(!SvROK(sv) || !SvRV(sv))}),
+#define assert_not_ROK(sv)     ({assert(!SvROK(sv) || !SvRV(sv));}),
 #else
 #define assert_not_ROK(sv)     
 #endif