diff options
author | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2016-03-27 01:18:10 +0000 |
---|---|---|
committer | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2016-03-27 01:18:10 +0000 |
commit | 4719d4ec7b5bf1182b003ea5b319367f24bc69e6 (patch) | |
tree | df057e1c51133a6fc6543bbecbcfaac685cce563 /tool/gen_dummy_probes.rb | |
parent | 4859714932aa8e67551580559b45e5fa21818384 (diff) |
gen_dummy_probes.rb: argument names
* tool/gen_dummy_probes.rb: preserve macro argument names.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@54300 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'tool/gen_dummy_probes.rb')
-rwxr-xr-x | tool/gen_dummy_probes.rb | 17 |
1 files changed, 9 insertions, 8 deletions
diff --git a/tool/gen_dummy_probes.rb b/tool/gen_dummy_probes.rb index c19f9d53cd..05e724fed8 100755 --- a/tool/gen_dummy_probes.rb +++ b/tool/gen_dummy_probes.rb @@ -2,7 +2,6 @@ # -*- coding: us-ascii -*- text = ARGF.read -text.gsub!(/^(?!#)(.*)/){$1.upcase} # remove comments text.gsub!(%r'(?:^ *)?/\*.*?\*/\n?'m, '') @@ -11,18 +10,20 @@ text.gsub!(%r'(?:^ *)?/\*.*?\*/\n?'m, '') text.gsub!(/^#pragma.*\n/, '') # replace the provider section with the start of the header file -text.gsub!(/PROVIDER RUBY \{/, "#ifndef\t_PROBES_H\n#define\t_PROBES_H\n#define DTRACE_PROBES_DISABLED 1\n") +text.gsub!(/provider ruby \{/, "#ifndef\t_PROBES_H\n#define\t_PROBES_H\n#define DTRACE_PROBES_DISABLED 1\n") # finish up the #ifndef sandwich text.gsub!(/\};/, "\n#endif\t/* _PROBES_H */") -text.gsub!(/__/, '_') - -text.gsub!(/\((.+?)(?=\);)/) { - "(arg" << (0..$1.count(',')).to_a.join(", arg") +# expand probes to DTRACE macros +text.gsub!(/^ *probe ([^\(]*)\(([^\)]*)\);/) { + name, args = $1, $2 + name.upcase! + name.gsub!(/__/, '_') + args.gsub!(/(\A|, *)[^,]*\b(?=\w+(?=,|\z))/, '\1') + "#define RUBY_DTRACE_#{name}_ENABLED() 0\n" \ + "#define RUBY_DTRACE_#{name}(#{args}) do {} while (0)" } -text.gsub!(/ *PROBE ([^\(]*)(\([^\)]*\));/, "#define RUBY_DTRACE_\\1_ENABLED() 0\n#define RUBY_DTRACE_\\1\\2\ do \{ \} while\(0\)") puts "/* -*- c -*- */" print text - |