Mercurial > hg > CbC > CbC_gcc
view gcc/testsuite/gcc.dg/torture/pr81900.c @ 131:84e7813d76e9
gcc-8.2
author | mir3636 |
---|---|
date | Thu, 25 Oct 2018 07:37:49 +0900 |
parents | 04ced10e8804 |
children |
line wrap: on
line source
/* PR/81900 */ /* { dg-do compile } */ /* { dg-skip-if "" { *-*-* } { "-flto" } { "" } } */ /* { dg-options "-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" } } */