enable --full-trace and --check-bounds
This commit is contained in:
@ -252,7 +252,7 @@ sub select_experiment {
|
||||
|
||||
push @exp_with_notes,
|
||||
( defined $info && length($info) > 0 )
|
||||
? sprintf( "%-50s (Note: %s)", $exp, $info )
|
||||
? sprintf( "%-50s (%s)", $exp, $info )
|
||||
: $exp;
|
||||
}
|
||||
|
||||
@ -260,7 +260,7 @@ sub select_experiment {
|
||||
TUI::select_from_list( "Select Experiment", $multi, @exp_with_notes );
|
||||
die "No experiment selected" unless @selected_experiments;
|
||||
|
||||
map { s/(.*?)\s+\(Note:.+\)$/$1/ } @selected_experiments;
|
||||
map { s/(.*?)\s+\(.+\)$/$1/ } @selected_experiments;
|
||||
|
||||
return $multi == 1 ? @selected_experiments : $selected_experiments[0];
|
||||
}
|
||||
|
||||
@ -322,11 +322,7 @@ my %handlers = (
|
||||
'16. Plot Results' => sub {
|
||||
|
||||
# Generate R ggplot2 charts
|
||||
my @experiments = Util::find_subdirs($local_archive_dir);
|
||||
my @selected_experiments =
|
||||
TUI::select_from_list( "Select Experiments to Plot", 1,
|
||||
@experiments );
|
||||
die "No experiment selected" unless @selected_experiments;
|
||||
my @selected_experiments = Util::select_experiment(1);
|
||||
|
||||
my @charts = map { s/\.r//r } Util::find_files($local_charts_dir);
|
||||
my @selected_charts =
|
||||
|
||||
@ -48,6 +48,8 @@ sub trace {
|
||||
"-e $remote_builds_dir/$experiment/system.elf",
|
||||
"-i $remote_builds_dir/$experiment/system.iso",
|
||||
"--",
|
||||
"-Wf,--full-trace",
|
||||
"-Wf,--check-bounds",
|
||||
"-Wf,--start-symbol=fail_start_trace",
|
||||
"-Wf,--save-symbol=fail_start_trace",
|
||||
"-Wf,--end-symbol=fail_stop_trace",
|
||||
|
||||
Reference in New Issue
Block a user