summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2012-06-13 08:45:16 -0700
committerFather Chrysostomos <sprout@cpan.org>2012-06-15 12:28:15 -0700
commit118e2215c7570362a701ac5fda6148b6d3542eae (patch)
tree248694801974be0578e4ccc9e8d90fd7db5d4b32 /perl.h
parent0d856a3ae8873b88b1fb47a0d9520f3db9e27b85 (diff)
downloadperl-118e2215c7570362a701ac5fda6148b6d3542eae.tar.gz
Use assertions for /* NOT REACHED */
to make sure it really is never reached.
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl.h b/perl.h
index 9fc2700457..2fec311d2e 100644
--- a/perl.h
+++ b/perl.h
@@ -3281,9 +3281,9 @@ typedef pthread_key_t perl_key;
appropriate to call return. In either case, include the lint directive.
*/
#ifdef HASATTRIBUTE_NORETURN
-# define NORETURN_FUNCTION_END /* NOTREACHED */
+# define NORETURN_FUNCTION_END assert(0); /* NOTREACHED */
#else
-# define NORETURN_FUNCTION_END /* NOTREACHED */ return 0
+# define NORETURN_FUNCTION_END assert(0); /* NOTREACHED */ return 0
#endif
/* Some OS warn on NULL format to printf */