Lines Matching refs:input_line
1655 my $input_line = ${ $input_line_ref };
1668 if ( ($input_line =~ /$g_branch_regex/)
1669 or ($input_line =~ /$g_endbr_regex/))
1753 my $input_line = ${ $input_line_ref };
1765 if ( $input_line =~ /$g_function_call_v2_regex/ )
1767 $msg = "found a function call - line[$line_no] = $input_line";
4000 my $input_line;
4028 $input_line = $_;
4029 chomp ($input_line);
4031 $msg = "read input_line = $input_line";
4034 if ($input_line =~ /^$map_xml_regex/)
4036 $msg = "target line = $input_line";
4422 my ($src_times_regex, $function_regex, $number_of_metrics, $input_line) = @_;
4437 @fields_in_line = split (" ", $input_line);
4438 if ( $input_line =~ /$src_times_regex/ )
4456 elsif ($input_line =~ /$function_regex/)
4743 my $input_line = ${ $input_line_ref };
4754 gp_message ("debugXL", $subr_name, "input_line = $input_line");
4759 $space = index ($input_line, " ", $space_position);
4772 my $keyword = substr ($input_line, $start_word, $end_word - $start_word + 1);
4776 elsif ( ($space == $space_position) and ($space < length ($input_line) - 1))
4792 $end_word = length ($input_line) - 1;
4793 my $keyword = substr ($input_line, $start_word, $end_word - $start_word + 1);
5276 my $input_line;
5458 $input_line = $caller_callee_data[$line];
5459 $reduced_line = $input_line;
5461 $msg = "line = " . $line . " input_line = " . $input_line;
5464 if ($input_line =~ /$find_hex_address_regex/)
5471 split_function_data_line (\$input_line);
5550 $input_line = $caller_callee_data[$line];
5552 if ($input_line =~ /$header_name_regex/)
5559 elsif (($input_line =~ /$sorted_by_regex/) or
5560 ($input_line =~ /$current_regex/))
5563 "input_line = " . $input_line;
5566 push (@top_level_header, $input_line);
5568 elsif ($input_line =~ /$line_of_interest_regex/)
5573 $data_function_block .= $separator . $input_line;
5577 $msg = "line = $line input_line = " . $input_line;
5582 elsif (($input_line =~ /$empty_line_regex/) and
5663 elsif ($input_line =~ /\s*(.*)/)
5731 my $input_line = $entries[$k];
5738 split_function_data_line (\$input_line);
6126 my $input_line = $disassembly_file[$line_no];
6127 gp_message ("debugXL", $subr_name, "[line $line_no] $input_line");
6129 if ($input_line =~ /$line_of_interest_regex/)
6146 my $msg = "$input_line has an unexpected format";
6189 \$input_line,
6208 \$input_line,
6287 my $input_line = $disassembly_file[$line_no];
6288 gp_message ("debugXL", $subr_name, "[line $line_no] $input_line");
6290 if ($input_line =~ /$end_src_header_regex/)
6296 if ($input_line =~ /$end_dis_header_regex/)
6301 push (@modified_html, "<i>" . $input_line . "</i>");
6331 my $input_line = $disassembly_file[$line_no];
6333 if ( $input_line =~ /$dis_regex/ )
6414 my $input_line = $disassembly_file[$line_no];
6415 if ( $input_line =~ /$dis_regex/ )
6480 my $input_line = $disassembly_file[$line_no];
6481 gp_message ("debugXL", $subr_name, "input_line[$line_no] = $input_line");
6482 if ( $input_line =~ /$dis_regex/ )
6484 gp_message ("debugXL", $subr_name, "found a disassembly line: $input_line");
6760 my $msg = "parsing line $input_line";
6764 elsif ( $input_line =~ /$src_regex/ )
6769 gp_message ("debugXL", $subr_name, "found a source code line: $input_line");
6791 my $msg = "parsing line $input_line";
6795 elsif ( $input_line =~ /$function_regex/ )
6829 my $msg = "parsing line $input_line";
7143 my $input_line = $input_data[$line];
7145 $input_line =~ s/ -- no functions found//;
7148 $msg = "line = " . $line . " input_line = " . $input_line;
7152 if ($input_line =~ /\s*(\d+:0x[a-fA-F0-9]+)\s+(\S+)\s+(.*)/)
7156 elsif ($input_line =~ /$empty_line_regex/)
7629 my $input_line = $the_metrics[$i];
7640 if ($input_line =~ /[\w0-9$decimal_separator]*(0$decimal_separator$)/)
7646 my $txt = "input_line = $input_line = ended with 0";
7890 my $input_line;
7898 $input_line = $metrics_data[$line_no];
7901 if ( not ($input_line =~ /$ignore_lines_regex/) and not ($input_line =~ /$empty_line_regex/) )
7903 if ($input_line =~ /$split_line_regex/)
8041 my $input_line = $exp_info[$i];
8045 if ($input_line =~ /^\s*(\d+)\s+(.+)/)
12226 my $input_line;
12305 $input_line = $exp_info[$line];
12307 my $msg = "exp_id = $exp_id: input_line = $input_line";
12310 if ($input_line =~ /$target_cmd_regex/)
12316 elsif ($input_line =~ /$host_system_regex/)
12328 elsif ($input_line =~ /$start_date_regex/)
12334 elsif ($input_line =~ /$end_experiment_regex/)
12340 elsif ($input_line =~ /$data_collection_duration_regex/)
12367 elsif ($input_line =~ /$total_thread_time_regex/)
12373 elsif ($input_line =~ /$user_cpu_regex/)
12381 elsif ($input_line =~ /$system_cpu_regex/)
12389 elsif ($input_line =~ /$sleep_regex/)
12844 my $input_line;
12931 $input_line = $function_data[$line];
12934 gp_message ("debugXL", $subr_name, "input_line = $input_line");
12940 if ($input_line =~ /$header_name_regex/)
12944 elsif ($input_line =~ /$total_marker_regex/)
12982 elsif ($input_line =~ /$catch_all_regex/)
13004 if ($scan_function_data and (not ($input_line =~ /$empty_line_regex/)))
13011 split_function_data_line (\$input_line);
13024 @fields = split (" ", $input_line);
13968 my $input_line;
13977 $input_line = $file_contents[$line_no];
13986 $input_line);
13988 if ($input_line =~ /$function_regex/)
13996 $input_line =~ s/$g_less_than_regex/$g_html_less_than_regex/g;
14008 $input_line,
14016 $modified_line .= "$input_line";
14502 my $input_line;
14668 $input_line = $file_contents[$line_number];
14673 if (($input_line =~ /$end_src1_header_regex/) or
14674 ($input_line =~ /$end_src2_header_regex/))
14678 gp_message ("debugXL", $subr_name, "input_line = $input_line");
14686 $modified_line = "<i>" . $input_line . "</i>";
14704 $input_line = $file_contents[$line_number];
14706 gp_message ("debugXL", $subr_name, "[$line_number] $input_line");
14708 if ($input_line =~ /$function_regex/)
14739 my $msg = "parsing line $input_line";
14786 $input_line = $file_contents[$line_number];
14787 gp_message ("debugXL", $subr_name, " $line_number : check input_line = $input_line");
14789 if ( $input_line =~ /$hot_lines_regex/ )
14972 my $input_line;
14983 $input_line = $file_contents[$line_number];
14988 $input_line =~ s/$g_less_than_regex/$g_html_less_than_regex/g;
14993 $input_line);
14995 …gp_message ("debug", $subr_name, "line_number = $line_number : input_line = $input_line line_id = …
14997 if ($input_line =~ /$function2_regex/)
15028 elsif ($input_line =~ /$src_times_regex/)
15050 @components = split (" ", $input_line, 1+$number_of_metrics+2);
15052 $input_line,
15060 @components = split (" ", $input_line, $number_of_metrics + 2);
15072 …$modified_line = set_background_color_string ($input_line, $g_html_color_scheme{"background_color_…
15077 $modified_line .= "$input_line";
15091 $modified_line .= "$input_line";
16107 my $input_line = ${ $input_line_ref };
16134 $reduced_line = $input_line;
16136 if ($input_line =~ /$find_hex_address_regex/)