Lines Matching refs:in_comment
1498 my ($in_comment) = @_;
1500 if ($in_comment) {
1909 my $in_comment = 0;
1915 $in_comment = 1;
1918 $in_comment = 1;
1920 if (!$in_comment && $current_comment ne '') {
1923 $current_comment .= $line . "\n" if ($in_comment);
1925 $in_comment = 0;
2609 my $in_comment = 0;
2656 $in_comment = 0;
2677 $in_comment = 1;
2686 $in_comment = 1;
2689 ##print "COMMENT:$in_comment edge<$edge> $rawline\n";
2690 sanitise_line_reset($in_comment);