diff options
author | Lukas Mai <l.mai@web.de> | 2014-11-29 12:37:50 +0100 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2014-11-29 06:05:16 -0800 |
commit | e59642234eb8b658c16fed728636bfbbc49c4514 (patch) | |
tree | 3387394bff0e7e2f7ac09564be7493e6a71619d2 /perl.c | |
parent | b7bea5dafa8e0cb5ca70b7525fbd6b51eb723815 (diff) | |
download | perl-e59642234eb8b658c16fed728636bfbbc49c4514.tar.gz |
make more use of NOT_REACHED
In particular, remove all instances of 'assert(0);'.
Diffstat (limited to 'perl.c')
-rw-r--r-- | perl.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -2420,7 +2420,7 @@ S_run_body(pTHX_ I32 oldscope) CALLRUNOPS(aTHX); } my_exit(0); - assert(0); /* NOTREACHED */ + NOT_REACHED; /* NOTREACHED */ } /* @@ -2741,7 +2741,7 @@ Perl_call_sv(pTHX_ SV *sv, VOL I32 flags) FREETMPS; JMPENV_POP; my_exit_jump(); - assert(0); /* NOTREACHED */ + NOT_REACHED; /* NOTREACHED */ case 3: if (PL_restartop) { PL_restartjmpenv = NULL; @@ -2850,7 +2850,7 @@ Perl_eval_sv(pTHX_ SV *sv, I32 flags) FREETMPS; JMPENV_POP; my_exit_jump(); - assert(0); /* NOTREACHED */ + NOT_REACHED; /* NOTREACHED */ case 3: if (PL_restartop) { PL_restartjmpenv = NULL; @@ -4871,7 +4871,7 @@ Perl_call_list(pTHX_ I32 oldscope, AV *paramList) CopLINE_set(PL_curcop, oldline); JMPENV_POP; my_exit_jump(); - assert(0); /* NOTREACHED */ + NOT_REACHED; /* NOTREACHED */ case 3: if (PL_restartop) { PL_curcop = &PL_compiling; |