This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fix si_names context debugging names
authorDavid Mitchell <davem@iabyn.com>
Wed, 24 Jun 2015 07:57:41 +0000 (08:57 +0100)
committerDavid Mitchell <davem@iabyn.com>
Wed, 24 Jun 2015 07:57:41 +0000 (08:57 +0100)
I recently added a new context stack type, MULTICALL. The table
si_names[], which contains the stack type names to display with
-Dsv a new label added, "MULTICALL", but the previous label didn't
have a comma after it, so the two labels were actually being concatenated.

Spotted by Coverity

deb.c

diff --git a/deb.c b/deb.c
index 4ae101d..df0d606 100644 (file)
--- a/deb.c
+++ b/deb.c
@@ -191,7 +191,7 @@ static const char * const si_names[] = {
     "DESTROY",
     "WARNHOOK",
     "DIEHOOK",
-    "REQUIRE"
+    "REQUIRE",
     "MULTICALL"
 };
 #endif