dbc 1.3.0 → 2.0.0

data/lib/dbc/define.rb

@@ -1,282 +0,0 @@
-#
-# DO NOT MODIFY!!!!
-# This file is automatically generated by racc 1.4.4
-# from racc grammer file "src/define.y".
-#
-
-require 'racc/parser'
-
-
-
-require 'dbc/parameters'
-require 'dbc/parseerrorhandler'
-
-
-module Preprocessor
-
-  class Define < Racc::Parser
-
-module_eval <<'..end src/define.y modeval..idcc3778cf05', 'src/define.y', 74
-	
-	include ParseErrorHandler
-
-	tmp = '#'.freeze
-	STRINGIFY_TOKEN = [tmp, tmp].freeze
-	tmp = '##'.freeze
-	PASTE_TOKEN = [tmp, tmp].freeze
-	
-	def initialize(params, tokens)
-		if params and not params.class == Parameters
-			@params = Parameters.new
-			params.each { |p| @params << p }
-		else
-			@params = params
-		end
-		scanner = CTokenizer::Lexer.new(tokens.to_s)
-		@value = []
-		until scanner.empty?
-			# this works because all spaces, comments and newlines were
-			# replaced by a single space by the preprocessor
-			@value.push( \
-				if scanner.scan(/[ \t]*##[ \t]*/)
-					PASTE_TOKEN
-				elsif scanner.scan(/#[ \t]*/)
-					STRINGIFY_TOKEN 
-				else
-					scanner.shift
-				end ) # if
-		end # until
-		@value.push(CTokenizer::EOF_TOKEN)
-	end
-
-	def takes_args?
-		@params != nil and not @params.empty?
-	end
-
-	# get the value of the macro
-	# 1) substitute macro function parameters if any
-	# note function parameters should NOT be resolved
-	# 2) stringify macro function parameters
-	# 3) concat tokens using ## operator
-	# 4) (happens after call to tokens) repeat 1) for each identifier
-	def value(stack)
-		@pos = 0
-		if takes_args?
-			args = @params.arguments(stack, :PARAMETER)
-			tokens = @value.collect do |t|
-				if t.at(0) == :IDENTIFIER and idx = @params.index(t.at(1))
-					args.at(idx)
-				else
-					t
-				end
-			end
-			yyparse(tokens, :each)
-		else
-			yyparse(@value, :each)
-		end
-	end
-
-..end src/define.y modeval..idcc3778cf05
-
-##### racc 1.4.4 generates ###
-
-racc_reduce_table = [
- 0, 0, :racc_error,
- 1, 14, :_reduce_none,
- 1, 14, :_reduce_none,
- 0, 16, :_reduce_3,
- 1, 15, :_reduce_4,
- 2, 15, :_reduce_5,
- 1, 17, :_reduce_none,
- 1, 17, :_reduce_none,
- 1, 17, :_reduce_none,
- 1, 18, :_reduce_none,
- 3, 18, :_reduce_10,
- 1, 21, :_reduce_none,
- 1, 21, :_reduce_none,
- 1, 21, :_reduce_none,
- 1, 21, :_reduce_none,
- 1, 21, :_reduce_none,
- 1, 21, :_reduce_none,
- 1, 21, :_reduce_none,
- 1, 21, :_reduce_none,
- 2, 20, :_reduce_19,
- 1, 22, :_reduce_none,
- 1, 19, :_reduce_none ]
-
-racc_reduce_n = 22
-
-racc_shift_n = 26
-
-racc_action_table = [
-     3,     5,     7,     9,    11,    13,    15,    17,    22,     2,
-     3,     5,     7,     9,    11,    13,    15,    17,    17,     2,
-     5,     7,     9,    11,    13,    15,    17,    23,    24,    20 ]
-
-racc_action_check = [
-     0,     0,     0,     0,     0,     0,     0,     0,    12,     0,
-     6,     6,     6,     6,     6,     6,     6,     6,     2,     6,
-    22,    22,    22,    22,    22,    22,    22,    20,    22,     4 ]
-
-racc_action_pointer = [
-    -3,   nil,     8,   nil,    29,   nil,     7,   nil,   nil,   nil,
-   nil,   nil,    -3,   nil,   nil,   nil,   nil,   nil,   nil,   nil,
-    27,   nil,    16,   nil,   nil,   nil ]
-
-racc_action_default = [
-    -3,   -17,   -18,   -21,   -22,   -11,    -1,   -16,    -2,   -12,
-    -4,   -13,    -6,   -14,    -7,   -15,    -8,   -20,    -9,   -19,
-   -22,    -5,   -22,    26,   -18,   -10 ]
-
-racc_goto_table = [
-    10,     4,     8,     6,    25,    19,    21 ]
-
-racc_goto_check = [
-     4,     1,     3,     2,     8,     9,     4 ]
-
-racc_goto_pointer = [
-   nil,     1,     3,     2,     0,   nil,   nil,   nil,   -18,     3 ]
-
-racc_goto_default = [
-   nil,   nil,   nil,   nil,   nil,    12,    14,    16,    18,     1 ]
-
-racc_token_table = {
- false => 0,
- Object.new => 1,
- :STRINGIFY => 2,
- :SPACE => 3,
- :SYMBOL => 4,
- :UNKNOWN => 5,
- :CHARACTER => 6,
- :STRING => 7,
- :CONSTANT => 8,
- :IDENTIFIER => 9,
- :PARAMETER => 10,
- "##" => 11,
- "#" => 12 }
-
-racc_use_result_var = true
-
-racc_nt_base = 13
-
-Racc_arg = [
- racc_action_table,
- racc_action_check,
- racc_action_default,
- racc_action_pointer,
- racc_goto_table,
- racc_goto_check,
- racc_goto_default,
- racc_goto_pointer,
- racc_nt_base,
- racc_reduce_table,
- racc_token_table,
- racc_shift_n,
- racc_reduce_n,
- racc_use_result_var ]
-
-Racc_token_to_s_table = [
-'$end',
-'error',
-'STRINGIFY',
-'SPACE',
-'SYMBOL',
-'UNKNOWN',
-'CHARACTER',
-'STRING',
-'CONSTANT',
-'IDENTIFIER',
-'PARAMETER',
-'"##"',
-'"#"',
-'$start',
-'target',
-'token_sequence',
-'empty_target',
-'token',
-'token_expression',
-'white_space',
-'stringify_parameter',
-'basic_token',
-'parameter']
-
-Racc_debug_parser = false
-
-##### racc system variables end #####
-
- # reduce 0 omitted
-
- # reduce 1 omitted
-
- # reduce 2 omitted
-
-module_eval <<'.,.,', 'src/define.y', 23
-  def _reduce_3( val, _values, result )
- result = ''
-   result
-  end
-.,.,
-
-module_eval <<'.,.,', 'src/define.y', 27
-  def _reduce_4( val, _values, result )
- result = val[0].dup
-   result
-  end
-.,.,
-
-module_eval <<'.,.,', 'src/define.y', 28
-  def _reduce_5( val, _values, result )
- result = val[0] << val[1]
-   result
-  end
-.,.,
-
- # reduce 6 omitted
-
- # reduce 7 omitted
-
- # reduce 8 omitted
-
- # reduce 9 omitted
-
-module_eval <<'.,.,', 'src/define.y', 39
-  def _reduce_10( val, _values, result )
- result = val[0] +  val[2]
-   result
-  end
-.,.,
-
- # reduce 11 omitted
-
- # reduce 12 omitted
-
- # reduce 13 omitted
-
- # reduce 14 omitted
-
- # reduce 15 omitted
-
- # reduce 16 omitted
-
- # reduce 17 omitted
-
- # reduce 18 omitted
-
-module_eval <<'.,.,', 'src/define.y', 55
-  def _reduce_19( val, _values, result )
- result = "\"#{val[1]}\""
-   result
-  end
-.,.,
-
- # reduce 20 omitted
-
- # reduce 21 omitted
-
- def _reduce_none( val, _values, result )
-  result
- end
-
-  end   # class Define
-
-end   # module Preprocessor

data/lib/dbc/parameters.rb

@@ -1,434 +0,0 @@
-#
-# DO NOT MODIFY!!!!
-# This file is automatically generated by racc 1.4.4
-# from racc grammer file "src/parameters.y".
-#
-
-require 'racc/parser'
-
-
-
-require 'dbc/parseerrorhandler'
-
-module Preprocessor
-
-	class Parameters < Array
-		VA_ARGS = '__VA_ARGS__'.freeze
-		ELLIPSIS = '...'.freeze
-
-		def initialize
-			super
-			@ellipses = nil
-		end
-	
-		def with_ellipses(arg=nil)
-			raise "already has ellipses: #{self}" if ellipses?
-			if arg and arg != ELLIPSIS
-				self << arg
-				@ellipses = arg + ELLIPSIS # if arg is 'i' then 'i...'
-			else
-				self << VA_ARGS
-				@ellipses = ELLIPSIS
-			end
-			self
-		end
-	
-		def ellipses?
-			@ellipses
-		end
-	
-		def to_s
-			if ellipses?
-				self[0, self.length - 1] << @ellipses
-			else
-				self
-			end.join(',')
-		end
-	
-		def inspect
-			"\#<#{self.class}:#{self.to_s}>"
-		end
-
-		def arguments(tokens, t_sym)
-			args = Preprocessor::ArgumentParser.parse(tokens)
-			if args.length < self.length
-				expected = self.length
-				got = args.length
-				tokens.error("wrong number of arguments (#{got} for #{expected})") unless ellipses?
-				expected -= 1 # the variable argument list can be blank
-				tokens.error("wrong number of arguments (#{got} for #{expected}+)") \
-						unless got == expected
-				args[expected] = '' # last arg is blank
-			elsif args.length > self.length
-				#tokens.warning("extra arguments given for macro") unless self.ellipses?
-				args[self.length - 1] = args[self.length..-1].join(',')
-			end
-			args.collect do |a|
-				a.strip! # remove leading/trailing whitespace
-				[t_sym, a.freeze].freeze
-			end
-		end
-	
-	end # Parameters
-
-end # Preprocessor
-
-
-module Preprocessor
-
-  class ArgumentParser < Racc::Parser
-
-module_eval <<'..end src/parameters.y modeval..id3684a7940b', 'src/parameters.y', 150
-
-	def ArgumentParser.parse(tokens)
-		self.new.parse(tokens)
-	end
-
-	def parse(tokens)
-		@q = tokens
-		do_parse
-	end
-
-protected
-
-	include ParseErrorHandler
-	
-	RESERVED = {}
-	['(', ')', '{', '}', ','].each do |t|
-		t.freeze
-		RESERVED[t] = [t, t].freeze
-	end
-	RESERVED.freeze
-
-	def next_token
-		t = @q.shift
-		case t.at(0)
-			when :SPACE, :NEWLINE, :COMMENT
-				t
-			else
-				# everything else is just a TOKEN
-				RESERVED.fetch(t.at(1)) { |str| [:TOKEN, str].freeze }
-		end # case
-	end
-
-..end src/parameters.y modeval..id3684a7940b
-
-##### racc 1.4.4 generates ###
-
-racc_reduce_table = [
- 0, 0, :racc_error,
- 0, 12, :_reduce_none,
- 1, 12, :_reduce_2,
- 3, 13, :_reduce_3,
- 4, 13, :_reduce_4,
- 2, 13, :_reduce_5,
- 3, 13, :_reduce_6,
- 1, 15, :_reduce_none,
- 2, 15, :_reduce_8,
- 1, 14, :_reduce_9,
- 2, 14, :_reduce_10,
- 1, 14, :_reduce_11,
- 3, 14, :_reduce_12,
- 2, 14, :_reduce_13,
- 1, 17, :_reduce_none,
- 2, 17, :_reduce_15,
- 1, 18, :_reduce_none,
- 1, 18, :_reduce_none,
- 2, 20, :_reduce_18,
- 2, 20, :_reduce_19,
- 3, 20, :_reduce_20,
- 3, 20, :_reduce_21,
- 1, 21, :_reduce_none,
- 2, 21, :_reduce_23,
- 1, 22, :_reduce_none,
- 1, 22, :_reduce_none,
- 1, 22, :_reduce_none,
- 1, 19, :_reduce_none,
- 1, 19, :_reduce_28,
- 1, 16, :_reduce_none,
- 1, 16, :_reduce_none,
- 1, 16, :_reduce_none ]
-
-racc_reduce_n = 32
-
-racc_shift_n = 43
-
-racc_action_table = [
-    12,     3,     4,     6,    15,     9,    31,    21,    42,    12,
-     3,     4,     6,    15,    23,    31,    21,    37,    12,     3,
-     4,     6,    15,    25,    20,    21,    12,     3,     4,     6,
-    15,    18,    20,    21,    12,     3,     4,     6,    15,    41,
-    31,    21,    12,     3,     4,     6,    15,    38,    27,    21,
-    12,     3,     4,     6,    15,    26,    27,    21,    12,     3,
-     4,     6,    15,    29,    31,    21,    12,     3,     4,     6,
-    15,   nil,   nil,    21,    12,     3,     4,     6,    15,   nil,
-   nil,    21,    12,     3,     4,     6,    15,   nil,   nil,    21,
-     3,     4,     6,     8,     3,     4,     6,    11 ]
-
-racc_action_check = [
-    36,    36,    36,    36,    36,     1,    36,    36,    36,    21,
-    21,    21,    21,    21,     9,    21,    21,    21,    11,    11,
-    11,    11,    11,    11,    11,    11,     8,     8,     8,     8,
-     8,     8,     8,     8,    33,    33,    33,    33,    33,    33,
-    33,    33,    35,    35,    35,    35,    35,    24,    24,    35,
-    27,    27,    27,    27,    27,    13,    13,    27,    15,    15,
-    15,    15,    15,    15,    15,    15,    39,    39,    39,    39,
-    39,   nil,   nil,    39,    20,    20,    20,    20,    20,   nil,
-   nil,    20,    16,    16,    16,    16,    16,   nil,   nil,    16,
-     0,     0,     0,     0,     5,     5,     5,     5 ]
-
-racc_action_pointer = [
-    87,     5,   nil,   nil,   nil,    91,   nil,   nil,    24,    14,
-   nil,    16,   nil,    48,   nil,    56,    80,   nil,   nil,   nil,
-    72,     7,   nil,   nil,    40,   nil,   nil,    48,   nil,   nil,
-   nil,   nil,   nil,    32,   nil,    40,    -2,   nil,   nil,    64,
-   nil,   nil,   nil ]
-
-racc_action_default = [
-    -1,   -32,    -2,   -29,   -30,   -32,   -31,    -7,   -32,   -32,
-    -8,   -32,   -27,   -32,   -28,   -32,    -9,   -14,    -5,   -16,
-   -11,   -32,   -17,    43,   -32,    -6,    -3,   -13,   -22,   -18,
-   -25,   -24,   -26,   -32,   -15,   -10,   -32,   -19,    -4,   -12,
-   -23,   -20,   -21 ]
-
-racc_goto_table = [
-    34,    35,     7,    30,    32,    33,     5,    10,    39,    30,
-    32,    36,    13,    40,     2,    24,    40,     1,   nil,    34,
-   nil,    30,    32,    34,    30,    32 ]
-
-racc_goto_check = [
-     7,     6,     5,     8,     9,    10,     4,     5,     6,     8,
-     9,    10,     3,    11,     2,     3,    11,     1,   nil,     7,
-   nil,     8,     9,     7,     8,     9 ]
-
-racc_goto_pointer = [
-   nil,    17,    14,     4,     6,     2,   -19,   -16,   -12,   -11,
-   -10,   -20 ]
-
-racc_goto_default = [
-   nil,   nil,   nil,   nil,   nil,    14,    16,    17,    19,    22,
-   nil,    28 ]
-
-racc_token_table = {
- false => 0,
- Object.new => 1,
- :TOKEN => 2,
- :SPACE => 3,
- :NEWLINE => 4,
- :COMMENT => 5,
- "(" => 6,
- ")" => 7,
- "," => 8,
- "{" => 9,
- "}" => 10 }
-
-racc_use_result_var = true
-
-racc_nt_base = 11
-
-Racc_arg = [
- racc_action_table,
- racc_action_check,
- racc_action_default,
- racc_action_pointer,
- racc_goto_table,
- racc_goto_check,
- racc_goto_default,
- racc_goto_pointer,
- racc_nt_base,
- racc_reduce_table,
- racc_token_table,
- racc_shift_n,
- racc_reduce_n,
- racc_use_result_var ]
-
-Racc_token_to_s_table = [
-'$end',
-'error',
-'TOKEN',
-'SPACE',
-'NEWLINE',
-'COMMENT',
-'"("',
-'")"',
-'","',
-'"{"',
-'"}"',
-'$start',
-'target',
-'arguments',
-'argument_list',
-'space',
-'whitespace',
-'argument',
-'nested_token',
-'basic_token',
-'nested_sequence',
-'unnested_sequence',
-'any_token']
-
-Racc_debug_parser = false
-
-##### racc system variables end #####
-
- # reduce 0 omitted
-
- # reduce 1 omitted
-
-module_eval <<'.,.,', 'src/parameters.y', 13
-  def _reduce_2( val, _values, result )
- result = val[0]; yyaccept()
-   result
-  end
-.,.,
-
-module_eval <<'.,.,', 'src/parameters.y', 17
-  def _reduce_3( val, _values, result )
- result = val[1]
-   result
-  end
-.,.,
-
-module_eval <<'.,.,', 'src/parameters.y', 18
-  def _reduce_4( val, _values, result )
- result = val[2]
-   result
-  end
-.,.,
-
-module_eval <<'.,.,', 'src/parameters.y', 20
-  def _reduce_5( val, _values, result )
- result = ['']
-   result
-  end
-.,.,
-
-module_eval <<'.,.,', 'src/parameters.y', 21
-  def _reduce_6( val, _values, result )
- result = ['']
-   result
-  end
-.,.,
-
- # reduce 7 omitted
-
-module_eval <<'.,.,', 'src/parameters.y', 26
-  def _reduce_8( val, _values, result )
- result = val[0,2].join
-   result
-  end
-.,.,
-
-module_eval <<'.,.,', 'src/parameters.y', 30
-  def _reduce_9( val, _values, result )
- result = val[0,1]
-   result
-  end
-.,.,
-
-module_eval <<'.,.,', 'src/parameters.y', 31
-  def _reduce_10( val, _values, result )
- result = ['', val[1]]
-   result
-  end
-.,.,
-
-module_eval <<'.,.,', 'src/parameters.y', 32
-  def _reduce_11( val, _values, result )
- result = ['']
-   result
-  end
-.,.,
-
-module_eval <<'.,.,', 'src/parameters.y', 33
-  def _reduce_12( val, _values, result )
- result = val[0] << val[2]
-   result
-  end
-.,.,
-
-module_eval <<'.,.,', 'src/parameters.y', 34
-  def _reduce_13( val, _values, result )
- result = result = val[0] << ''
-   result
-  end
-.,.,
-
- # reduce 14 omitted
-
-module_eval <<'.,.,', 'src/parameters.y', 39
-  def _reduce_15( val, _values, result )
- result = val[0,2].join
-   result
-  end
-.,.,
-
- # reduce 16 omitted
-
- # reduce 17 omitted
-
-module_eval <<'.,.,', 'src/parameters.y', 48
-  def _reduce_18( val, _values, result )
- result = val[0,2].join
-   result
-  end
-.,.,
-
-module_eval <<'.,.,', 'src/parameters.y', 49
-  def _reduce_19( val, _values, result )
- result = val[0,2].join
-   result
-  end
-.,.,
-
-module_eval <<'.,.,', 'src/parameters.y', 50
-  def _reduce_20( val, _values, result )
- result = val[0,3].join
-   result
-  end
-.,.,
-
-module_eval <<'.,.,', 'src/parameters.y', 51
-  def _reduce_21( val, _values, result )
- result = val[0,3].join
-   result
-  end
-.,.,
-
- # reduce 22 omitted
-
-module_eval <<'.,.,', 'src/parameters.y', 56
-  def _reduce_23( val, _values, result )
- result = val[0,2].join
-   result
-  end
-.,.,
-
- # reduce 24 omitted
-
- # reduce 25 omitted
-
- # reduce 26 omitted
-
- # reduce 27 omitted
-
-module_eval <<'.,.,', 'src/parameters.y', 70
-  def _reduce_28( val, _values, result )
- result = ' '
-   result
-  end
-.,.,
-
- # reduce 29 omitted
-
- # reduce 30 omitted
-
- # reduce 31 omitted
-
- def _reduce_none( val, _values, result )
-  result
- end
-
-  end   # class ArgumentParser
-
-end   # module Preprocessor