diff options
-rw-r--r-- | gcc/testsuite/ChangeLog | 6 | ||||
-rw-r--r-- | gcc/testsuite/gcc.misc-tests/help.exp | 80 | ||||
-rw-r--r-- | gcc/testsuite/lib/options.exp | 69 |
3 files changed, 155 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 7ecdfd2..96bfba4 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2009-04-09 Ralf Wildenhues <Ralf.Wildenhues@gmx.de> + Rafael Avila de Espindola <espindola@google.com> + + * gcc.misc-tests/help.exp: New file. + * lib/options.exp: New file. + 2009-04-09 Janis Johnson <janis187@us.ibm.com> PR libobjc/36610 diff --git a/gcc/testsuite/gcc.misc-tests/help.exp b/gcc/testsuite/gcc.misc-tests/help.exp new file mode 100644 index 0000000..6c38c8f --- /dev/null +++ b/gcc/testsuite/gcc.misc-tests/help.exp @@ -0,0 +1,80 @@ +# Copyright (C) 2005, 2007, 2009 Free Software Foundation, Inc. + +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with GCC; see the file COPYING3. If not see +# <http://www.gnu.org/licenses/>. + +# This file contains a set of test that check that gcc options are +# documented in --help, and that the various --help* options work. + +load_lib options.exp + +# Document --version. Ideally, there should be no undocumented switches +# in --help. +check_for_options c "--help" "--version" "This switch lacks documentation" "" + +# Output from different subprocesses should not be intermingled +# (we check for some patterns that could be seen with a missing +# fflush in gcc.c). +check_for_options c "-v --help" "" { +[^\n]The following options +-Wconversion[^\n]*lacks documentation +" -g " +} "" + +# There are still undocumented switches in -v --help. +check_for_options c "-v --help" "" "This switch lacks documentation" "xfail" + +# Check whether multiline conversion in optc-gen is broken. +check_for_options c "-v --help" "" {are likely to\n -std} "" + +# Try various --help= classes and qualifiers. +check_for_options c "--help=optimizers" "-O" " -g " "" +check_for_options c "--help=params" "maximum number of" "-Wunsafe-loop-optimizations" "" +check_for_options c "--help=C" "-ansi" "-gnatO" "" +check_for_options c {--help=C++} {-std=c\+\+} "-gnatO" "" +check_for_options c "--help=common" "-dumpbase" "-gnatO" "" +check_for_options c "--help=undocumented" "This switch lacks documentation" "" "" + +# Undocumented flags are not yet consistently marked as such. +check_for_options c "--help=^undocumented" "-Wall" "This switch lacks documentation" "xfail" + +# Try some --help=* examples from the manual. +check_for_options c "--help=target,undocumented" "" "" "" +check_for_options c "--help=target,optimizers" "" "" "" +check_for_options c "--help=warnings,^joined,^undocumented" "" "" "" +check_for_options c "-Q -O2 --help=optimizers" { +-O +-ftree-vectorize[^\n]*disabled +} " -g " "" +check_for_options c "-Q -O3 --help=optimizers" { +-O +-ftree-vectorize[^\n]*enabled +} " -g " "" +# Try repeated --help=. +check_for_options c "--help=params --help=optimizers" { +maximum number of +-O +} "" "" + +# Ensure PR 37805 is fixed. +check_for_options c "--help=joined" "Wformat=" "-fstrict-prototype" "" +check_for_options c "--help=separate" "-MF" "-fstrict-prototype" "" +check_for_options c "--help=warnings,joined" "Wformat=" "Wtrigraphs" "" +check_for_options c "--help=warnings,^joined" "Wtrigraphs" "Wformat=" "" +check_for_options c "--help=joined,separate" "-I" "" "" +check_for_options c "--help=^joined,separate" "--param " "" "" +check_for_options c "--help=joined,^separate" "--help=" "" "" +check_for_options c "--help=joined,undocumented" "" "" "" +# Listing only excludes gives empty results. +check_for_options c "--help=^joined,^separate" "" "" "" diff --git a/gcc/testsuite/lib/options.exp b/gcc/testsuite/lib/options.exp new file mode 100644 index 0000000..c63fd66 --- /dev/null +++ b/gcc/testsuite/lib/options.exp @@ -0,0 +1,69 @@ +# Copyright (C) 2009 Free Software Foundation, Inc. + +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with GCC; see the file COPYING3. If not see +# <http://www.gnu.org/licenses/>. + +# We set LC_ALL and LANG to C so that we get the same error messages as expected. +setenv LC_ALL C +setenv LANG C + +# Run the LANGUAGE compiler with GCC_OPTIONS and inspect the compiler +# output to make sure that they match the newline-separated patterns +# in COMPILER_PATTERNS but not the patterns in COMPILER_NON_PATTERNS. +# In case of failure, xfail if XFAIL is nonempty. + +proc check_for_options {language gcc_options compiler_patterns compiler_non_patterns expected_failure} { + set filename test-[pid] + set fd [open $filename.c w] + puts $fd "int main (void) { return 0; }" + close $fd + remote_download host $filename.c + + set test "compiler driver $gcc_options option(s):" + set gcc_options "\{additional_flags=$gcc_options\}" + + switch "$language" { + "c" { set compiler cc1 } + default { error "unknown language" } + } + set gcc_output [gcc_target_compile $filename.c $filename.x executable $gcc_options] + remote_file build delete $filename.c $filename.x $filename.gcno + + foreach pattern [split $compiler_patterns "\n"] { + if {$pattern ne ""} { + if {[regexp -- "$pattern" $gcc_output]} { + pass "$test $pattern" + } else { + if {$expected_failure ne ""} { + xfail "$test $pattern" + } else { + fail "$test $pattern" + } + } + } + } + foreach pattern [split $compiler_non_patterns "\n"] { + if {$pattern ne ""} { + if {![regexp -- "$pattern" $gcc_output]} { + pass "$test $pattern" + } else { + if {$expected_failure ne ""} { + xfail "$test $pattern" + } else { + fail "$test $pattern" + } + } + } + } +} |