/* PR/81900 */
/* { dg-do compile } */
/* { dg-skip-if "" { *-*-* } { "-flto" } { "" } } */
/* { dg-options "-std=gnu17 -fdump-tree-optimized" } */

void Perl_croak() __attribute__((noreturn));
char *Perl_sv_gets();
void __attribute__((returns_twice)) __sigsetjmp ();
void a() {
    __sigsetjmp();
    char *b;
    if ((b = Perl_sv_gets()) == 0)
      Perl_croak("No Perl script found in input\n");
    if (*b == '#')
      __asm__("" : : ""("badbad"));
}

/* Do not elide the test against zero.  */
/* { dg-final { scan-tree-dump " == 0B" "optimized" } } */