Mercurial > hg > CbC > CbC_gcc
view gcc/testsuite/gfortran.dg/pr45636.f90 @ 128:fe568345ddd5
fix CbC-example
author | mir3636 |
---|---|
date | Wed, 11 Apr 2018 19:32:28 +0900 |
parents | 04ced10e8804 |
children | 84e7813d76e9 |
line wrap: on
line source
! PR fortran/45636 ! { dg-do compile } ! { dg-options "-O2 -fdump-tree-forwprop2" } ! PR 45636 - make sure no memset is needed for a short right-hand side. program main character(len=2), parameter :: x='a ' character(len=1), parameter :: y='b' character(len=4) :: a, b a = x b = y call sub(a, b) end program main ! This test will fail on targets which prefer memcpy/memset over ! move_by_pieces/store_by_pieces. ! { dg-final { scan-tree-dump-times "memset" 0 "forwprop2" { xfail { { hppa*-*-* && { ! lp64 } } || { { mips*-*-* && { ! nomips16 } } || { aarch64*-*-* } } } } } }