1  /* PR/81900 */
       2  /* { dg-do compile } */
       3  /* { dg-skip-if "" { *-*-* } { "-flto" } { "" } } */
       4  /* { dg-options "-fdump-tree-optimized" } */
       5  
       6  void Perl_croak() __attribute__((noreturn));
       7  char *Perl_sv_gets();
       8  void __attribute__((returns_twice)) __sigsetjmp ();
       9  void a() {
      10      __sigsetjmp();
      11      char *b;
      12      if ((b = Perl_sv_gets()) == 0)
      13        Perl_croak("No Perl script found in input\n");
      14      if (*b == '#')
      15        __asm__("" : : ""("badbad"));
      16  }
      17  
      18  /* Do not elide the test against zero.  */
      19  /* { dg-final { scan-tree-dump " == 0B" "optimized" } } */