Lines Matching refs:stmt

1805 	my ($stmt) = @_;
1808 	$stmt =~ s/(^|\n)./$1/g;
1809 	$stmt =~ s/^\s*//;
1810 	$stmt =~ s/\s*$//;
1812 	my @stmt_lines = ($stmt =~ /\n/g);
1818 	my ($stmt) = @_;
1820 	my @stmt_lines = ($stmt =~ /\n/g);
1826 	my ($stmt) = @_;
1828 	$stmt =~ s/(^|\n)./$1/g;
1829 	$stmt =~ s/^\s*{//;
1830 	$stmt =~ s/}\s*$//;
1831 	$stmt =~ s/^\s*//;
1832 	$stmt =~ s/\s*$//;
1834 	my @stmt_lines = ($stmt =~ /\n/g);
1835 	my @stmt_statements = ($stmt =~ /;/g);