Lines Matching refs:body
1055 my $body = $&;
1058 if ("$normalized_line$body" =~ m|^extern "C"\{$|) {
1060 … print STDERR "DEBUG: found start of 'extern \"C\"' ($normalized_line$body)\n"
1064 $normalized_line .= "<<<".$body;
1067 $normalized_line .= $body;
1071 print STDERR "DEBUG: found $paren_singular start '$body'\n"
1073 $body =~ tr|\{\[\(|\}\]\)|;
1074 print STDERR "DEBUG: pushing $paren_singular end '$body'\n"
1076 push @{$state{$parens}}, $body;
1101 my $body = $&;
1106 $normalized_line .= $body;
1107 $state{in_string} = $body;
1126 my $body = $&;
1137 && $body =~ m/^(\w|\d)/));
1139 …s: \$normalized_line = '$normalized_line', \$space = '$space', \$body = '$body', \$rest = '$rest'\…
1141 $normalized_line .= $space.$body;
