1 files changed, 1 insertions, 3 deletions
diff --git a/deb.c b/deb.c
index 58411d1ded..1d3de4c5ef 100644
--- a/deb.c
+++ b/deb.c
@@ -204,9 +204,7 @@ Perl_deb_stack_all(pTHX)
     for (;;)
     {
         const size_t si_name_ix = si->si_type+1; /* -1 is a valid index */
-        const char * const si_name =
-	    (const char *)
-	    ((si_name_ix >= sizeof(si_names)) ? "????" : si_names[si_name_ix]);
+        const char * const si_name = (si_name_ix >= sizeof(si_names)) ? "????" : si_names[si_name_ix];
 	I32 ix;
 	PerlIO_printf(Perl_debug_log, "STACK %"IVdf": %s\n",
 						(IV)si_ix, si_name);