Use NOT_REACHED for the impossible case.

[perl5.git] / regexp.h

diff --git a/regexp.h b/regexp.h
index db7ae8b..59d5ee2 100644 (file)
--- a/regexp.h
+++ b/regexp.h
@@ -382,7 +382,7 @@ get_regex_charset_name(const U32 flags, STRLEN* const lenp)
            *lenp = 2;
            return ASCII_MORE_RESTRICT_PAT_MODS;
         default:
-           return "?";     /* Unknown */
+           NOT_REACHED; /* NOTREACHED */
     }
 }