Lines Matching refs:stmt

1804 	my ($stmt) = @_;
1807 	$stmt =~ s/(^|\n)./$1/g;
1808 	$stmt =~ s/^\s*//;
1809 	$stmt =~ s/\s*$//;
1811 	my @stmt_lines = ($stmt =~ /\n/g);
1817 	my ($stmt) = @_;
1819 	my @stmt_lines = ($stmt =~ /\n/g);
1825 	my ($stmt) = @_;
1827 	$stmt =~ s/(^|\n)./$1/g;
1828 	$stmt =~ s/^\s*{//;
1829 	$stmt =~ s/}\s*$//;
1830 	$stmt =~ s/^\s*//;
1831 	$stmt =~ s/\s*$//;
1833 	my @stmt_lines = ($stmt =~ /\n/g);
1834 	my @stmt_statements = ($stmt =~ /;/g);