Lines Matching refs:stmt
687 my ($stmt) = @_;
690 $stmt =~ s/(^|\n)./$1/g;
691 $stmt =~ s/^\s*//;
692 $stmt =~ s/\s*$//;
694 my @stmt_lines = ($stmt =~ /\n/g);
700 my ($stmt) = @_;
702 my @stmt_lines = ($stmt =~ /\n/g);
708 my ($stmt) = @_;
710 $stmt =~ s/(^|\n)./$1/g;
711 $stmt =~ s/^\s*\{//;
712 $stmt =~ s/}\s*$//;
713 $stmt =~ s/^\s*//;
714 $stmt =~ s/\s*$//;
716 my @stmt_lines = ($stmt =~ /\n/g);
717 my @stmt_statements = ($stmt =~ /;/g);