/[dejagnu]/dejagnu/lib/target.exp
ViewVC logotype

Diff of /dejagnu/lib/target.exp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.11 by bje, Thu Aug 7 03:42:43 2003 UTC revision 1.12 by bje, Sat Aug 16 13:08:57 2003 UTC
# Line 4  Line 4 
4  # it under the terms of the GNU General Public License as published by  # it under the terms of the GNU General Public License as published by
5  # the Free Software Foundation; either version 2 of the License, or  # the Free Software Foundation; either version 2 of the License, or
6  # (at your option) any later version.  # (at your option) any later version.
7  #  #
8  # This program is distributed in the hope that it will be useful,  # This program is distributed in the hope that it will be useful,
9  # but WITHOUT ANY WARRANTY; without even the implied warranty of  # but WITHOUT ANY WARRANTY; without even the implied warranty of
10  # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the  # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
11  # GNU General Public License for more details.  # GNU General Public License for more details.
12  #  #
13  # You should have received a copy of the GNU General Public License  # You should have received a copy of the GNU General Public License
14  # along with this program; if not, write to the Free Software  # along with this program; if not, write to the Free Software
15  # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
16    
17  # Please email any bugs, comments, and/or additions to this file to:  # Please email any bugs, comments, and/or additions to this file to:
18  # bug-dejagnu@gnu.org  # bug-dejagnu@gnu.org
# Line 41  set text "\[- A-Za-z0-9\.\;\"\_\:\'\`\(\ Line 41  set text "\[- A-Za-z0-9\.\;\"\_\:\'\`\(\
41  #           connect - the connectmode for this target. This is for both IP and  #           connect - the connectmode for this target. This is for both IP and
42  #                     serial connections.  #                     serial connections.
43  #           hostname  - the hostname of the target. This is for TCP/IP based  #           hostname  - the hostname of the target. This is for TCP/IP based
44  #                     connections, and is also used for versions of tip that  #                     connections, and is also used for versions of tip that
45  #                     use /etc/remote.  #                     use /etc/remote.
46  #           serial  - the serial port. This is typically /dev/tty? or com?:.  #           serial  - the serial port. This is typically /dev/tty? or com?:.
47  #           baud    - the baud rate for a serial port connection.  #           baud    - the baud rate for a serial port connection.
# Line 144  proc prune_warnings { text } { Line 144  proc prune_warnings { text } {
144      }      }
145      if [ishost "hppa*-*-hpux*"] {      if [ishost "hppa*-*-hpux*"] {
146         # Ignore the compiler's warnings about PA incompatibility.         # Ignore the compiler's warnings about PA incompatibility.
147         regsub -all "(^|\n)\[^\n\]*PA 2.0 object file \[^\n\]* was detected. The linked output may not run on a PA 1.x system." $text "" text         regsub -all "(^|\n)\[^\n\]*PA 2.0 object file \[^\n\]* was detected. The linked output may not run on a PA 1.x system." $text "" text
148    
149         regsub -all "(^|\n)\[^\n\]*PA 2.0 object file \[^\n\]* was detected. The linked output may not run on a PA 1.x system." $text "" text         regsub -all "(^|\n)\[^\n\]*PA 2.0 object file \[^\n\]* was detected. The linked output may not run on a PA 1.x system." $text "" text
150    
151         # And the linker's +vcompatwarnings verbage.         # And the linker's +vcompatwarnings verbage.
152         regsub -all "(^|\n)\[^\n\]*Linker features were used that may not be supported\[^\n\]*.\[^\n\]*." $text "" text         regsub -all "(^|\n)\[^\n\]*Linker features were used that may not be supported\[^\n\]*.\[^\n\]*." $text "" text
# Line 162  proc prune_warnings { text } { Line 162  proc prune_warnings { text } {
162         # the source line and underline chars.         # the source line and underline chars.
163         #         #
164         regsub -all "Warning .*The linkage directive is ignored for an object or function declared static..\[^\n\]*.\[^\n\]*." $text "" text         regsub -all "Warning .*The linkage directive is ignored for an object or function declared static..\[^\n\]*.\[^\n\]*." $text "" text
165    
166         # Ignore these warnings, which I often see from the ANSI C         # Ignore these warnings, which I often see from the ANSI C
167         # compiler installed on HP-UX 11.0 machines.  (Something is         # compiler installed on HP-UX 11.0 machines.  (Something is
168         # probably wrong with an installation, or perhaps NLS isn't         # probably wrong with an installation, or perhaps NLS isn't
# Line 175  proc prune_warnings { text } { Line 175  proc prune_warnings { text } {
175         #         #
176         regsub -all "Warning: Unable to open pxdb message catalog.*" $text "" text         regsub -all "Warning: Unable to open pxdb message catalog.*" $text "" text
177         regsub -all ".* Using internal messages.*" $text "" text         regsub -all ".* Using internal messages.*" $text "" text
178    
179         # Another form of the "unable to find message catalog" warning.         # Another form of the "unable to find message catalog" warning.
180         #         #
181         regsub -all "cpp: warning .*Possibly incorrect message catalog." $text "" text         regsub -all "cpp: warning .*Possibly incorrect message catalog." $text "" text
182    
183         # Another odd warning on 11.0.         # Another odd warning on 11.0.
184         #         #
185         regsub -all "aCC .assigner.: Warning .*Could not find library for -l.*" $text "" text         regsub -all "aCC .assigner.: Warning .*Could not find library for -l.*" $text "" text
186    
187         # Oh heck, just keep adding 'em here...         # Oh heck, just keep adding 'em here...
188         #         #
189         regsub -all "aCC .assigner.: Warning .*Could not satisfy instantiation request for \[^\n\]* contained in\[^\n\]*\n\t/lib/pa20_64/lib\[a-zA-Z0-9\]*.sl" $text "" text         regsub -all "aCC .assigner.: Warning .*Could not satisfy instantiation request for \[^\n\]* contained in\[^\n\]*\n\t/lib/pa20_64/lib\[a-zA-Z0-9\]*.sl" $text "" text
190          
191        # Remove the lines that are output by the HP F77 compiler to        # Remove the lines that are output by the HP F77 compiler to
192        # indicate the functions that are being compiled.        # indicate the functions that are being compiled.
193        upvar compiler_type compiler_type        upvar compiler_type compiler_type
# Line 270  proc prune_warnings { text } { Line 270  proc prune_warnings { text } {
270      # GNU ld warns about functions marked as dangerous in GNU libc.      # GNU ld warns about functions marked as dangerous in GNU libc.
271      regsub -all "(^|\n)\[^\n\]*: In function\[^\n\]*\n\[^\n\]\[^\n\]*function is dangerous\[^\n\]*" $text "" text      regsub -all "(^|\n)\[^\n\]*: In function\[^\n\]*\n\[^\n\]\[^\n\]*function is dangerous\[^\n\]*" $text "" text
272    
273       # GNU ld warns about functions marked as dangerous in GNU libc.         # GNU ld warns about functions marked as dangerous in GNU libc.
274       regsub -all "(^|\n)\[^\n\]*: In function\[^\n\]*\n\[^\n\]\[^\n\]*the use of \[^\n\]* is dangerous, better use \[^\n\]*" $text "" text       regsub -all "(^|\n)\[^\n\]*: In function\[^\n\]*\n\[^\n\]\[^\n\]*the use of \[^\n\]* is dangerous, better use \[^\n\]*" $text "" text
275    
276       # Libgloss libnosys defines functions that warn when linked in       # Libgloss libnosys defines functions that warn when linked in
# Line 405  proc default_target_compile {source dest Line 405  proc default_target_compile {source dest
405      global CC_FOR_TARGET      global CC_FOR_TARGET
406      global CXX_FOR_TARGET      global CXX_FOR_TARGET
407      global F77_FOR_TARGET      global F77_FOR_TARGET
408        
409      if [info exists CC_FOR_TARGET] {      if [info exists CC_FOR_TARGET] {
410          if { $compiler == "" } {          if { $compiler == "" } {
411              set compiler $CC_FOR_TARGET              set compiler $CC_FOR_TARGET
# Line 444  proc default_target_compile {source dest Line 444  proc default_target_compile {source dest
444      if { $type == "preprocess" } {      if { $type == "preprocess" } {
445          append add_flags " -E"          append add_flags " -E"
446      }      }
447        
448      if { $type == "assembly" } {      if { $type == "assembly" } {
449          append add_flags " -S"          append add_flags " -S"
450      }      }

Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26