Lines Matching refs:stmt

1809 	my ($stmt) = @_;
1812 	$stmt =~ s/(^|\n)./$1/g;
1813 	$stmt =~ s/^\s*//;
1814 	$stmt =~ s/\s*$//;
1816 	my @stmt_lines = ($stmt =~ /\n/g);
1822 	my ($stmt) = @_;
1824 	my @stmt_lines = ($stmt =~ /\n/g);
1830 	my ($stmt) = @_;
1832 	$stmt =~ s/(^|\n)./$1/g;
1833 	$stmt =~ s/^\s*{//;
1834 	$stmt =~ s/}\s*$//;
1835 	$stmt =~ s/^\s*//;
1836 	$stmt =~ s/\s*$//;
1838 	my @stmt_lines = ($stmt =~ /\n/g);
1839 	my @stmt_statements = ($stmt =~ /;/g);