Lines Matching refs:stmt

1800 	my ($stmt) = @_;
1803 	$stmt =~ s/(^|\n)./$1/g;
1804 	$stmt =~ s/^\s*//;
1805 	$stmt =~ s/\s*$//;
1807 	my @stmt_lines = ($stmt =~ /\n/g);
1813 	my ($stmt) = @_;
1815 	my @stmt_lines = ($stmt =~ /\n/g);
1821 	my ($stmt) = @_;
1823 	$stmt =~ s/(^|\n)./$1/g;
1824 	$stmt =~ s/^\s*{//;
1825 	$stmt =~ s/}\s*$//;
1826 	$stmt =~ s/^\s*//;
1827 	$stmt =~ s/\s*$//;
1829 	my @stmt_lines = ($stmt =~ /\n/g);
1830 	my @stmt_statements = ($stmt =~ /;/g);