gcc-4_9/gcc/testsuite/gcc.dg/vect/vect.exp

   1 # Copyright (C) 1997-2014 Free Software Foundation, Inc.
   2
   3 # This program is free software; you can redistribute it and/or modify
   4 # it under the terms of the GNU General Public License as published by
   5 # the Free Software Foundation; either version 3 of the License, or
   6 # (at your option) any later version.
   7 #
   8 # This program is distributed in the hope that it will be useful,
   9 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11 # GNU General Public License for more details.
  12 #
  13 # You should have received a copy of the GNU General Public License
  14 # along with GCC; see the file COPYING3.  If not see
  15 # <http://www.gnu.org/licenses/>.
  16
  17 # GCC testsuite that uses the `dg.exp' driver.
  18
  19 # Load support procs.
  20 load_lib gcc-dg.exp
  21 load_lib clearcap.exp
  22
  23 # Set up flags used for tests that don't specify options.
  24 global DEFAULT_VECTCFLAGS
  25 set DEFAULT_VECTCFLAGS ""
  26
  27 # Set up additional flags for tests that require multiple runs.
  28 global MULTI_VECTCFLAGS
  29 set MULTI_VECTCFLAGS ""
  30
  31 # If the target system supports vector instructions, the default action
  32 # for a test is 'run', otherwise it's 'compile'.  Save current default.
  33 # Executing vector instructions on a system without hardware vector support
  34 # is also disabled by a call to check_vect, but disabling execution here is
  35 # more efficient.
  36 global dg-do-what-default
  37 set save-dg-do-what-default ${dg-do-what-default}
  38
  39 # Skip these tests for targets that do not support generating vector
  40 # code.  Set additional target-dependent vector flags, which can be
  41 # overridden by using dg-options in individual tests.
  42 if ![check_vect_support_and_set_flags] {
  43     return
  44 }
  45
  46 proc dg-multi-runtest { testcases flags default-extra-flags } {
  47     global MULTI_VECTCFLAGS
  48     set DEFAULT_VECTCFLAGS ""
  49
  50     if { [llength $MULTI_VECTCFLAGS] > 0 } {
  51         foreach extra_flags $MULTI_VECTCFLAGS {
  52             set new_flags [string trim "$extra_flags $flags"]
  53             dg-runtest $testcases $new_flags ${default-extra-flags}
  54         }
  55     } else {
  56         dg-runtest $testcases $flags ${default-extra-flags}
  57     }
  58 }
  59
  60 # These flags are used for all targets.
  61 lappend DEFAULT_VECTCFLAGS "-ftree-vectorize" "-fno-vect-cost-model" "-fno-common"
  62
  63 # Initialize `dg'.
  64 dg-init
  65 clearcap-init
  66
  67 global VEC_FLAGS
  68 set VEC_FLAGS $DEFAULT_VECTCFLAGS
  69
  70 global O1_VECTCFLAGS
  71 set O1_VECTCFLAGS $DEFAULT_VECTCFLAGS
  72 lappend O1_VECTCFLAGS "-O1"
  73 lappend O1_VECTCFLAGS "-fdump-tree-vect-details"
  74
  75 global O_VECTCFLAGS
  76 set O_VECTCFLAGS $DEFAULT_VECTCFLAGS
  77 lappend O_VECTCFLAGS "-O"
  78 lappend O_VECTCFLAGS "-fdump-tree-vect-details"
  79
  80 lappend DEFAULT_VECTCFLAGS "-O2"
  81
  82 # Tests that should be run without generating dump info
  83 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/nodump-*.\[cS\]]]  \
  84         "" $DEFAULT_VECTCFLAGS
  85
  86 # "-O -fdump-tree-veclower2"
  87 lappend VEC_FLAGS "-O" "-fdump-tree-veclower2"
  88 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/vec-scal-*.\[cS\]]]  \
  89         "" $VEC_FLAGS
  90
  91 set VECT_SLP_CFLAGS $DEFAULT_VECTCFLAGS
  92
  93 lappend DEFAULT_VECTCFLAGS "-fdump-tree-vect-details"
  94 lappend VECT_SLP_CFLAGS "-fdump-tree-slp-details"
  95
  96 # Main loop.
  97 set VECT_ADDITIONAL_FLAGS [list ""]
  98 if { [check_effective_target_lto] } {
  99     lappend VECT_ADDITIONAL_FLAGS "-flto -ffat-lto-objects"
 100 }
 101 foreach flags $VECT_ADDITIONAL_FLAGS {
 102     dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/pr*.\[cS\]]]  \
 103         $flags $DEFAULT_VECTCFLAGS
 104     dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/vect-*.\[cS\]]]  \
 105         $flags $DEFAULT_VECTCFLAGS
 106     dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/slp-*.\[cS\]]]  \
 107         $flags $DEFAULT_VECTCFLAGS
 108     dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/bb-slp*.\[cS\]]]  \
 109         $flags $VECT_SLP_CFLAGS
 110 }
 111
 112
 113 #### Tests with special options
 114 global SAVED_DEFAULT_VECTCFLAGS
 115 set SAVED_DEFAULT_VECTCFLAGS $DEFAULT_VECTCFLAGS
 116 set SAVED_VECT_SLP_CFLAGS $VECT_SLP_CFLAGS
 117
 118 # --param vect-max-version-for-alias-checks=0 tests
 119 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 120 lappend DEFAULT_VECTCFLAGS "--param" "vect-max-version-for-alias-checks=0"
 121 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-vfa-*.\[cS\]]]  \
 122         "" $DEFAULT_VECTCFLAGS
 123
 124 # -ffast-math tests
 125 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 126 lappend DEFAULT_VECTCFLAGS "-ffast-math"
 127 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/fast-math-\[ipsv\]*.\[cS\]]]  \
 128         "" $DEFAULT_VECTCFLAGS
 129
 130 # -ffast-math SLP tests
 131 set VECT_SLP_CFLAGS $SAVED_VECT_SLP_CFLAGS
 132 lappend VECT_SLP_CFLAGS "-ffast-math"
 133 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/fast-math-bb-slp-*.\[cS\]]]  \
 134         "" $VECT_SLP_CFLAGS
 135
 136 # -fno-fast-math tests
 137 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 138 lappend DEFAULT_VECTCFLAGS "-fno-fast-math"
 139 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-fast-math-*.\[cS\]]]  \
 140         "" $DEFAULT_VECTCFLAGS
 141
 142 # -fno-math-errno tests
 143 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 144 lappend DEFAULT_VECTCFLAGS "-fno-math-errno"
 145 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-math-errno-*.\[cS\]]]  \
 146         "" $DEFAULT_VECTCFLAGS
 147
 148 # -fwrapv tests
 149 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 150 lappend DEFAULT_VECTCFLAGS "-fwrapv"
 151 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/wrapv-*.\[cS\]]]  \
 152         "" $DEFAULT_VECTCFLAGS
 153
 154 # -ftrapv tests
 155 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 156 lappend DEFAULT_VECTCFLAGS "-ftrapv"
 157 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/trapv-*.\[cS\]]]  \
 158         "" $DEFAULT_VECTCFLAGS
 159
 160 # -fdump-tree-dceloop-details tests
 161 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 162 lappend DEFAULT_VECTCFLAGS "-fdump-tree-dceloop-details"
 163 dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/dump-tree-dceloop-*.\[cS\]]]  \
 164         "" $DEFAULT_VECTCFLAGS
 165
 166 # -fno-tree-dce tests
 167 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 168 lappend DEFAULT_VECTCFLAGS "-fno-tree-dce"
 169 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-tree-dce-*.\[cS\]]]  \
 170         "" $DEFAULT_VECTCFLAGS
 171
 172 # -fsection-anchors tests
 173 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 174 lappend DEFAULT_VECTCFLAGS "-fsection-anchors"
 175 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/section-anchors-*.\[cS\]]]  \
 176         "" $DEFAULT_VECTCFLAGS
 177
 178 # alignment-sensitive -fsection-anchors tests
 179 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 180 lappend DEFAULT_VECTCFLAGS "-fsection-anchors" \
 181         "-fdump-ipa-increase_alignment-details"
 182 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/aligned-section-anchors-*.\[cS\]]]  \
 183         "" $DEFAULT_VECTCFLAGS
 184
 185 # -fno-section-anchors tests
 186 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 187 lappend DEFAULT_VECTCFLAGS "-fno-section-anchors"
 188 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-section-anchors-*.\[cS\]]]  \
 189         "" $DEFAULT_VECTCFLAGS
 190
 191 # -funswitch-loops tests
 192 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 193 lappend DEFAULT_VECTCFLAGS "-funswitch-loops"
 194 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/unswitch-loops-*.\[cS\]]]  \
 195         "" $DEFAULT_VECTCFLAGS
 196
 197 # -fno-trapping-math tests
 198 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 199 lappend DEFAULT_VECTCFLAGS "-fno-trapping-math"
 200 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-trapping-math-*.\[cS\]]]  \
 201         "" $DEFAULT_VECTCFLAGS
 202
 203 # -fno-tree-scev-cprop
 204 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 205 lappend DEFAULT_VECTCFLAGS "-fno-tree-scev-cprop"
 206 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-scevccp-vect-*.\[cS\]]]  \
 207         "" $DEFAULT_VECTCFLAGS
 208
 209 # -fno-tree-scev-cprop
 210 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 211 lappend DEFAULT_VECTCFLAGS "-fno-tree-scev-cprop"
 212 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-scevccp-pr*.\[cS\]]]  \
 213         "" $DEFAULT_VECTCFLAGS
 214
 215 # -fno-tree-scev-cprop
 216 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 217 lappend DEFAULT_VECTCFLAGS "-fno-tree-scev-cprop"
 218 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-scevccp-outer-*.\[cS\]]]  \
 219         "" $DEFAULT_VECTCFLAGS
 220
 221 # -fno-tree-scev-cprop -fno-tree-reassoc
 222 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 223 lappend DEFAULT_VECTCFLAGS "-fno-tree-scev-cprop" "-fno-tree-reassoc"
 224 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-scevccp-noreassoc-*.\[cS\]]]  \
 225         "" $DEFAULT_VECTCFLAGS
 226
 227 # -fno-tree-scev-cprop
 228 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 229 lappend DEFAULT_VECTCFLAGS "-fno-tree-scev-cprop"
 230 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-scevccp-slp-*.\[cS\]]]  \
 231         "" $DEFAULT_VECTCFLAGS
 232
 233 # -fno-tree-dominator-opts
 234 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 235 lappend DEFAULT_VECTCFLAGS "-fno-tree-dominator-opts"
 236 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-tree-dom-*.\[cS\]]]  \
 237         "" $DEFAULT_VECTCFLAGS
 238
 239 # -fno-tree-pre
 240 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 241 lappend DEFAULT_VECTCFLAGS "-fno-tree-pre"
 242 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-tree-pre-*.\[cS\]]]  \
 243         "" $DEFAULT_VECTCFLAGS
 244
 245 # With -Os
 246 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 247 lappend DEFAULT_VECTCFLAGS "-Os"
 248 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/Os-vect-*.\[cS\]]]  \
 249         "" $DEFAULT_VECTCFLAGS
 250
 251 # With --param ggc-min-expand=0 --param ggc-min-heapsize=0
 252 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 253 lappend DEFAULT_VECTCFLAGS "--param" "ggc-min-expand=0" "--param" "ggc-min-heapsize=0"
 254 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/ggc-*.\[cS\]]]  \
 255         "" $DEFAULT_VECTCFLAGS
 256
 257 # -ftree-loop-if-convert-stores
 258 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 259 lappend DEFAULT_VECTCFLAGS "-ftree-loop-if-convert-stores"
 260 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/if-cvt-stores-vect-*.\[cS\]]]  \
 261         "" $DEFAULT_VECTCFLAGS
 262
 263 # With -O3.
 264 # Don't allow IPA cloning, because it throws our counts out of whack.
 265 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 266 lappend DEFAULT_VECTCFLAGS "-O3" "-fno-ipa-cp-clone"
 267 if  [istarget "spu-*-*"] {
 268   lappend DEFAULT_VECTCFLAGS "-funroll-loops"
 269 }
 270 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/O3-*.\[cS\]]]  \
 271         "" $DEFAULT_VECTCFLAGS
 272
 273 # With -O1
 274 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/O1-*.\[cS\]]]  \
 275         "" $O1_VECTCFLAGS
 276
 277 # With -O
 278 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/O-*.\[cS\]]]  \
 279         "" $O_VECTCFLAGS
 280
 281 # -fno-tree-reassoc
 282 set VECT_SLP_CFLAGS $SAVED_VECT_SLP_CFLAGS
 283 lappend VECT_SLP_CFLAGS "-fno-tree-reassoc"
 284 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-tree-reassoc-bb-slp-*.\[cS\]]]  \
 285         "" $VECT_SLP_CFLAGS
 286
 287 # -fno-tree-fre
 288 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 289 lappend DEFAULT_VECTCFLAGS "-fno-tree-fre"
 290 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-tree-fre-*.\[cS\]]]  \
 291         "" $DEFAULT_VECTCFLAGS
 292
 293 # -fno-tree-fre -fno-tree-pre
 294 set DEFAULT_VECTCFLAGS $SAVED_DEFAULT_VECTCFLAGS
 295 lappend DEFAULT_VECTCFLAGS "-fno-tree-fre" "-fno-tree-pre"
 296 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-fre-pre*.\[cS\]]]  \
 297         "" $DEFAULT_VECTCFLAGS
 298
 299 # -fno-tree-sra
 300 set VECT_SLP_CFLAGS $SAVED_VECT_SLP_CFLAGS
 301 lappend VECT_SLP_CFLAGS "-fno-tree-sra"
 302 dg-multi-runtest [lsort [glob -nocomplain $srcdir/$subdir/no-tree-sra-bb-slp-*.\[cS\]]]  \
 303         "" $VECT_SLP_CFLAGS
 304
 305
 306 # Clean up.
 307 set dg-do-what-default ${save-dg-do-what-default}
 308
 309 # All done.
 310 clearcap-finish
 311 dg-finish