mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00

* configure.in: disable dtrace because it doesn't work on FreeBSD. * common.mk (clean-local): rm probes.h. * common.mk (parse.o): depend $(PROBES_H_INCLUDES). * common.mk (.d.h): moved from Makefile.in and use BASERUBY. * tool/gen_dummy_probes.rb: reimplemented with ruby because sed is not available on Windows Microsoft VC++ environment. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@37636 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
24 lines
802 B
Ruby
24 lines
802 B
Ruby
#!/usr/bin/ruby
|
|
|
|
text = ARGF.read
|
|
text.upcase!
|
|
|
|
# remove the pragma declarations
|
|
text.gsub!(/^#PRAGMA.*$/, '')
|
|
|
|
# replace the provider section with the start of the header file
|
|
text.gsub!(/PROVIDER RUBY \{/, "#ifndef\t_PROBES_H\n#define\t_PROBES_H")
|
|
|
|
# finish up the #ifndef sandwich
|
|
text.gsub!(/\};/, "#endif\t/* _PROBES_H */")
|
|
|
|
text.gsub!(/__/, '_')
|
|
|
|
text.gsub!(/\([^,)]+\)/, '(arg0)')
|
|
text.gsub!(/\([^,)]+,[^,)]+\)/, '(arg0, arg1)')
|
|
text.gsub!(/\([^,)]+,[^,)]+,[^,)]+\)/, '(arg0, arg1, arg2)')
|
|
text.gsub!(/\([^,)]+,[^,)]+,[^,)]+,[^,)]+\)/, '(arg0, arg1, arg2, arg3)')
|
|
text.gsub!(/\([^,)]+,[^,)]+,[^,)]+,[^,)]+,[^,)]+\)/, '(arg0, arg1, arg2, arg3, arg4)')
|
|
|
|
text.gsub!(/ *PROBE ([^\(]*)(\([^\)]*\));/, "#define RUBY_DTRACE_\\1_ENABLED() 0\n#define RUBY_DTRACE_\\1\\2\ do \{ \} while\(0\)")
|
|
print text
|