gas/testsuite/gas/pe/pe.exp

   1 # Expect control script for GAS testsuite PE object-format-specific tests.
   2
   3 # Copyright (C) 2009-2023 Free Software Foundation, Inc.
   4
   5 # This program is free software; you can redistribute it and/or modify
   6 # it under the terms of the GNU General Public License as published by
   7 # the Free Software Foundation; either version 3 of the License, or
   8 # (at your option) any later version.
   9 #
  10 # This program is distributed in the hope that it will be useful,
  11 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 # GNU General Public License for more details.
  14 #
  15 # You should have received a copy of the GNU General Public License
  16 # along with this program; if not, write to the Free Software
  17 # Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.
  18
  19 # Please email any bugs, comments, and/or additions to this file to:
  20 # binutils@gnu.org
  21
  22 load_lib gas-dg.exp
  23 load_lib gas-defs.exp
  24
  25 # These tests can only be run on PE/COFF platforms.
  26 if {![is_pecoff_format]} {
  27     return
  28 }
  29
  30 run_dump_test "aligncomm-a"
  31 run_dump_test "aligncomm-b"
  32 run_dump_test "aligncomm-c"
  33 run_dump_test "aligncomm-d"
  34
  35 run_dump_test "section-align-1"
  36 run_dump_test "section-align-3"
  37 run_dump_test "section-exclude"
  38
  39 run_dump_test "set"
  40
  41 # SEH related tests
  42
  43 # These tests are only for x86_64 targets
  44 if ([istarget "x86_64-*-mingw*"]) then {
  45         run_list_test "seh-x64-err-1" ""
  46         run_list_test "seh-x64-err-2" ""
  47         run_dump_test "peseh-x64"
  48         run_dump_test "peseh-x64-2"
  49         run_dump_test "peseh-x64-3"
  50         run_dump_test "peseh-x64-4"
  51         run_dump_test "peseh-x64-5"
  52         run_dump_test "peseh-x64-6"
  53 }
  54
  55
  56 # This test is only for AArch64
  57 if ([istarget "aarch64-*-pe*"]) {
  58         run_dump_test "pe-aarch64"
  59 }
  60
  61 # Big obj
  62
  63
  64 if ([istarget "*-*-mingw*"]) then {
  65         run_dump_test "big-obj"
  66 }