This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove generated test files from CPANPLUS
[perl5.git] / malloc.c
index 988c905..ce406d2 100644 (file)
--- a/malloc.c
+++ b/malloc.c
@@ -1291,7 +1291,8 @@ write2(char *mess)
 
 #ifdef DEBUGGING
 #undef ASSERT
-#define        ASSERT(p,diag)   if (!(p)) botch(diag,STRINGIFY(p),__FILE__,__LINE__);  else
+#define        ASSERT(p,diag)   if (!(p)) botch(diag,STRINGIFY(p),__FILE__,__LINE__);
+
 static void
 botch(char *diag, char *s, char *file, int line)
 {