OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [lto/] [lto.exp] - Blame information for rev 694

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 694 jeremybenn
# Copyright (C) 2009 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
# .
16
#
17
# Contributed by Diego Novillo 
18
 
19
 
20
# Test link-time optimization across multiple files.
21
#
22
# Programs are broken into multiple files.  Each one is compiled
23
# separately with LTO information.  The final executable is generated
24
# by collecting all the generated object files using regular LTO or WHOPR.
25
 
26
if $tracelevel then {
27
    strace $tracelevel
28
}
29
 
30
# Load procedures from common libraries.
31
load_lib standard.exp
32
load_lib gfortran-dg.exp
33
 
34
# Load the language-independent compabibility support procedures.
35
load_lib lto.exp
36
 
37
lto_init no-mathlib
38
 
39
# Define an identifier for use with this suite to avoid name conflicts
40
# with other lto tests running at the same time.
41
set sid "f_lto"
42
 
43
# If LTO has not been enabled, bail.
44
if { ![check_effective_target_lto] } {
45
    return
46
}
47
 
48
# Main loop.
49
foreach src [lsort [glob -nocomplain $srcdir/$subdir/*_0.\[fF\]{,90,95,03,08} ]] {
50
    # If we're only testing specific files and this isn't one of them, skip it.
51
    if ![runtest_file_p $runtests $src] then {
52
        continue
53
    }
54
 
55
    lto-execute $src $sid
56
}
57
 
58
lto_finish

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.