OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [lib/] [profopt.exp] - Diff between revs 306 and 514

Show entire file | Details | Blame | View Log

Rev 306 Rev 514
Line 212... Line 212...
#
#
# SRC is the full pathname of the testcase.
# SRC is the full pathname of the testcase.
#
#
proc profopt-execute { src } {
proc profopt-execute { src } {
    global srcdir tmpdir
    global srcdir tmpdir
    global prof_option_list
    global prof_option_list additional_sources
    global tool profile_option feedback_option prof_ext perf_ext perf_delta
    global tool profile_option feedback_option prof_ext perf_ext perf_delta
    global generate_final_code use_final_code
    global generate_final_code use_final_code
    global verbose
    global verbose
 
 
    if ![info exists profile_option] {
    if ![info exists profile_option] {
Line 268... Line 268...
        if { [lindex ${dg-do-what} 1 ] == "N" } {
        if { [lindex ${dg-do-what} 1 ] == "N" } {
            unsupported "$src"
            unsupported "$src"
            verbose "$src not supported on this target, skipping it" 3
            verbose "$src not supported on this target, skipping it" 3
            return
            return
        }
        }
 
        # $additional_sources is cleared by dg-additional-files-options,
 
        # thus we must save the information from there now in order to
 
        # be able to delete / upload the associated profiling result files.
 
        set sources $base
 
        foreach source "$additional_sources" {
 
            set source [file tail $source]
 
            set source [file rootname $source]
 
            lappend sources $source
 
            # Remove old profiling and performance data files.
 
            foreach ext $prof_ext {
 
                remote_file target delete $tmpdir/$source.$ext
 
            }
 
        }
 
 
        set extra_options [dg-additional-files-options "" "$src"]
        set extra_options [dg-additional-files-options "" "$src"]
 
 
        # Compile for profiling.
        # Compile for profiling.
 
 
        set options "$extra_options"
        set options "$extra_options"
        lappend options "additional_flags=$option $extra_flags $profile_option"
        lappend options "additional_flags=$option $extra_flags $profile_option"
        set optstr "$option $profile_option"
        # for remote targets, having an absolute profile dir from the host
 
        # causes grief.
 
        set optstr "$option $profile_option -fprofile-dir=."
        set comp_output [${tool}_target_compile "$src" "$execname1" executable $options]
        set comp_output [${tool}_target_compile "$src" "$execname1" executable $options]
        if ![${tool}_check_compile "$testcase compilation" $optstr $execname1 $comp_output] {
        if ![${tool}_check_compile "$testcase compilation" $optstr $execname1 $comp_output] {
            unresolved "$testcase execution,   $optstr"
            unresolved "$testcase execution,   $optstr"
            unresolved "$testcase compilation, $option $feedback_option"
            unresolved "$testcase compilation, $option $feedback_option"
            unresolved "$testcase execution,   $option $feedback_option"
            unresolved "$testcase execution,   $option $feedback_option"
Line 292... Line 307...
        set status [lindex $result 0]
        set status [lindex $result 0]
        set missing_file 0
        set missing_file 0
        # Make sure the profile data was generated, and fail if not.
        # Make sure the profile data was generated, and fail if not.
        if { $status == "pass" } {
        if { $status == "pass" } {
            foreach ext $prof_ext {
            foreach ext $prof_ext {
                remote_upload target $tmpdir/$base.$ext
                foreach source "$sources" {
                set files [glob -nocomplain $base.$ext]
                    remote_upload target $tmpdir/$source.$ext
 
                    set files [glob -nocomplain $source.$ext]
                if { $files == "" } {
                if { $files == "" } {
                    set status "fail"
                    set status "fail"
                    set missing_file 1
                    set missing_file 1
                    fail "$testcase execution: file $base.$ext does not exist, $option $profile_option"
                        fail "$testcase execution: file $source.$ext does not exist, $option $profile_option"
 
                    }
                }
                }
            }
            }
        }
        }
        if { $missing_file == 0 } {
        if { $missing_file == 0 } {
            $status "$testcase execution,   $optstr"
            $status "$testcase execution,   $optstr"
Line 344... Line 361...
            profopt-final-code "use" $use_final_code $testcase
            profopt-final-code "use" $use_final_code $testcase
        }
        }
 
 
        # Remove the profiling data files.
        # Remove the profiling data files.
        foreach ext $prof_ext {
        foreach ext $prof_ext {
            remote_file target delete $tmpdir/$base.$ext
            foreach source "$sources" {
 
                remote_file target delete $tmpdir/$source.$ext
 
            }
        }
        }
 
 
        if { $status != "pass" } {
        if { $status != "pass" } {
            continue
            continue
        }
        }

powered by: WebSVN 2.1.0

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