This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regexp.h: work around -Werror compile failure of XS in linux perf tool
authorJim Cromie <jim.cromie@gmail.com>
Wed, 1 Jun 2011 04:15:11 +0000 (22:15 -0600)
committerKarl Williamson <public@khwilliamson.com>
Thu, 2 Jun 2011 21:31:58 +0000 (15:31 -0600)
commit0984e55ea51a3030ba112fb0dd331061c5b0acf5
tree2bf02ae255f644b54f7a943e4279151705cdad29
parentba05d9aa44289620c9265dde65c83402e0ebfd00
regexp.h: work around -Werror compile failure of XS in linux perf tool

The linux perf tool has an XS component, but when built using system
perl 5.14.0, its compilation errors out on the switch statement in
regexp.h: get_regex_charset_name(), which lacks a default case.  Add
one, copying the end-of-function return "?".

Preserve the end-of-function return "?", to avoid a hypothetical
compiler bug which misses the default case, and infers a void return
for a function thats declared otherwize.

Signed-off-by: Jim Cromie <jim.cromie@gmail.com>
regexp.h