39 lines
655 B
Ruby
39 lines
655 B
Ruby
|
#
|
||
|
|
# list-parse-event-ids.rb
|
||
|
|
#
|
||
|
|
|
||
|
|
require 'getopts'
|
||
|
|
|
||
|
|
def usage( status )
|
||
|
|
(status == 0 ? $stdout : $stderr).print(<<EOS)
|
||
|
|
Usage: #{File.basename($0)} [-a] filename
|
||
|
|
EOS
|
||
|
|
exit status
|
||
|
|
end
|
||
|
|
|
||
|
|
def main
|
||
|
|
getopts('a') or usage(1)
|
||
|
|
extract_ids(ARGF).each do |id, arity|
|
||
|
|
if $OPT_a
|
||
|
|
then puts "#{id} #{arity}"
|
||
|
|
else puts id
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
def extract_ids( f )
|
||
|
|
results = []
|
||
|
|
f.each do |line|
|
||
|
|
next if /\A\#\s*define\s+s?dispatch/ === line
|
||
|
|
next if /ripper_dispatch/ === line
|
||
|
|
if a = line.scan(/dispatch(\d)\((\w+)/)
|
||
|
|
a.each do |arity, event|
|
||
|
|
results.push [event, arity.to_i]
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
results.uniq.sort
|
||
|
|
end
|
||
|
|
|
||
|
|
main
|