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 (); a()9void 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" } } */ 20