summaryrefslogtreecommitdiff
path: root/utf8.c
diff options
context:
space:
mode:
authorSteve Hay <SteveHay@planit.com>2006-07-27 16:25:41 +0000
committerSteve Hay <SteveHay@planit.com>2006-07-27 16:25:41 +0000
commit670f1322a800dc03404a696600a617f3804f797d (patch)
tree15060422f99dfd83326aa2cb90f977ec549063e9 /utf8.c
parentce647182f445381be8b7e59ae7dcb564635409c6 (diff)
downloadperl-670f1322a800dc03404a696600a617f3804f797d.tar.gz
Clear up most of the VC6 compiler warnings in the following smoke:
http://www.nntp.perl.org/group/perl.daily-build.reports/39733 p4raw-id: //depot/perl@28626
Diffstat (limited to 'utf8.c')
-rw-r--r--utf8.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/utf8.c b/utf8.c
index 3b2297a993..28ac605295 100644
--- a/utf8.c
+++ b/utf8.c
@@ -1741,6 +1741,7 @@ Perl_swash_fetch(pTHX_ SV *swash, const U8 *ptr, bool do_utf8)
return (tmps[off] << 24) + (tmps[off+1] << 16) + (tmps[off+2] << 8) + tmps[off + 3] ;
}
Perl_croak(aTHX_ "panic: swash_fetch got swatch of unexpected bit width");
+ NORETURN_FUNCTION_END;
}
/* Note: