Permalink
Browse files

ignored C comments in probe files.

  • Loading branch information...
1 parent e5495d5 commit 2608a197335e75c8b614b64be3ef5c36c4cdb571 @agentzh agentzh committed Aug 13, 2012
Showing with 1 addition and 0 deletions.
  1. +1 −0 gen-dtrace-probe-header
View
1 gen-dtrace-probe-header
@@ -60,6 +60,7 @@ while ($src =~ /^ \s* probe \s+ (\w+) \s* \( ([^\)]*) \) \s* ; \s* $/xogms) {
my ($probe, $args) = ($1, $2);
$args =~ s/\n/ /g;
$args =~ s/ +/ /g;
+ $args =~ s{/\* .*? \*/}{}xg;
my @args = split /\s*,\s*/, $args;
my @arg_names;
for my $arg (@args) {

0 comments on commit 2608a19

Please sign in to comment.