Update to B::Debug 1.11, by Reini Urban

[p5sagit/p5-mst-13.2.git] / perl.h

diff --git a/perl.h b/perl.h
index aa3df96..7e66b56 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -6008,7 +6008,7 @@ extern void moncontrol(int);
 
 #endif /* Include guard */
 
-#define clear_errsv() STMT_START { sv_setpvn(ERRSV,"",0); if (SvMAGICAL(ERRSV)) { mg_free(ERRSV); } SvPOK_only(ERRSV); } STMT_END
+#define CLEAR_ERRSV() STMT_START { sv_setpvn(ERRSV,"",0); if (SvMAGICAL(ERRSV)) { mg_free(ERRSV); } SvPOK_only(ERRSV); } STMT_END
 
 /*
  * Local variables: