diff options
author | Bernhard Reutner-Fischer <aldot@gcc.gnu.org> | 2023-05-31 20:41:57 +0200 |
---|---|---|
committer | Bernhard Reutner-Fischer <aldot@gcc.gnu.org> | 2023-05-31 20:43:47 +0200 |
commit | 994195b597ff20a39da9a815ce0722d8f808f4a0 (patch) | |
tree | 6a0c50b03db9baf4b2367341afa7fe2fbba779f8 /gcc/testsuite/lib | |
parent | d0c064c3eabc75cf83df296ebcd1db19b4a68851 (diff) | |
download | gcc-994195b597ff20a39da9a815ce0722d8f808f4a0.zip gcc-994195b597ff20a39da9a815ce0722d8f808f4a0.tar.gz gcc-994195b597ff20a39da9a815ce0722d8f808f4a0.tar.bz2 |
testsuite: rename force_conventional_output
The procedure force_conventional_output_for is a bit misnomed, what it
primarily does is to set the required options for the corresponding
test. So rename the proc to set_required_options_for and also rename the
participating variable accordingly.
gcc/testsuite/ChangeLog:
* lib/gcc-dg.exp: Rename gcc_force_conventional_output to
gcc_set_required_options.
* lib/target-supports.exp: Rename force_conventional_output_for
to set_required_options_for.
* lib/scanasm.exp: Adjust callers.
* lib/scanrtl.exp: Same.
Diffstat (limited to 'gcc/testsuite/lib')
-rw-r--r-- | gcc/testsuite/lib/gcc-dg.exp | 6 | ||||
-rw-r--r-- | gcc/testsuite/lib/scanasm.exp | 6 | ||||
-rw-r--r-- | gcc/testsuite/lib/scanrtl.exp | 10 | ||||
-rw-r--r-- | gcc/testsuite/lib/target-supports.exp | 8 |
4 files changed, 15 insertions, 15 deletions
diff --git a/gcc/testsuite/lib/gcc-dg.exp b/gcc/testsuite/lib/gcc-dg.exp index 4ed4233..01c8c02 100644 --- a/gcc/testsuite/lib/gcc-dg.exp +++ b/gcc/testsuite/lib/gcc-dg.exp @@ -70,8 +70,8 @@ if { $orig_environment_saved == 0 } { # Some torture-options cause intermediate code output, unusable for # testing using e.g. scan-assembler. In this variable are the options # how to force it, when needed. -global gcc_force_conventional_output -set gcc_force_conventional_output "" +global gcc_set_required_options +set gcc_set_required_options "" if [info exists TORTURE_OPTIONS] { set DG_TORTURE_OPTIONS $TORTURE_OPTIONS @@ -92,7 +92,7 @@ if [info exists TORTURE_OPTIONS] { { -Os } ] if [check_effective_target_lto] { - set gcc_force_conventional_output "-ffat-lto-objects" + set gcc_set_required_options "-ffat-lto-objects" } } diff --git a/gcc/testsuite/lib/scanasm.exp b/gcc/testsuite/lib/scanasm.exp index be2b83a..0685de1 100644 --- a/gcc/testsuite/lib/scanasm.exp +++ b/gcc/testsuite/lib/scanasm.exp @@ -106,7 +106,7 @@ proc scan-assembler { args } { dg-scan "scan-assembler" 1 $testcase $output_file $args } -force_conventional_output_for scan-assembler +set_required_options_for scan-assembler # Check that a pattern is not present in the .s file produced by the # compiler. See dg-scan for details. @@ -120,7 +120,7 @@ proc scan-assembler-not { args } { dg-scan "scan-assembler-not" 0 $testcase $output_file $args } -force_conventional_output_for scan-assembler-not +set_required_options_for scan-assembler-not # Return the scan for the assembly for hidden visibility. @@ -497,7 +497,7 @@ proc scan-assembler-times { args } { } } -force_conventional_output_for scan-assembler-times +set_required_options_for scan-assembler-times # Utility for scanning demangled compiler result, invoked via dg-final. # Call pass if pattern is present, otherwise fail. diff --git a/gcc/testsuite/lib/scanrtl.exp b/gcc/testsuite/lib/scanrtl.exp index 3a20ee4..b8fab3d 100644 --- a/gcc/testsuite/lib/scanrtl.exp +++ b/gcc/testsuite/lib/scanrtl.exp @@ -44,7 +44,7 @@ proc scan-rtl-dump { args } { } } -force_conventional_output_for scan-rtl-dump +set_required_options_for scan-rtl-dump # Call pass if pattern is present given number of times, otherwise fail. # Argument 0 is the regexp to match @@ -71,7 +71,7 @@ proc scan-rtl-dump-times { args } { } } -force_conventional_output_for scan-rtl-dump-times +set_required_options_for scan-rtl-dump-times # Call pass if pattern is not present, otherwise fail. # @@ -98,7 +98,7 @@ proc scan-rtl-dump-not { args } { } } -force_conventional_output_for scan-rtl-dump-not +set_required_options_for scan-rtl-dump-not # Utility for scanning demangled compiler result, invoked via dg-final. # Call pass if pattern is present, otherwise fail. @@ -126,7 +126,7 @@ proc scan-rtl-dump-dem { args } { } } -force_conventional_output_for scan-rtl-dump-dem +set_required_options_for scan-rtl-dump-dem # Call pass if demangled pattern is not present, otherwise fail. # @@ -153,4 +153,4 @@ proc scan-rtl-dump-dem-not { args } { } } -force_conventional_output_for scan-rtl-dump-dem-not +set_required_options_for scan-rtl-dump-dem-not diff --git a/gcc/testsuite/lib/target-supports.exp b/gcc/testsuite/lib/target-supports.exp index 263ef35..431a56f 100644 --- a/gcc/testsuite/lib/target-supports.exp +++ b/gcc/testsuite/lib/target-supports.exp @@ -11262,20 +11262,20 @@ proc check_effective_target_branch_cost {} { # Record that dg-final test TEST requires convential compilation. -proc force_conventional_output_for { test } { +proc set_required_options_for { test } { if { [info proc $test] == "" } { perror "$test does not exist" exit 1 } proc ${test}_required_options {} { - global gcc_force_conventional_output + global gcc_set_required_options upvar 1 extra_tool_flags extra_tool_flags if {[regexp -- "^scan-assembler" [info level 0]] && ![string match "*-fident*" $extra_tool_flags]} { # Do not let .ident confuse assembler scan tests - return [list $gcc_force_conventional_output "-fno-ident"] + return [list $gcc_set_required_options "-fno-ident"] } - return $gcc_force_conventional_output + return $gcc_set_required_options } } |