# # DO NOT MODIFY!!!! # This file is automatically generated by racc 1.4.5 # from racc grammer file "lib/parser.y". # require 'racc/parser' $:.unshift File.join(File.dirname(__FILE__)) require 'logger' require 'lib/util.rb' require 'lib/scanner.rb' $DEBUG = true module OpenEHR module ADL class Parser < Racc::Parser module_eval <<'..end lib/parser.y modeval..idbb16065644', 'lib/parser.y', 644 @@log = Logger.new('log/parser.log') @@dadl_scanner = OpenEHR::ADL::Scanner::DADL::RootScanner.new ###----------/* keywords */ --------------------------------------------- @@adl_reserved = { 'archetype' => :SYM_ARCHETYPE, 'adl_version' => :SYM_ADL_VERSION, 'controlled' => :SYM_IS_CONTROLLED, 'specialize' => :SYM_SPECIALIZE, 'concept' => :SYM_CONCEPT, 'language' => :SYM_LANGUAGE, 'description' => :SYM_DESCRIPTION, 'definition' => :SYM_DEFINITION, 'invariant' => :SYM_INVARIANT, 'ontology' => :SYM_ONTOLOGY, 'matches' => :SYM_MATCHES, 'is_in' => :SYM_MATCHES, 'occurrences' => :SYM_OCCURRENCES, 'true' => :SYM_TRUE, #[Tt][Rr][Uu][Ee] -- -> SYM_TRUE 'false' => :SYM_FALSE, # [Ff][Aa][Ll][Ss][Ee] -- -> SYM_FALSE 'infinity' => :SYM_INFINITY # [Ii][Nn][Ff][Ii][Nn][Ii][Tt][Yy] -- -> SYM_INFINITY } @@dadl_reserved = { 'true' => :SYM_TRUE, #[Tt][Rr][Uu][Ee] -- -> SYM_TRUE 'false' => :SYM_FALSE, # [Ff][Aa][Ll][Ss][Ee] -- -> SYM_FALSE 'infinity' => :SYM_INFINITY # [Ii][Nn][Ff][Ii][Nn][Ii][Tt][Yy] -- -> SYM_INFINITY } @@cadl_reserved = { 'then' => :SYM_THEN, # [Tt][Hh][Ee][Nn] 'else' => :SYM_ELSE, # [Ee][Ll][Ss][Ee] 'and' => :SYM_AND, # [Aa][Nn][Dd] 'or' => :SYM_OR, # [Oo][Rr] 'xor' => :SYM_XOR, # [Xx][Oo][Rr] 'not' => :SYM_NOT, # [Nn][Oo][Tt] 'implies' => :SYM_IMPLIES, # [Ii][Mm][Pp][Ll][Ii][Ee][Ss] 'true' => :SYM_TRUE, #[Tt][Rr][Uu][Ee] -- -> SYM_TRUE 'false' => :SYM_FALSE, # [Ff][Aa][Ll][Ss][Ee] -- -> SYM_FALSE 'forall' => :SYM_FORALL, # [Ff][Oo][Rr][_][Aa][Ll][Ll] 'exists' => :SYM_EXISTS, # [Ee][Xx][Ii][Ss][Tt][Ss] 'existence' => :SYM_EXISTENCE, # [Ee][Xx][Iu][Ss][Tt][Ee][Nn][Cc][Ee] 'occurrences' => :SYM_OCCURRENCES, # [Oo][Cc][Cc][Uu][Rr][Rr][Ee][Nn][Cc][Ee][Ss] 'cardinality' => :SYM_CARDINALITY, # [Cc][Aa][Rr][Dd][Ii][Nn][Aa][Ll][Ii][Tt][Yy] 'ordered' => :SYM_ORDERED, # [Oo][Rr][Dd][Ee][Rr][Ee][Dd] 'unordered' => :SYM_UNORDERED, # [Uu][Nn][Oo][Rr][Dd][Ee][Rr][Ee][Dd] 'unique' => :SYM_UNIQUE, # [Uu][Nn][Ii][Qq][Uu][Ee] 'matches' => :SYM_MATCHES, # [Mm][Aa][Tt][Cc][Hh][Ee][Ss] 'is_in' => :SYM_MATCHES, # [Ii][Ss][_][Ii][Nn] 'invariant' => :SYM_INVARIANT, # [Ii][Nn][Vv][Aa][Rr][Ii][Aa][Nn][Tt] 'infinity' => :SYM_INFINITY, # [Ii][Nn][Ff][Ii][Nn][Ii][Tt][Yy] -- -> SYM_INFINITY 'use_node' => :SYM_USE_NODE, # [Uu][Ss][Ee][_][Nn][Oo][Dd][Ee] 'use_archetype' => :SYM_ALLOW_ARCHETYPE, # [Uu][Ss][Ee][_][Aa][Rr][Cc][Hh][Ee][Tt][Yy][Pp][Ee] 'allow_archetype' => :SYM_ALLOW_ARCHETYPE, # [Aa][Ll][Ll][Oo][Ww][_][Aa][Rr][Cc][Hh][Ee][Tt][Yy][Pp][Ee] 'include' => :SYM_INCLUDE, # [Ii][Nn][Cc][Ll][Uu][Dd][Ee] 'exclude' => :SYM_EXCLUDE # [Ee][Xx][Cc][Ll][Uu][Dd][Ee] } ###----------/* Scanner */ ----------------------------------------------- def scan until @data.nil? do case @adl_type.last when :adl @data = scan_adl(@data) do |sym, val| yield sym, val end when :dadl @data = scan_dadl(@data) do |sym, val| yield sym, val end when :cadl @data = scan_cadl(@data) do |sym, val| yield sym, val end when :regexp @data = scan_regexp(@data) do |sym, val| yield sym, val end else raise end @data = $' # variable $' receives the string after the match end yield :EOF, nil yield false, '$' end # of scan def scan_adl(data) until data.nil? do case @adl_type.last when :adl # puts "Entering scan_adl" case data when /\A\n/ # carriage return @lineno += 1 ; when /\A[ \t\r\f]+/ #just drop it ; when /\A--.*\n/ # single line comment @lineno += 1 ; when /\Adescription/ # description yield :SYM_DESCRIPTION, :SYM_DESCRIPTION when /\Adefinition/ # definition yield :SYM_DEFINITION, :SYM_DEFINITION # @adl_type.push(:cadl) ###----------/* symbols */ ------------------------------------------------- when /\A[A-Z][a-zA-Z0-9_]*/ yield :V_TYPE_IDENTIFIER, $& when /\A[a-zA-Z][a-zA-Z0-9_-]+\.[a-zA-Z][a-zA-Z0-9_-]+\.[a-zA-Z0-9]+/ #V_ARCHETYPE_ID yield :V_ARCHETYPE_ID, $& when /\A[a-z][a-zA-Z0-9_]*/ # word = $&.downcase word = $& if @@adl_reserved[word] yield @@adl_reserved[word], @@adl_reserved[word] elsif #/\A[A-Z][a-zA-Z0-9_]*/ yield :V_ATTRIBUTE_IDENTIFIER, $& end when /\A\=/ # = yield :SYM_EQ, :SYM_EQ when /\A\>=/ # >= yield :SYM_GE, :SYM_GE when /\A\<=/ # <= yield :SYM_LE, :SYM_LE when /\A\/ # > if @in_interval yield :SYM_GT, :SYM_GT else adl_type = @adl_type.pop # puts "Escaping #{adl_type}" assert_at(__FILE__,__LINE__){adl_type == :dadl} yield :SYM_END_DBLOCK, :SYM_END_DBLOCK end when /\A\{/ # { @adl_type.push(:cadl) yield :SYM_START_CBLOCK, :SYM_START_CBLOCK when /\A\}/ # } adl_type = @adl_type.pop # puts "Escaping #{adl_type}" assert_at(__FILE__,__LINE__){adl_type == :cadl} yield :SYM_END_CBLOCK, $& when /\A\-/ # - yield :Minus_code, :Minus_code when /\A\+/ # + yield :Plus_code, :Plus_code when /\A\*/ # * yield :Star_code, :Star_code when /\A\// # / yield :Slash_code, :Slash_code when /\A\^/ # ^ yield :Caret_code, :Caret_code when /\A\=/ # = yield :Equal_code, :Equal_code when /\A\.\.\./ # ... yield :SYM_LIST_CONTINUE, :SYM_LIST_CONTINUE when /\A\.\./ # .. yield :SYM_ELLIPSIS, :SYM_ELLIPSIS when /\A\./ # . yield :Dot_code, :Dot_code when /\A\;/ # ; yield :Semicolon_code, :Semicolon_code when /\A\,/ # , yield :Comma_code, :Comma_code when /\A\:/ # : yield :Colon_code, :Colon_code when /\A\!/ # ! yield :Exclamation_code, :Exclamation_code when /\A\(/ # ( yield :Left_parenthesis_code, :Left_parenthesis_code when /\A\)/ # ) yield :Right_parenthesis_code, :Right_parenthesis_code when /\A\$/ # $ yield :Dollar_code, :Dollar_code when /\A\?\?/ # ?? yield :SYM_DT_UNKNOWN, :SYM_DT_UNKNOWN when /\A\?/ # ? yield :Question_mark_code, :Question_mark_code when /\A[0-9]+\.[0-9]+(\.[0-9]+)*/ # ? yield :V_VERSION_STRING, :V_VERSION_STRING when /\A\|/ # | if @in_interval @in_interval = false # elsif @start_block_received else @in_interval = true @start_block_received = false end yield :SYM_INTERVAL_DELIM, :SYM_INTERVAL_DELIM when /\A\[[a-zA-Z0-9()\._-]+::[a-zA-Z0-9\._-]+\]/ # when /\A\[[a-zA-Z0-9()\._-]+\:\:[a-zA-Z0-9\._-]+\]/ #V_QUALIFIED_TERM_CODE_REF form [ICD10AM(1998)::F23] yield :V_QUALIFIED_TERM_CODE_REF, $& when /\A\[[a-zA-Z0-9][a-zA-Z0-9._\-]*\]/ #V_LOCAL_TERM_CODE_REF yield :V_LOCAL_TERM_CODE_REF, $& when /\A\[/ # [ yield :Left_bracket_code, :Left_bracket_code when /\A\]/ # ] yield :Right_bracket_code, :Right_bracket_code when /\A\[[a-zA-Z0-9._\- ]+::[a-zA-Z0-9._\- ]+\]/ #ERR_V_QUALIFIED_TERM_CODE_REF yield :ERR_V_QUALIFIED_TERM_CODE_REF, $& when /\Aa[ct][0-9.]+/ #V_LOCAL_CODE yield :V_LOCAL_CODE, $& when /\A[0-9]{4}-[0-1][0-9]-[0-3][0-9]T[0-2][0-9]:[0-6][0-9]:[0-6][0-9](,[0-9]+)?(Z|[+-][0-9]{4})?|[0-9]{4}-[0-1][0-9]-[0-3][0-9]T[0-2][0-9]:[0-6][0-9](Z|[+-][0-9]{4})?|[0-9]{4}-[0-1][0-9]-[0-3][0-9]T[0-2][0-9](Z|[+-][0-9]{4})?/ #V_ISO8601_EXTENDED_DATE_TIME YYYY-MM-DDThh:mm:ss[,sss][Z|+/- -n-n-n-n-]- yield :V_ISO8601_EXTENDED_DATE_TIME, $& when /\A[0-2][0-9]:[0-6][0-9]:[0-6][0-9](,[0-9]+)?(Z|[+-][0-9]{4})?|[0-2][0-9]:[0-6][0-9](Z|[+-][0-9]{4})? / #V_ISO8601_EXTENDED_TIME hh:mm:ss[,sss][Z|+/-nnnn] yield :V_ISO8601_EXTENDED_TIME, $& when /\A[0-9]{4}-[0-1][0-9]-[0-3][0-9]|[0-9]{4}-[0-1][0-9]/ #V_ISO8601_EXTENDED_DATE YYYY-MM-DD yield :V_ISO8601_EXTENDED_DATE, $& when /\A[A-Z][a-zA-Z0-9_]*<[a-zA-Z0-9,_<>]+>/ #V_GENERIC_TYPE_IDENTIFIER yield :V_GENERIC_TYPE_IDENTIFIER, $& when /\A[0-9]+|[0-9]+[eE][+-]?[0-9]+/ #V_INTEGER yield :V_INTEGER, $& when /\A[0-9]+\.[0-9]+|[0-9]+\.[0-9]+[eE][+-]?[0-9]+ / #V_REAL yield :V_REAL, $& # when /\A"((?:[^"\\]+|\\.)*)"/ #V_STRING when /\A"([^"]*)"/m #V_STRING yield :V_STRING, $1 when /\A[a-z]+:\/\/[^<>|\\{}^~"\[\] ]*/ #V_URI yield :V_URI, $& when /\AP([0-9]+[yY])?([0-9]+[mM])?([0-9]+[wW])?([0-9]+[dD])?T([0-9]+[hH])?([0-9]+[mM])?([0-9]+[sS])?|P([0-9]+[yY])?([0-9]+[mM])?([0-9]+[wW])?([0-9]+[dD])?/ #V_ISO8601_DURATION PnYnMnWnDTnnHnnMnnS yield :V_ISO8601_DURATION, $& when /\A\S/ #UTF8CHAR yield :UTF8CHAR, $& end data = $' # variable $' receives the string after the match when :dadl # puts "Entering scan_dadl" data = scan_dadl(data) do |sym, val| yield sym, val end when :cadl # puts "Entering scan_cadl" data = scan_cadl(data) do |sym, val| yield sym, val end when :regexp # puts "Entering scan_regexp" data = scan_regexp(data) do |sym, val| yield sym, val end when :term_constraint # puts "Entering scan_term_constraint" data = scan_term_constraint(data) do |sym, val| yield sym, val end else raise end end end # scan_adl def scan_cadl(data) until data.nil? do case @adl_type.last when :cadl # puts "Entering scan_cadl" case data when /\A\n/ # carriage return @lineno += 1 ; when /\A[ \t\r\f]+/ #just drop it ; when /\A--.*\n/ # single line comment @lineno += 1 ; ###----------/* symbols */ ------------------------------------------------- when /\A\=/ # = yield :SYM_EQ, :SYM_EQ when /\A\>=/ # >= yield :SYM_GE, :SYM_GE when /\A\<=/ # <= yield :SYM_LE, :SYM_LE when /\A[A-Z][a-zA-Z0-9_]*[ \n]*\/ # > if @in_interval yield :SYM_GT, :SYM_GT else adl_type = @adl_type.pop # puts "Escaping #{adl_type}" assert_at(__FILE__,__LINE__){adl_type == :dadl} yield :SYM_END_DBLOCK, :SYM_END_DBLOCK end when /\A\-/ # - yield :Minus_code, :Minus_code when /\A\+/ # + yield :Plus_code, :Plus_code when /\A\*/ # * yield :Star_code, :Star_code when /\A\// # / yield :Slash_code, :Slash_code when /\A\^/ # ^ yield :Caret_code, :Caret_code when /\A\.\.\./ # ... yield :SYM_LIST_CONTINUE, :SYM_LIST_CONTINUE when /\A\.\./ # .. yield :SYM_ELLIPSIS, :SYM_ELLIPSIS when /\A\./ # . yield :Dot_code, :Dot_code when /\A\;/ # ; yield :Semicolon_code, :Semicolon_code when /\A\,/ # , yield :Comma_code, :Comma_code when /\A\:/ # : yield :Colon_code, :Colon_code when /\A\!/ # ! yield :Exclamation_code, :Exclamation_code when /\A\(/ # ( yield :Left_parenthesis_code, :Left_parenthesis_code when /\A\)/ # ) yield :Right_parenthesis_code, :Right_parenthesis_code when /\A\{\// #V_REGEXP if @adl_type.last != :regexp @in_regexp = true @adl_type.push(:regexp) yield :START_REGEXP_BLOCK, :START_REGEXP_BLOCK else raise end # yield :V_REGEXP, :V_REGEXP when /\A\{/ # { @adl_type.push(:cadl) yield :SYM_START_CBLOCK, :SYM_START_CBLOCK when /\A\}/ # } adl_type = @adl_type.pop # puts "Escaping #{adl_type}" assert_at(__FILE__,__LINE__){adl_type == :cadl} yield :SYM_END_CBLOCK, :SYM_END_CBLOCK when /\A\$/ # $ yield :Dollar_code, :Dollar_code when /\A\?\?/ # ?? yield :SYM_DT_UNKNOWN, :SYM_DT_UNKNOWN when /\A\?/ # ? yield :Question_mark_code, :Question_mark_code when /\A\|/ # | if @in_interval @in_interval = false else @in_interval = false end yield :SYM_INTERVAL_DELIM, :SYM_INTERVAL_DELIM when /\A\[[a-zA-Z0-9._\-]+::[a-zA-Z0-9._\-]+\]/ #V_QUALIFIED_TERM_CODE_REF form [ICD10AM(1998)::F23] yield :V_QUALIFIED_TERM_CODE_REF, $& when /\A\[[a-zA-Z0-9._\- ]+::[a-zA-Z0-9._\- ]+\]/ #ERR_V_QUALIFIED_TERM_CODE_REF yield :ERR_V_QUALIFIED_TERM_CODE_REF, $& # when /\A\[([a-zA-Z0-9()._\-]+::[a-zA-Z0-9._\_-]+)\]/ # yield :V_TERM_CODE_CONSTRAINT, :V_TERM_CODE_CONSTRAINT when /\A\[[a-zA-Z0-9\(\)\._\-]+::[ \t\n]*/ @adl_type.push(:term_constraint) yield :START_TERM_CODE_CONSTRAINT, $& when /\A\[[a-zA-Z0-9][a-zA-Z0-9._\-]*\]/ #V_LOCAL_TERM_CODE_REF yield :V_LOCAL_TERM_CODE_REF, $& when /\A\[/ # [ yield :Left_bracket_code, :Left_bracket_code when /\A\]/ # ] yield :Right_bracket_code, :Right_bracket_code when /\A[A-Z][a-zA-Z0-9_]*<[a-zA-Z0-9,_<>]+>/ #V_GENERIC_TYPE_IDENTIFIER yield :V_GENERIC_TYPE_IDENTIFIER, $& when /\A[yY][yY][yY][yY]-[mM?X][mM?X]-[dD?X][dD?X][T\t][hH?X][hH?X]:[mM?X][mM?X]:[sS?X][sS?X]/ yield :V_ISO8601_DATE_TIME_CONSTRAINT_PATTERN, $& when /\A[yY][yY][yY][yY]-[mM?X][mM?X]-[dD?X][dD?X]/ yield :V_ISO8601_DATE_CONSTRAINT_PATTERN, $& when /\A[hH][hH]:[mM?X][mM?X]:[sS?X][sS?X]/ yield :V_ISO8601_TIME_CONSTRAINT_PATTERN, $& when /\A[a-z][a-zA-Z0-9_]*/ word = $&.dup if @@cadl_reserved[word.downcase] yield @@cadl_reserved[word.downcase], @@cadl_reserved[word.downcase] else yield :V_ATTRIBUTE_IDENTIFIER, word #V_ATTRIBUTE_IDENTIFIER /\A[a-z][a-zA-Z0-9_]*/ end when /\A[A-Z][a-zA-Z0-9_]*/ word = $&.dup if @@cadl_reserved[word.downcase] yield @@cadl_reserved[word.downcase], @@cadl_reserved[word.downcase] else yield :V_TYPE_IDENTIFIER, $& end when /\Aa[ct][0-9.]+/ #V_LOCAL_CODE yield :V_LOCAL_CODE, $& when /\A[0-9]{4}-[0-1][0-9]-[0-3][0-9]T[0-2][0-9]:[0-6][0-9]:[0-6][0-9](,[0-9]+)?(Z|[+-][0-9]{4})?|[0-9]{4}-[0-1][0-9]-[0-3][0-9]T[0-2][0-9]:[0-6][0-9](Z|[+-][0-9]{4})?|[0-9]{4}-[0-1][0-9]-[0-3][0-9]T[0-2][0-9](Z|[+-][0-9]{4})?/ #V_ISO8601_EXTENDED_DATE_TIME YYYY-MM-DDThh:mm:ss[,sss][Z|+/- -n-n-n-n-]- yield :V_ISO8601_EXTENDED_DATE_TIME, $& when /\A[0-2][0-9]:[0-6][0-9]:[0-6][0-9](,[0-9]+)?(Z|[+-][0-9]{4})?|[0-2][0-9]:[0-6][0-9](Z|[+-][0-9]{4})? / #V_ISO8601_EXTENDED_TIME hh:mm:ss[,sss][Z|+/-nnnn] yield :V_ISO8601_EXTENDED_TIME, $& when /\A[0-9]{4}-[0-1][0-9]-[0-3][0-9]|[0-9]{4}-[0-1][0-9]/ #V_ISO8601_EXTENDED_DATE YYYY-MM-DD yield :V_ISO8601_EXTENDED_DATE, $& when /\A[0-9]+|[0-9]+[eE][+-]?[0-9]+/ #V_INTEGER yield :V_INTEGER, $& when /\A[0-9]+\.[0-9]+|[0-9]+\.[0-9]+[eE][+-]?[0-9]+ / #V_REAL yield :V_REAL, $& # when /\A"((?:[^"\\]+|\\.)*)"/ #V_STRING when /\A"([^"]*)"/m #V_STRING yield :V_STRING, $1 when /\A[a-z]+:\/\/[^<>|\\{}^~"\[\] ]*/ #V_URI yield :V_URI, $& when /\AP([0-9]+[yY])?([0-9]+[mM])?([0-9]+[wW])?([0-9]+[dD])?T([0-9]+[hH])?([0-9]+[mM])?([0-9]+[sS])?|P([0-9]+[yY])?([0-9]+[mM])?([0-9]+[wW])?([0-9]+[dD])?/ #V_ISO8601_DURATION PnYnMnWnDTnnHnnMnnS yield :V_ISO8601_DURATION, $& when /\A\S/ #UTF8CHAR yield :UTF8CHAR, $& else raise end data = $' # variable $' receives the string after the match when :adl # puts "Entering scan_adl" data = scan_adl(data) do |sym, val| yield sym, val end when :dadl # puts "Entering scan_dadl" data = scan_dadl(data) do |sym, val| yield sym, val end when :regexp # puts "Entering scan_regexp" data = scan_regexp(data) do |sym, val| yield sym, val end when :term_constraint # puts "Entering scan_term_constraint" data = scan_term_constraint(data) do |sym, val| yield sym, val end else raise end end # of until end # of scan_cadl def scan_dadl(data) until data.nil? do case @adl_type.last when :dadl # puts "Entering scan_dadl" case scanned = @@dadl_scanner.parse(data) when Yaparc::Result::OK yield scanned.value data = scanned.input ### when Yaparc::Result::Fail ### raise "Scan Failed: #{scanned}" ### when Yaparc::Result::Error ### raise "Scan Error: #{scanned}" else end case data when /\A\n/ # carriage return @lineno += 1 ; when /\A[ \t\r\f]+/ #just drop it ; when /\A--.*\n/ # single line comment @lineno += 1 ; ###----------/* symbols */ ------------------------------------------------- when /\A\=/ # = yield :SYM_EQ, :SYM_EQ when /\A\>\=/ # >= yield :SYM_GE, :SYM_GE when /\A\<\=/ # <= yield :SYM_LE, :SYM_LE when /\A\/ # > if @in_interval @in_interval = false yield :SYM_GT, :SYM_GT elsif @in_c_domain_type == true assert_at(__FILE__,__LINE__){@adl_type.last == :dadl} adl_type = @adl_type.pop if @adl_type.last == :cadl @in_c_domain_type = false yield :END_V_C_DOMAIN_TYPE_BLOCK, $& else yield :SYM_END_DBLOCK, $& end elsif @in_c_domain_type == false adl_type = @adl_type.pop # puts "Escaping #{adl_type}" assert_at(__FILE__,__LINE__){adl_type == :dadl} yield :SYM_END_DBLOCK, $& else raise end when /\A\-/ # - yield :Minus_code, :Minus_code when /\A\+/ # + yield :Plus_code, :Plus_code when /\A\*/ # * yield :Star_code, :Star_code when /\A\// # / yield :Slash_code, :Slash_code when /\A\^/ # ^ yield :Caret_code, :Caret_code when /\A\.\.\./ # ... yield :SYM_LIST_CONTINUE, :SYM_LIST_CONTINUE when /\A\.\./ # .. yield :SYM_ELLIPSIS, :SYM_ELLIPSIS when /\A\./ # . yield :Dot_code, :Dot_code when /\A\;/ # ; yield :Semicolon_code, :Semicolon_code when /\A\,/ # , yield :Comma_code, :Comma_code when /\A\:/ # : yield :Colon_code, :Colon_code when /\A\!/ # ! yield :Exclamation_code, :Exclamation_code when /\A\(/ # ( yield :Left_parenthesis_code, :Left_parenthesis_code when /\A\)/ # ) yield :Right_parenthesis_code, :Right_parenthesis_code when /\A\$/ # $ yield :Dollar_code, :Dollar_code when /\A\?\?/ # ?? yield :SYM_DT_UNKNOWN, :SYM_DT_UNKNOWN when /\A\?/ # ? yield :Question_mark_code, :Question_mark_code when /\A\|/ # | if @in_interval @in_interval = false else @in_interval = false end yield :SYM_INTERVAL_DELIM, :SYM_INTERVAL_DELIM ### when /\A\[[a-zA-Z0-9()\._-]+::[a-zA-Z0-9\._-]+\]/ #V_QUALIFIED_TERM_CODE_REF form [ICD10AM(1998)::F23] ### yield :V_QUALIFIED_TERM_CODE_REF, $& ### when /\A\[[a-zA-Z0-9][a-zA-Z0-9._\-]*\]/ #V_LOCAL_TERM_CODE_REF ### yield :V_LOCAL_TERM_CODE_REF, $& when /\A\[[a-zA-Z0-9._\- ]+::[a-zA-Z0-9._\- ]+\]/ #ERR_V_QUALIFIED_TERM_CODE_REF yield :ERR_V_QUALIFIED_TERM_CODE_REF, $& when /\A\[/ # [ yield :Left_bracket_code, :Left_bracket_code when /\A\]/ # ] yield :Right_bracket_code, :Right_bracket_code when /\A[A-Z][a-zA-Z0-9_-]*/ yield :V_TYPE_IDENTIFIER, $& when /\A[A-Z][a-zA-Z0-9_]*<[a-zA-Z0-9,_<>]+>/ #V_GENERIC_TYPE_IDENTIFIER yield :V_GENERIC_TYPE_IDENTIFIER, $& when /\A[a-z][a-zA-Z0-9_]*/ word = $&.downcase if @@dadl_reserved[word] yield @@dadl_reserved[word], @@dadl_reserved[word] else yield :V_ATTRIBUTE_IDENTIFIER, $& end when /\Aa[ct][0-9.]+/ #V_LOCAL_CODE yield :V_LOCAL_CODE, $& when /\A[0-9]{4}-[0-1][0-9]-[0-3][0-9]T[0-2][0-9]:[0-6][0-9]:[0-6][0-9](,[0-9]+)?(Z|[+-][0-9]{4})?|[0-9]{4}-[0-1][0-9]-[0-3][0-9]T[0-2][0-9]:[0-6][0-9](Z|[+-][0-9]{4})?|[0-9]{4}-[0-1][0-9]-[0-3][0-9]T[0-2][0-9](Z|[+-][0-9]{4})?/ #V_ISO8601_EXTENDED_DATE_TIME YYYY-MM-DDThh:mm:ss[,sss][Z|+/- -n-n-n-n-]- yield :V_ISO8601_EXTENDED_DATE_TIME, $& when /\A[0-2][0-9]:[0-6][0-9]:[0-6][0-9](,[0-9]+)?(Z|[+-][0-9]{4})?|[0-2][0-9]:[0-6][0-9](Z|[+-][0-9]{4})? / #V_ISO8601_EXTENDED_TIME hh:mm:ss[,sss][Z|+/-nnnn] yield :V_ISO8601_EXTENDED_TIME, $& when /\A[0-9]{4}-[0-1][0-9]-[0-3][0-9]|[0-9]{4}-[0-1][0-9]/ #V_ISO8601_EXTENDED_DATE YYYY-MM-DD yield :V_ISO8601_EXTENDED_DATE, $& when /\A[A-Z][a-zA-Z0-9_]*<[a-zA-Z0-9,_<>]+>/ #V_GENERIC_TYPE_IDENTIFIER yield :V_GENERIC_TYPE_IDENTIFIER, $& when /\A[0-9]+|[0-9]+[eE][+-]?[0-9]+/ #V_INTEGER yield :V_INTEGER, $& when /\A[0-9]+\.[0-9]+|[0-9]+\.[0-9]+[eE][+-]?[0-9]+ / #V_REAL yield :V_REAL, $& # when /\A"((?:[^"\\]+|\\.)*)"/ #V_STRING when /\A"([^"]*)"/m #V_STRING yield :V_STRING, $1 when /\A[a-z]+:\/\/[^<>|\\{}^~"\[\] ]*/ #V_URI yield :V_URI, $& when /\AP([0-9]+[yY])?([0-9]+[mM])?([0-9]+[wW])?([0-9]+[dD])?T([0-9]+[hH])?([0-9]+[mM])?([0-9]+[sS])?|P([0-9]+[yY])?([0-9]+[mM])?([0-9]+[wW])?([0-9]+[dD])?/ #V_ISO8601_DURATION PnYnMnWnDTnnHnnMnnS yield :V_ISO8601_DURATION, $& when /\A\S/ #UTF8CHAR yield :UTF8CHAR, $& end data = $' # variable $' receives the string after the match when :adl # puts "Entering scan_adl" data = scan_adl(data) do |sym, val| yield sym, val end when :cadl # puts "Entering scan_cadl" data = scan_cadl(data) do |sym, val| yield sym, val end when :regexp # puts "Entering scan_regexp" data = scan_regexp(data) do |sym, val| yield sym, val end when :term_constraint # puts "Entering scan_term_constraint" data = scan_term_constraint(data) do |sym, val| yield sym, val end else raise end end end # of scan_dadl def scan_regexp(data) until data.nil? do case @adl_type.last when :regexp # puts "Entering scan_regexp" case data when /\A\/\}/ #V_REGEXP if @adl_type.last == :regexp @in_regexp = false @adl_type.pop yield :END_REGEXP_BLOCK, :END_REGEXP_BLOCK else raise end when /\A(.*)(\/\})/ #V_REGEXP yield :REGEXP_BODY, $1 if @adl_type.last == :regexp @in_regexp = false @adl_type.pop yield :END_REGEXP_BLOCK, :END_REGEXP_BLOCK else raise end else raise data end data = $' # variable $' receives the string after the match when :adl # puts "Entering scan_adl" data = scan_adl(data) do |sym, val| yield sym, val end when :dadl # puts "Entering scan_dadl" data = scan_dadl(data) do |sym, val| yield sym, val end when :cadl # puts "Entering scan_cadl" data = scan_cadl(data) do |sym, val| yield sym, val end when :term_constraint # puts "Entering scan_term_constraint" data = scan_term_constraint(data) do |sym, val| yield sym, val end else raise end end end # of scan_regexp def scan_term_constraint(data) until data.nil? do case @adl_type.last when :term_constraint # puts "Entering scan_term_constraint" case data when /\A\n/ # carriage return @lineno += 1 ; when /\A[ \t\r\f]+/ #just drop it ; when /\A--.*$/ # single line comment @lineno += 1 ; when /\A[a-zA-Z0-9\._\-]+[ \t]*,/ # match any line, with ',' termination yield :TERM_CODE, $& when /\A[a-zA-Z0-9\._\-]+[ \t]*;/ #match second last line with ';' termination (assumed value) yield :TERM_CODE, $& # when /\A[a-zA-Z0-9\._\-]+[ \t]*\]/ # match final line, terminating in ']' when /\A[a-zA-Z0-9\._\-]*[ \t]*\]/ # match final line, terminating in ']' adl_type = @adl_type.pop assert_at(__FILE__,__LINE__){adl_type == :term_constraint} yield :END_TERM_CODE_CONSTRAINT, $& else raise "data = #{data}" end data = $' # variable $' receives the string after the match when :adl # puts "Entering scan_adl" data = scan_adl(data) do |sym, val| yield sym, val end when :dadl # puts "Entering scan_dadl" data = scan_dadl(data) do |sym, val| yield sym, val end when :cadl # puts "Entering scan_cadl" data = scan_cadl(data) do |sym, val| yield sym, val end else raise end end end # of scan_term_constraint def parse(data, filename, lineno = 1, debug = false) @yydebug = true @parsestring = data @data = data @lineno = lineno @filename = filename @adl_type = [:adl] # {:adl, :cadl, :dadl} @in_regexp = false @in_interval = false @in_c_domain_type = false yyparse self, :scan end def on_error( t, v, values) raise Racc::ParseError, "#{@filename}:#{@lineno}: Inline syntax error on #{v.inspect}" end ### Local Variables: ### mode:ruby ### mode:font-lock ### comment-column:0 ### comment-start: "### " ### comment-end:"" ### End: ..end lib/parser.y modeval..idbb16065644 ##### racc 1.4.5 generates ### racc_reduce_table = [ 0, 0, :racc_error, 2, 94, :_reduce_none, 1, 94, :_reduce_none, 8, 95, :_reduce_none, 2, 96, :_reduce_none, 2, 96, :_reduce_none, 1, 104, :_reduce_none, 2, 104, :_reduce_none, 3, 105, :_reduce_none, 1, 106, :_reduce_none, 3, 106, :_reduce_none, 3, 107, :_reduce_none, 1, 107, :_reduce_none, 0, 97, :_reduce_none, 2, 97, :_reduce_none, 2, 97, :_reduce_none, 2, 98, :_reduce_none, 2, 98, :_reduce_none, 0, 99, :_reduce_none, 2, 99, :_reduce_19, 2, 99, :_reduce_none, 0, 100, :_reduce_none, 2, 100, :_reduce_none, 2, 100, :_reduce_none, 2, 101, :_reduce_none, 2, 101, :_reduce_none, 1, 109, :_reduce_none, 1, 109, :_reduce_none, 5, 110, :_reduce_none, 5, 110, :_reduce_none, 2, 112, :_reduce_none, 1, 114, :_reduce_31, 2, 114, :_reduce_32, 1, 113, :_reduce_none, 1, 113, :_reduce_none, 1, 119, :_reduce_none, 1, 119, :_reduce_none, 1, 119, :_reduce_none, 1, 119, :_reduce_none, 1, 119, :_reduce_none, 1, 119, :_reduce_none, 1, 119, :_reduce_none, 1, 119, :_reduce_none, 1, 119, :_reduce_none, 1, 119, :_reduce_none, 3, 126, :_reduce_none, 4, 120, :_reduce_none, 3, 120, :_reduce_none, 6, 121, :_reduce_none, 2, 128, :_reduce_none, 2, 131, :_reduce_none, 3, 131, :_reduce_none, 2, 131, :_reduce_none, 1, 125, :_reduce_none, 1, 132, :_reduce_none, 1, 132, :_reduce_none, 1, 132, :_reduce_none, 1, 132, :_reduce_none, 1, 132, :_reduce_none, 1, 132, :_reduce_none, 1, 132, :_reduce_none, 1, 132, :_reduce_none, 1, 117, :_reduce_none, 1, 118, :_reduce_none, 2, 118, :_reduce_none, 5, 141, :_reduce_none, 5, 141, :_reduce_none, 5, 141, :_reduce_none, 2, 142, :_reduce_none, 3, 142, :_reduce_none, 1, 143, :_reduce_none, 2, 143, :_reduce_none, 1, 143, :_reduce_none, 0, 129, :_reduce_none, 2, 129, :_reduce_none, 0, 130, :_reduce_none, 2, 130, :_reduce_none, 1, 146, :_reduce_none, 2, 146, :_reduce_none, 3, 147, :_reduce_none, 1, 147, :_reduce_none, 3, 147, :_reduce_none, 0, 102, :_reduce_none, 2, 102, :_reduce_none, 2, 102, :_reduce_none, 2, 103, :_reduce_none, 2, 103, :_reduce_none, 1, 108, :_reduce_none, 1, 150, :_reduce_none, 1, 150, :_reduce_none, 1, 151, :_reduce_none, 2, 151, :_reduce_none, 3, 151, :_reduce_none, 3, 153, :_reduce_none, 1, 154, :_reduce_none, 2, 154, :_reduce_none, 1, 155, :_reduce_none, 1, 155, :_reduce_none, 1, 152, :_reduce_none, 1, 152, :_reduce_none, 1, 158, :_reduce_none, 2, 158, :_reduce_none, 3, 159, :_reduce_none, 1, 160, :_reduce_none, 1, 161, :_reduce_none, 2, 161, :_reduce_none, 3, 162, :_reduce_none, 3, 163, :_reduce_none, 1, 157, :_reduce_none, 2, 157, :_reduce_none, 2, 165, :_reduce_none, 3, 165, :_reduce_none, 1, 166, :_reduce_none, 1, 156, :_reduce_none, 2, 156, :_reduce_none, 3, 167, :_reduce_none, 1, 168, :_reduce_none, 1, 168, :_reduce_none, 1, 168, :_reduce_none, 1, 168, :_reduce_none, 1, 168, :_reduce_none, 1, 164, :_reduce_none, 1, 164, :_reduce_none, 1, 164, :_reduce_none, 1, 164, :_reduce_none, 1, 164, :_reduce_none, 1, 164, :_reduce_none, 1, 164, :_reduce_none, 1, 164, :_reduce_none, 1, 164, :_reduce_none, 1, 164, :_reduce_none, 1, 169, :_reduce_none, 1, 169, :_reduce_none, 1, 169, :_reduce_none, 1, 169, :_reduce_none, 1, 169, :_reduce_none, 1, 169, :_reduce_none, 1, 169, :_reduce_none, 1, 169, :_reduce_none, 1, 169, :_reduce_none, 1, 170, :_reduce_none, 1, 170, :_reduce_none, 1, 170, :_reduce_none, 1, 170, :_reduce_none, 1, 170, :_reduce_none, 1, 170, :_reduce_none, 1, 116, :_reduce_none, 1, 116, :_reduce_none, 1, 173, :_reduce_none, 3, 183, :_reduce_none, 3, 183, :_reduce_none, 3, 183, :_reduce_none, 1, 174, :_reduce_none, 2, 174, :_reduce_none, 2, 174, :_reduce_none, 3, 184, :_reduce_none, 3, 184, :_reduce_none, 3, 184, :_reduce_none, 5, 192, :_reduce_none, 6, 192, :_reduce_none, 6, 192, :_reduce_none, 7, 192, :_reduce_none, 4, 192, :_reduce_none, 4, 192, :_reduce_none, 4, 192, :_reduce_none, 4, 192, :_reduce_none, 3, 192, :_reduce_none, 1, 175, :_reduce_none, 2, 175, :_reduce_none, 2, 175, :_reduce_none, 3, 185, :_reduce_none, 3, 185, :_reduce_none, 3, 185, :_reduce_none, 5, 193, :_reduce_none, 6, 193, :_reduce_none, 6, 193, :_reduce_none, 7, 193, :_reduce_none, 4, 193, :_reduce_none, 4, 193, :_reduce_none, 4, 193, :_reduce_none, 4, 193, :_reduce_none, 3, 193, :_reduce_none, 1, 176, :_reduce_none, 1, 176, :_reduce_none, 3, 186, :_reduce_none, 3, 186, :_reduce_none, 3, 186, :_reduce_none, 1, 177, :_reduce_none, 3, 187, :_reduce_none, 3, 187, :_reduce_none, 3, 187, :_reduce_none, 1, 178, :_reduce_none, 3, 188, :_reduce_none, 3, 188, :_reduce_none, 3, 188, :_reduce_none, 5, 194, :_reduce_none, 6, 194, :_reduce_none, 6, 194, :_reduce_none, 7, 194, :_reduce_none, 4, 194, :_reduce_none, 4, 194, :_reduce_none, 4, 194, :_reduce_none, 4, 194, :_reduce_none, 3, 194, :_reduce_none, 1, 179, :_reduce_none, 3, 189, :_reduce_none, 3, 189, :_reduce_none, 3, 189, :_reduce_none, 5, 195, :_reduce_none, 6, 195, :_reduce_none, 6, 195, :_reduce_none, 7, 195, :_reduce_none, 4, 195, :_reduce_none, 4, 195, :_reduce_none, 4, 195, :_reduce_none, 4, 195, :_reduce_none, 3, 195, :_reduce_none, 1, 180, :_reduce_none, 3, 190, :_reduce_none, 3, 190, :_reduce_none, 3, 190, :_reduce_none, 5, 196, :_reduce_none, 6, 196, :_reduce_none, 6, 196, :_reduce_none, 7, 196, :_reduce_none, 4, 196, :_reduce_none, 4, 196, :_reduce_none, 4, 196, :_reduce_none, 4, 196, :_reduce_none, 3, 196, :_reduce_none, 1, 181, :_reduce_none, 3, 191, :_reduce_none, 3, 191, :_reduce_none, 3, 191, :_reduce_none, 5, 197, :_reduce_none, 6, 197, :_reduce_none, 6, 197, :_reduce_none, 7, 197, :_reduce_none, 4, 197, :_reduce_none, 4, 197, :_reduce_none, 4, 197, :_reduce_none, 4, 197, :_reduce_none, 3, 197, :_reduce_none, 1, 171, :_reduce_none, 3, 172, :_reduce_none, 3, 172, :_reduce_none, 3, 172, :_reduce_none, 1, 182, :_reduce_none, 1, 111, :_reduce_none, 2, 111, :_reduce_none, 3, 198, :_reduce_none, 1, 198, :_reduce_none, 3, 198, :_reduce_none, 1, 149, :_reduce_none, 1, 149, :_reduce_none, 2, 200, :_reduce_none, 2, 200, :_reduce_none, 5, 200, :_reduce_none, 5, 200, :_reduce_none, 2, 200, :_reduce_none, 3, 200, :_reduce_none, 3, 200, :_reduce_none, 3, 200, :_reduce_none, 3, 200, :_reduce_none, 3, 200, :_reduce_none, 3, 200, :_reduce_none, 3, 200, :_reduce_none, 3, 200, :_reduce_none, 3, 200, :_reduce_none, 3, 200, :_reduce_none, 3, 199, :_reduce_none, 1, 199, :_reduce_none, 1, 199, :_reduce_none, 1, 202, :_reduce_none, 1, 202, :_reduce_none, 3, 204, :_reduce_none, 3, 204, :_reduce_none, 3, 204, :_reduce_none, 3, 204, :_reduce_none, 3, 204, :_reduce_none, 3, 203, :_reduce_none, 1, 203, :_reduce_none, 1, 203, :_reduce_none, 1, 203, :_reduce_none, 1, 127, :_reduce_none, 2, 127, :_reduce_none, 1, 201, :_reduce_none, 3, 201, :_reduce_none, 2, 205, :_reduce_none, 1, 205, :_reduce_none, 0, 144, :_reduce_none, 5, 144, :_reduce_none, 1, 206, :_reduce_none, 3, 206, :_reduce_none, 5, 145, :_reduce_none, 1, 207, :_reduce_none, 3, 207, :_reduce_none, 3, 207, :_reduce_none, 3, 207, :_reduce_none, 5, 207, :_reduce_none, 5, 207, :_reduce_none, 5, 207, :_reduce_none, 5, 207, :_reduce_none, 1, 209, :_reduce_none, 1, 209, :_reduce_none, 0, 115, :_reduce_none, 5, 115, :_reduce_none, 2, 115, :_reduce_none, 1, 208, :_reduce_none, 3, 208, :_reduce_none, 1, 210, :_reduce_none, 1, 210, :_reduce_none, 1, 210, :_reduce_none, 1, 133, :_reduce_none, 3, 133, :_reduce_none, 3, 133, :_reduce_none, 1, 211, :_reduce_none, 1, 211, :_reduce_none, 1, 211, :_reduce_none, 1, 134, :_reduce_none, 3, 134, :_reduce_none, 3, 134, :_reduce_none, 1, 212, :_reduce_none, 1, 212, :_reduce_none, 1, 212, :_reduce_none, 1, 135, :_reduce_none, 3, 135, :_reduce_none, 3, 135, :_reduce_none, 1, 213, :_reduce_none, 1, 213, :_reduce_none, 1, 213, :_reduce_none, 1, 136, :_reduce_none, 3, 136, :_reduce_none, 3, 136, :_reduce_none, 1, 214, :_reduce_none, 1, 214, :_reduce_none, 1, 214, :_reduce_none, 1, 137, :_reduce_none, 3, 137, :_reduce_none, 3, 137, :_reduce_none, 1, 215, :_reduce_none, 3, 215, :_reduce_none, 1, 215, :_reduce_none, 1, 215, :_reduce_none, 1, 138, :_reduce_none, 3, 138, :_reduce_none, 3, 138, :_reduce_none, 1, 217, :_reduce_none, 1, 217, :_reduce_none, 3, 217, :_reduce_none, 1, 139, :_reduce_none, 3, 139, :_reduce_none, 3, 139, :_reduce_none, 1, 218, :_reduce_none, 1, 218, :_reduce_none, 3, 218, :_reduce_none, 3, 218, :_reduce_none, 1, 140, :_reduce_none, 3, 140, :_reduce_none, 3, 140, :_reduce_none, 1, 124, :_reduce_none, 3, 124, :_reduce_none, 3, 124, :_reduce_none, 1, 219, :_reduce_none, 3, 219, :_reduce_none, 3, 220, :_reduce_none, 1, 123, :_reduce_none, 1, 123, :_reduce_none, 3, 221, :_reduce_none, 0, 222, :_reduce_none, 1, 222, :_reduce_none, 2, 222, :_reduce_none, 1, 122, :_reduce_none, 1, 148, :_reduce_none, 1, 148, :_reduce_none, 1, 216, :_reduce_none ] racc_reduce_n = 376 racc_shift_n = 633 racc_action_table = [ 576, 435, 474, 155, 409, 92, 96, 471, 467, 469, 24, 594, 574, 578, 12, 465, 1, 373, 148, 151, 380, 381, 58, 229, 366, 16, 322, 169, 525, 178, 170, 118, 120, 125, 14, 6, 538, 513, 25, 515, 518, 514, 543, 17, 573, 540, 92, 96, 541, 542, 49, 44, 46, 317, 152, 228, 78, 181, 111, 87, 296, 300, 410, 123, 125, 109, 111, 529, 111, 525, 575, 123, 109, 125, 87, 491, 495, 538, 513, 71, 515, 518, 273, 92, 96, 311, 315, 278, 534, 144, 145, 288, 44, 46, 317, 158, 489, 78, 181, 111, 87, 296, 300, 433, 123, 125, 109, 111, 529, 148, 151, 148, 151, 431, 463, 493, 230, 27, 129, 377, 378, 92, 96, 262, 148, 151, 311, 315, 278, 534, 125, 317, 288, 111, 78, 181, 100, 87, 296, 300, 236, 123, 125, 109, 111, 152, 76, 152, 390, 417, 123, 92, 96, 60, 380, 381, 480, 215, 138, 109, 152, 377, 378, 311, 315, 278, 100, 571, 125, 288, 78, 109, 78, 380, 381, 87, 90, 95, 133, 214, 144, 145, 144, 145, 631, 82, 85, 274, 98, 92, 96, 327, 71, 148, 151, 144, 145, 44, 46, 123, 148, 151, 78, 123, 100, 87, 90, 95, 87, 126, 148, 151, 78, 153, 154, 82, 85, 146, 44, 46, 147, 149, 71, 148, 151, 134, 138, 87, 462, 152, 393, 148, 151, 237, 153, 154, 152, 102, 146, 394, 78, 147, 149, 87, 90, 95, 152, 236, 143, 168, 461, 380, 381, 82, 85, 92, 96, 380, 381, 152, 71, 450, 92, 96, 144, 145, -373, 152, 92, 96, 217, 144, 145, 92, 96, 395, 150, 217, 44, 46, 371, 144, 145, 217, 162, 163, 164, 165, 100, 92, 96, 111, 142, 166, 144, 145, 167, 150, 396, 92, 96, 388, 144, 145, 217, 87, 78, 377, 378, 87, 138, 87, 397, 78, 217, 209, 87, 92, 96, 78, 380, 381, 87, 102, 78, 34, 71, 87, 90, 95, 92, 96, 217, 71, 377, 378, 398, 82, 85, 71, 78, 92, 96, 87, 71, 217, 92, 96, 92, 96, 78, 399, 369, 87, 92, 96, 217, 49, 78, 400, 71, 217, 109, 217, 44, 46, 44, 46, 78, 217, 71, 87, 92, 96, 87, 380, 381, 401, 66, 498, 55, 78, 377, 378, 87, 78, 449, 100, 71, 211, 34, 402, 78, 377, 378, 87, 403, 78, 49, 78, 87, 71, 87, 92, 96, 78, 404, 160, 87, 138, 405, 212, 71, 377, 378, 92, 96, 71, 100, 71, 44, 46, 49, 78, 171, 71, 87, 90, 95, 87, 100, 44, 46, 78, 406, 324, 82, 85, 92, 96, 98, -374, 121, 71, 78, 377, 378, 90, 95, 44, 46, 407, 138, 100, 78, 341, 342, 87, 90, 95, 408, 92, 96, 383, 78, 263, 78, 82, 85, 87, 90, 95, 377, 378, 71, 98, 100, 337, 338, 82, 85, 413, 92, 96, 44, 46, 71, 265, 261, 78, 570, 264, 87, 90, 95, 265, 412, 100, 138, 377, 378, 268, 82, 85, 266, 92, 96, 260, 413, 71, 29, 30, 78, 92, 96, 87, 90, 95, 259, 138, 100, 258, 386, 78, 385, 82, 85, 375, 217, 479, 264, 37, 71, 78, 92, 96, 87, 90, 95, 355, 356, 34, 98, 265, 377, 378, 82, 85, 497, 100, 78, 44, 46, 71, 357, 358, 78, 92, 96, 87, 90, 95, 178, 20, 78, 21, 20, 87, 21, 82, 85, 98, 100, 49, 377, 378, 71, 34, 92, 96, 44, 46, 44, 46, 71, 78, 602, 603, 87, 90, 95, 375, 108, 100, 98, 78, 92, 96, 82, 85, 66, 339, 340, 44, 46, 71, 273, 274, 78, 49, 413, 87, 90, 95, 266, 138, 92, 96, 44, 46, 49, 82, 85, 118, 120, 412, 629, 630, 71, 78, 92, 96, 87, 90, 95, 162, 163, 164, 165, 611, 612, 613, 82, 85, 126, 428, 429, 78, 267, 71, 87, 118, 120, 121, 123, 125, 109, 111, 257, 114, -103, 92, 96, 256, 201, 426, 427, 78, 181, 255, 87, 118, 120, 121, 123, 125, 109, 111, 178, 114, 436, 78, 424, 425, 87, 422, 423, 437, 123, 125, 109, 111, 92, 96, 420, 421, 253, 418, 419, 245, 118, 120, 249, 250, 92, 96, 162, 163, 164, 165, 329, 330, 78, 438, 439, 87, 92, 96, 440, 123, 125, 109, 111, 162, 163, 164, 165, 162, 163, 164, 165, 162, 163, 164, 165, 162, 163, 164, 165, 162, 163, 164, 165, 78, 441, 442, 87, 443, 444, 445, 123, 125, 109, 111, 446, 78, 447, 254, 87, 243, 452, 453, 123, 125, 109, 111, 454, 78, 455, 456, 87, 457, 166, 169, 123, 125, 109, 111, 162, 163, 164, 165, 167, 170, 459, 460, 242, 241, 240, 239, 238, 138, 473, 171, 476, 477, 268, 142, 482, 111, 484, 485, 486, 123, 207, 102, 161, 158, 141, 138, 500, 125, 502, 109, 504, 111, 506, 136, 49, 509, 510, 511, 512, 131, 69, 68, 545, 546, 123, 548, 125, 550, 109, 552, 111, 554, 34, 60, 557, 558, 559, 560, 561, 562, 563, 564, 566, 57, 568, 109, 168, -103, 54, 276, 51, 580, 581, 158, 111, 111, 111, 32, 583, 584, 585, 586, 587, 588, 277, 591, 592, 593, 28, 596, 597, 263, 600, 319, 121, 604, 605, 606, 607, 71, 570, 609, 125, 18, 618, 620, 621, 622, 15, 624, 10, 9, 626, 627, 628, 123, 8, 7, 111 ] racc_action_check = [ 528, 342, 404, 82, 309, 528, 528, 402, 400, 401, 18, 569, 526, 528, 6, 399, 0, 260, 223, 223, 399, 399, 36, 158, 255, 10, 239, 96, 528, 260, 96, 239, 239, 255, 6, 0, 528, 528, 18, 528, 528, 462, 477, 10, 526, 477, 462, 462, 477, 477, 36, 528, 528, 528, 223, 158, 528, 528, 342, 528, 528, 528, 309, 528, 528, 528, 528, 528, 404, 462, 526, 400, 402, 401, 399, 421, 425, 462, 462, 82, 462, 462, 462, 215, 215, 528, 528, 528, 528, 223, 223, 528, 462, 462, 462, 569, 419, 462, 462, 477, 462, 462, 462, 340, 462, 462, 462, 462, 462, 219, 219, 220, 220, 338, 398, 423, 161, 19, 61, 398, 398, 161, 161, 195, 318, 318, 462, 462, 462, 462, 421, 215, 462, 425, 215, 215, 161, 215, 215, 215, 318, 215, 215, 215, 215, 219, 54, 220, 269, 330, 419, 54, 54, 61, 498, 498, 408, 143, 161, 340, 318, 263, 263, 215, 215, 215, 54, 518, 338, 215, 398, 423, 161, 450, 450, 161, 161, 161, 69, 143, 219, 219, 220, 220, 624, 161, 161, 271, 54, 624, 624, 243, 161, 227, 227, 318, 318, 54, 54, 243, 226, 226, 54, 330, 624, 54, 54, 54, 498, 408, 81, 81, 263, 81, 81, 54, 54, 81, 518, 518, 81, 81, 54, 222, 222, 69, 624, 450, 394, 227, 274, 172, 172, 173, 172, 172, 226, 131, 172, 275, 624, 172, 172, 624, 624, 624, 81, 172, 80, 93, 394, 268, 268, 624, 624, 151, 151, 358, 358, 222, 624, 358, 153, 153, 227, 227, 93, 172, 152, 152, 151, 226, 226, 160, 160, 276, 81, 153, 131, 131, 259, 81, 81, 152, 173, 173, 173, 173, 160, 154, 154, 259, 80, 92, 222, 222, 92, 172, 277, 150, 150, 268, 172, 172, 154, 268, 151, 449, 449, 151, 160, 358, 279, 153, 150, 136, 153, 149, 149, 152, 264, 264, 152, 57, 160, 136, 151, 160, 160, 160, 148, 148, 149, 153, 497, 497, 280, 160, 160, 152, 154, 147, 147, 154, 160, 148, 146, 146, 145, 145, 150, 283, 258, 150, 144, 144, 147, 136, 449, 286, 154, 146, 258, 145, 57, 57, 136, 136, 149, 144, 150, 149, 163, 163, 264, 429, 429, 290, 45, 429, 32, 148, 356, 356, 148, 497, 356, 163, 149, 141, 32, 293, 147, 575, 575, 147, 296, 146, 45, 145, 146, 148, 145, 618, 618, 144, 297, 85, 144, 163, 300, 141, 147, 265, 265, 164, 164, 146, 618, 145, 515, 515, 32, 163, 98, 144, 163, 163, 163, 429, 164, 32, 32, 356, 301, 241, 163, 163, 625, 625, 618, 98, 241, 163, 575, 563, 563, 85, 85, 618, 618, 303, 164, 625, 618, 248, 248, 618, 618, 618, 305, 165, 165, 265, 265, 307, 164, 618, 618, 164, 164, 164, 484, 484, 618, 625, 165, 246, 246, 164, 164, 563, 100, 100, 625, 625, 164, 517, 194, 625, 517, 312, 625, 625, 625, 313, 563, 100, 165, 573, 573, 316, 625, 625, 317, 609, 609, 192, 484, 625, 22, 22, 165, 217, 217, 165, 165, 165, 189, 100, 609, 186, 266, 484, 266, 165, 165, 407, 217, 407, 199, 27, 165, 100, 614, 614, 100, 100, 100, 251, 251, 27, 609, 200, 427, 427, 100, 100, 427, 614, 573, 609, 609, 100, 252, 252, 609, 75, 75, 609, 609, 609, 262, 30, 217, 30, 14, 217, 14, 609, 609, 614, 75, 27, 319, 319, 609, 513, 162, 162, 614, 614, 27, 27, 217, 614, 579, 579, 614, 614, 614, 261, 59, 162, 75, 427, 60, 60, 614, 614, 59, 247, 247, 75, 75, 614, 211, 211, 75, 513, 319, 75, 75, 75, 201, 162, 102, 102, 513, 513, 59, 75, 75, 410, 410, 319, 622, 622, 75, 162, 249, 249, 162, 162, 162, 233, 233, 233, 233, 606, 606, 606, 162, 162, 60, 336, 336, 60, 203, 162, 60, 60, 60, 60, 60, 60, 60, 60, 185, 60, 102, 250, 250, 184, 102, 335, 335, 102, 102, 183, 102, 102, 102, 102, 102, 102, 102, 102, 102, 102, 343, 249, 334, 334, 249, 333, 333, 344, 249, 249, 249, 249, 181, 181, 332, 332, 181, 331, 331, 181, 267, 267, 181, 181, 245, 245, 231, 231, 231, 231, 244, 244, 250, 345, 346, 250, 253, 253, 347, 250, 250, 250, 250, 232, 232, 232, 232, 234, 234, 234, 234, 235, 235, 235, 235, 617, 617, 617, 617, 91, 91, 91, 91, 181, 348, 349, 181, 350, 351, 352, 181, 181, 181, 181, 353, 245, 354, 182, 245, 180, 359, 360, 245, 245, 245, 245, 361, 253, 362, 363, 253, 364, 377, 378, 253, 253, 253, 253, 632, 632, 632, 632, 380, 381, 392, 393, 179, 177, 176, 175, 174, 142, 403, 138, 405, 406, 204, 137, 409, 257, 412, 415, 416, 417, 128, 106, 86, 83, 79, 71, 430, 431, 432, 433, 434, 435, 448, 70, 66, 451, 459, 460, 461, 63, 53, 49, 487, 488, 489, 490, 491, 492, 493, 494, 495, 496, 42, 41, 499, 501, 503, 505, 507, 508, 510, 511, 512, 35, 514, 254, 516, 34, 31, 212, 28, 534, 535, 537, 540, 541, 542, 26, 547, 549, 551, 553, 555, 556, 214, 564, 565, 567, 20, 570, 572, 197, 574, 228, 238, 581, 589, 590, 591, 595, 599, 604, 242, 11, 610, 611, 612, 613, 8, 616, 5, 4, 619, 620, 621, 240, 3, 2, 543 ] racc_action_pointer = [ 15, nil, 882, 900, 877, 867, 13, nil, 892, nil, 24, 859, nil, nil, 542, nil, nil, nil, 9, 87, 864, nil, 488, nil, nil, nil, 830, 530, 829, nil, 539, 820, 379, nil, 801, 839, 7, nil, nil, nil, nil, 787, 825, nil, nil, 355, nil, nil, nil, 824, nil, nil, nil, 777, 145, nil, nil, 312, nil, 577, 590, 103, nil, 815, nil, nil, 775, nil, nil, 177, 768, 766, nil, nil, nil, 551, nil, nil, nil, 775, 215, 204, 2, 722, nil, 386, 760, nil, nil, nil, nil, 666, 236, 220, nil, nil, -30, nil, 395, nil, 476, nil, 610, nil, nil, nil, 794, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 753, nil, nil, 226, nil, nil, nil, nil, 314, 720, 764, nil, nil, 377, 748, 145, 348, 342, 340, 335, 324, 311, 293, 249, 262, 256, 283, nil, nil, nil, 22, nil, 267, 115, 572, 366, 409, 455, nil, nil, nil, nil, nil, nil, 225, 211, 735, 734, 733, 732, nil, 731, 704, 686, 702, 614, 648, 603, 466, nil, nil, 463, nil, nil, 452, nil, 433, 68, nil, 820, nil, 475, 488, 559, nil, 593, 741, nil, nil, nil, nil, nil, nil, 564, 818, nil, 833, 77, nil, 507, nil, 103, 105, nil, 217, 12, nil, nil, 194, 187, 865, nil, nil, 633, 650, 562, 654, 658, nil, nil, 815, -30, 835, 379, 821, 135, 652, 698, 419, 543, 397, 624, 655, 481, 496, 710, 783, -32, nil, 732, 296, 224, -39, 537, 494, 155, 314, 407, 468, 639, 245, 134, nil, 144, nil, nil, 151, 206, 239, 262, nil, 298, 255, nil, nil, 270, nil, nil, 278, nil, nil, nil, 296, nil, nil, 310, nil, nil, 341, 325, nil, nil, 355, 357, nil, 396, nil, 379, nil, 410, nil, -19, nil, nil, 436, 440, nil, nil, 446, 449, 118, 568, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 139, 639, 636, 627, 624, 607, 587, nil, 103, nil, 93, nil, -9, 622, 629, 655, 656, 660, 686, 687, 689, 690, 691, 696, 698, nil, 376, nil, 251, 702, 703, 708, 710, 711, 713, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 715, 716, nil, 722, 723, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 704, 752, 216, nil, nil, nil, 113, 14, 7, 8, 6, 730, 1, 733, 737, 473, 155, 797, 562, nil, 741, nil, nil, 787, 744, 739, nil, 86, nil, 65, nil, 105, nil, 66, nil, 538, nil, 369, 752, 746, 754, 747, 756, 748, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 758, 301, 167, 761, nil, nil, nil, nil, nil, nil, nil, 787, 809, 787, 40, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 32, nil, nil, nil, nil, nil, nil, 466, nil, nil, 768, 769, 764, 771, 765, 773, 766, 775, 767, 777, 328, 148, 780, nil, 781, nil, 782, nil, 783, nil, 784, 785, nil, 832, 788, 810, 566, 834, 368, 821, 432, 166, nil, nil, nil, nil, nil, nil, nil, -11, nil, -1, nil, nil, nil, nil, nil, 764, 823, nil, 772, nil, nil, 791, 792, 793, 835, nil, nil, nil, 804, nil, 805, nil, 806, nil, 807, nil, 808, 809, nil, nil, nil, nil, nil, nil, 439, 810, 856, nil, 832, nil, 10, 805, nil, 845, 493, 875, 387, nil, nil, nil, 496, nil, 867, nil, nil, nil, nil, nil, nil, nil, 866, 800, 825, nil, nil, nil, 806, nil, nil, nil, 826, nil, nil, nil, nil, 841, nil, 557, nil, nil, 499, 843, 808, 809, 810, 528, nil, 847, 662, 397, 882, 813, 814, 544, nil, 183, 432, nil, nil, nil, nil, nil, nil, 705 ] racc_action_default = [ -376, -2, -376, -376, -376, -13, -6, -4, -376, -1, -376, -376, -5, -7, -376, 633, -15, -14, -376, -18, -376, -12, -376, -9, -17, -16, -21, -376, -376, -8, -376, -376, -376, -108, -112, -376, -376, -20, -98, -99, -100, -376, -376, -87, -146, -88, -147, -89, -19, -94, -90, -11, -10, -82, -376, -23, -22, -376, -110, -376, -376, -376, -104, -376, -109, -101, -376, -91, -95, -376, -376, -284, -248, -26, -253, -27, -25, -254, -152, -376, -376, -376, -376, -305, -273, -376, -376, -167, -283, -274, -271, -251, -376, -31, -286, -272, -376, -281, -289, -282, -376, -24, -112, -93, -113, -97, -376, -96, -111, -217, -124, -230, -125, -126, -247, -127, -128, -129, -182, -130, -183, -187, -121, -191, -122, -204, -148, -123, -376, -102, -105, -376, -92, -84, -83, -3, -376, -285, -289, -249, -373, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -256, -255, -30, -376, -259, -376, -376, -376, -376, -376, -376, -153, -168, -32, -154, -169, -288, -376, -376, -135, -124, -136, -125, -243, -137, -126, -376, -138, -127, -376, -139, -128, -117, -140, -129, -118, -141, -119, -142, -131, -120, -143, -132, -144, -133, -122, -148, -145, -134, -123, -116, -114, -107, -106, -86, -85, -376, -376, -287, -376, -376, -278, -376, -279, -263, -264, -275, -265, -260, -276, -277, -261, -262, -376, -307, -252, -250, -266, -267, -268, -269, -280, -270, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -115, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -33, -34, -63, -62, -290, -376, -376, -376, -334, -376, -313, -54, -323, -319, -55, -329, -325, -56, -375, -335, -331, -57, -342, -337, -312, -58, -353, -344, -318, -59, -354, -340, -324, -348, -60, -350, -330, -311, -61, -357, -336, -322, -317, -310, -343, -328, -316, -347, -376, -376, -189, -184, -186, -193, -190, -188, -206, -194, -192, -203, -376, -376, -376, -376, -376, -376, -376, -216, -376, -229, -376, -242, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -166, -376, -181, -376, -376, -376, -376, -376, -376, -376, -219, -207, -205, -232, -220, -218, -233, -231, -246, -244, -150, -245, -376, -376, -156, -376, -376, -171, -157, -155, -151, -149, -185, -172, -170, -29, -64, -68, -376, -376, -28, -258, -257, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -308, -152, -304, -303, -376, -376, -376, -201, -376, -214, -376, -227, -376, -240, -376, -164, -376, -179, -376, -376, -376, -376, -376, -376, -376, -200, -213, -226, -239, -163, -178, -202, -215, -228, -241, -165, -180, -376, -376, -376, -376, -199, -212, -225, -238, -162, -177, -69, -376, -376, -376, -376, -315, -314, -321, -320, -327, -326, -333, -332, -339, -338, -355, -346, -345, -356, -376, -341, -349, -352, -351, -359, -358, -376, -306, -195, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -376, -208, -376, -221, -376, -234, -376, -158, -376, -376, -173, -376, -376, -376, -376, -44, -376, -31, -310, -376, -72, -70, -36, -37, -38, -39, -372, -360, -40, -376, -367, -363, -41, -366, -42, -369, -376, -35, -305, -43, -53, -376, -376, -376, -376, -309, -197, -196, -376, -209, -376, -222, -376, -235, -376, -159, -376, -376, -174, -210, -223, -236, -160, -175, -376, -292, -376, -66, -376, -67, -305, -376, -52, -50, -376, -376, -376, -44, -71, -65, -376, -370, -376, -49, -198, -211, -224, -237, -161, -176, -376, -295, -376, -291, -45, -47, -376, -365, -51, -364, -376, -362, -361, -368, -371, -73, -294, -376, -293, -46, -376, -75, -296, -297, -298, -74, -77, -376, -80, -376, -376, -376, -376, -376, -78, -376, -76, -48, -299, -300, -301, -302, -81, -79 ] racc_goto_table = [ 91, 124, 156, 157, 48, 110, 202, 127, 42, 56, 270, 415, 192, 42, 172, 107, 103, 112, 520, 65, 117, 91, 64, 128, 23, 272, 623, 86, 3, 72, 67, 116, 62, 614, 392, 93, 528, 623, 106, 59, 52, 279, 625, 200, 67, 115, 173, 175, 86, 204, 139, 132, 130, 619, 610, 271, 113, 61, 269, 177, 219, 220, 189, 222, 223, 205, 458, 226, 227, 75, 216, 218, 206, 186, 221, 184, 187, 224, 225, 190, 73, 195, 481, 65, 577, 391, 64, 183, 101, 107, 208, 22, 13, 2, 135, 70, 53, 31, 180, 194, 197, 199, 203, 174, 176, 179, 173, 231, 232, 233, 234, 235, 106, 210, 182, 185, 188, 42, 191, 193, 196, 198, 251, 26, 19, 159, 137, 11, 252, 5, 213, 318, 565, 589, 4, 544, 598, 579, nil, nil, nil, 248, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 247, nil, nil, nil, 313, nil, nil, nil, nil, nil, 316, nil, nil, nil, 246, nil, nil, nil, 374, nil, 376, nil, nil, nil, nil, 244, nil, nil, nil, nil, nil, nil, 321, nil, 335, nil, nil, nil, 347, 353, 336, nil, 363, 320, 348, 354, 325, nil, 364, nil, nil, nil, 379, 334, 384, nil, nil, 346, 352, 382, 387, 362, nil, 389, 333, 368, nil, 372, 345, 351, nil, nil, 361, 365, nil, 326, nil, 370, 332, nil, nil, nil, 344, 350, 323, nil, 360, 328, 367, 331, nil, nil, nil, 343, 349, nil, nil, 359, nil, nil, nil, nil, nil, 590, nil, nil, nil, nil, 414, 519, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 448, nil, nil, nil, nil, 434, nil, nil, 451, nil, nil, nil, nil, 478, 432, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 430, nil, nil, 416, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 464, nil, nil, nil, nil, nil, nil, 466, nil, nil, nil, nil, nil, nil, nil, nil, 483, nil, nil, nil, nil, nil, nil, nil, nil, 475, nil, nil, nil, 496, nil, nil, nil, nil, 472, nil, nil, 499, nil, nil, nil, nil, nil, nil, nil, nil, 494, 470, nil, nil, nil, 507, nil, nil, nil, 492, 505, 468, 508, nil, nil, nil, nil, nil, 517, 503, nil, 490, nil, nil, 316, nil, nil, nil, 487, nil, 488, 501, nil, nil, nil, nil, nil, nil, nil, nil, 414, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 248, 555, nil, nil, nil, nil, 516, nil, 556, nil, nil, nil, nil, nil, nil, nil, nil, nil, 553, nil, 582, nil, nil, nil, nil, nil, nil, 551, nil, nil, nil, nil, 517, nil, nil, nil, nil, nil, 316, 549, nil, nil, nil, nil, nil, nil, nil, nil, 547, nil, nil, nil, 595, 567, nil, nil, nil, 42, nil, 569, nil, nil, 572, 334, 346, 352, 362, 414, nil, nil, nil, nil, 516, nil, nil, nil, nil, 599, 608, 601, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 632 ] racc_goto_check = [ 56, 81, 34, 22, 15, 83, 104, 82, 23, 15, 24, 115, 78, 23, 109, 59, 62, 84, 26, 66, 88, 56, 72, 71, 14, 48, 54, 55, 1, 105, 60, 87, 69, 53, 51, 23, 50, 54, 23, 58, 14, 39, 53, 81, 60, 86, 56, 83, 55, 82, 105, 60, 69, 37, 36, 25, 85, 68, 20, 84, 109, 109, 88, 109, 109, 71, 52, 109, 109, 18, 110, 110, 74, 87, 110, 75, 76, 110, 110, 77, 17, 79, 80, 66, 26, 48, 72, 86, 16, 59, 62, 13, 12, 11, 10, 9, 8, 7, 85, 90, 91, 92, 93, 94, 95, 96, 56, 56, 56, 56, 56, 56, 23, 15, 97, 98, 99, 23, 100, 101, 102, 103, 81, 6, 5, 106, 108, 4, 82, 3, 112, 109, 113, 114, 2, 116, 127, 129, nil, nil, nil, 88, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 87, nil, nil, nil, 81, nil, nil, nil, nil, nil, 82, nil, nil, nil, 86, nil, nil, nil, 78, nil, 78, nil, nil, nil, nil, 85, nil, nil, nil, nil, nil, nil, 83, nil, 81, nil, nil, nil, 81, 81, 82, nil, 81, 84, 82, 82, 84, nil, 82, nil, nil, nil, 81, 88, 81, nil, nil, 88, 88, 82, 83, 88, nil, 82, 87, 88, nil, 88, 87, 87, nil, nil, 87, 87, nil, 86, nil, 87, 86, nil, nil, nil, 86, 86, 85, nil, 86, 85, 86, 85, nil, nil, nil, 85, 85, nil, nil, 85, nil, nil, nil, nil, nil, 115, nil, nil, nil, nil, 81, 24, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 81, nil, nil, nil, nil, 88, nil, nil, 82, nil, nil, nil, nil, 104, 87, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 86, nil, nil, 85, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 81, nil, nil, nil, nil, nil, nil, 82, nil, nil, nil, nil, nil, nil, nil, nil, 83, nil, nil, nil, nil, nil, nil, nil, nil, 88, nil, nil, nil, 81, nil, nil, nil, nil, 87, nil, nil, 82, nil, nil, nil, nil, nil, nil, nil, nil, 88, 86, nil, nil, nil, 81, nil, nil, nil, 87, 88, 85, 82, nil, nil, nil, nil, nil, 81, 87, nil, 86, nil, nil, 82, nil, nil, nil, 85, nil, 85, 86, nil, nil, nil, nil, nil, nil, nil, nil, 81, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 88, 81, nil, nil, nil, nil, 23, nil, 82, nil, nil, nil, nil, nil, nil, nil, nil, nil, 88, nil, 22, nil, nil, nil, nil, nil, nil, 87, nil, nil, nil, nil, 81, nil, nil, nil, nil, nil, 82, 86, nil, nil, nil, nil, nil, nil, nil, nil, 85, nil, nil, nil, 22, 15, nil, nil, nil, 23, nil, 23, nil, nil, 23, 88, 88, 88, 88, 81, nil, nil, nil, nil, 23, nil, nil, nil, nil, 81, 34, 81, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 56 ] racc_goto_pointer = [ nil, 28, 134, 129, 122, 113, 104, 71, 65, 42, 24, 93, 86, 77, 10, -23, 34, 26, 15, nil, -153, nil, -80, -19, -201, -156, -444, nil, nil, nil, nil, nil, nil, nil, -80, nil, -550, -557, nil, -174, nil, nil, nil, nil, nil, nil, nil, nil, -186, nil, -426, -240, -326, -576, -588, -27, -54, nil, 3, -42, -15, nil, -41, nil, nil, nil, -23, nil, 16, -9, nil, -37, -20, nil, -34, -27, -26, -23, -90, -21, -326, -59, -53, -55, -43, -4, -15, -29, -40, nil, -3, -2, -1, 0, 1, 2, 3, 12, 13, 14, 16, 17, 18, 19, -96, -25, 40, nil, 55, -86, -74, nil, -12, -379, -430, -308, -349, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, -437, nil, -397 ] racc_goto_default = [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 536, nil, 79, nil, 83, nil, 140, nil, nil, nil, 521, 522, 523, 524, 527, 531, 533, 88, 535, nil, nil, 537, 539, 281, 284, 287, 291, 295, 299, 304, 308, nil, 275, nil, nil, nil, nil, 615, 616, 617, 43, 45, 47, 50, 35, nil, 105, 38, 39, 40, 41, nil, nil, 63, nil, 33, 36, 104, nil, nil, nil, nil, nil, 122, 97, 99, nil, nil, 282, 285, 289, 292, 119, 303, 307, 312, nil, nil, nil, nil, nil, nil, 294, 298, 302, 306, 310, 314, nil, 74, 77, 80, 81, 84, 89, 94, nil, nil, nil, 411, 280, 283, 286, 290, 293, 297, 301, 305, 309, 526, 530, 532, nil ] racc_token_table = { false => 0, Object.new => 1, :UMINUS => 2, :UPLUS => 3, "*" => 4, "/" => 5, "+" => 6, "-" => 7, :SYM_EQ => 8, :SYM_NE => 9, :SYM_LT => 10, :SYM_START_DBLOCK => 11, :SYM_START_CBLOCK => 12, :SYM_GT => 13, :SYM_END_CBLOCK => 14, :SYM_END_DBLOCK => 15, :SYM_LE => 16, :SYM_GE => 17, :EOF => 18, :V_ARCHETYPE_ID => 19, :SYM_ARCHETYPE => 20, :Left_parenthesis_code => 21, :Right_parenthesis_code => 22, ";" => 23, :SYM_ADL_VERSION => 24, :V_VERSION_STRING => 25, :SYM_IS_CONTROLLED => 26, :SYM_SPECIALIZE => 27, :SYM_CONCEPT => 28, :V_LOCAL_TERM_CODE_REF => 29, :SYM_LANGUAGE => 30, :SYM_DESCRIPTION => 31, :SYM_DEFINITION => 32, :SYM_MATCHES => 33, :START_REGEXP_BLOCK => 34, :REGEXP_BODY => 35, :END_REGEXP_BLOCK => 36, :ERR_C_DOMAIN_TYPE => 37, :START_V_C_DOMAIN_TYPE_BLOCK => 38, :END_V_C_DOMAIN_TYPE_BLOCK => 39, :SYM_USE_NODE => 40, :SYM_ALLOW_ARCHETYPE => 41, :Star_code => 42, :V_ATTRIBUTE_IDENTIFIER => 43, :SYM_INCLUDE => 44, :SYM_EXCLUDE => 45, ":" => 46, :SYM_INVARIANT => 47, :V_ASSERTION_TEXT => 48, :SYM_ONTOLOGY => 49, :Left_bracket_code => 50, :Right_bracket_code => 51, :V_TYPE_IDENTIFIER => 52, :V_GENERIC_TYPE_IDENTIFIER => 53, :V_STRING => 54, :Comma_code => 55, :SYM_LIST_CONTINUE => 56, :V_INTEGER => 57, :SYM_INTERVAL_DELIM => 58, :SYM_ELLIPSIS => 59, :V_REAL => 60, :SYM_TRUE => 61, :SYM_FALSE => 62, :V_CHARACTER => 63, :V_ISO8601_EXTENDED_DATE => 64, :V_ISO8601_EXTENDED_TIME => 65, :V_ISO8601_EXTENDED_DATE_TIME => 66, :V_ISO8601_DURATION => 67, :V_QUALIFIED_TERM_CODE_REF => 68, :V_URI => 69, :SYM_EXISTS => 70, :SYM_NOT => 71, "=" => 72, :SYM_AND => 73, :SYM_OR => 74, :SYM_XOR => 75, :SYM_IMPLIES => 76, :Slash_code => 77, "^" => 78, :SYM_EXISTENCE => 79, :SYM_CARDINALITY => 80, :Semicolon_code => 81, :SYM_ORDERED => 82, :SYM_UNORDERED => 83, :SYM_UNIQUE => 84, :SYM_OCCURRENCES => 85, :V_ISO8601_DATE_CONSTRAINT_PATTERN => 86, :V_ISO8601_TIME_CONSTRAINT_PATTERN => 87, :V_ISO8601_DATE_TIME_CONSTRAINT_PATTERN => 88, :START_TERM_CODE_CONSTRAINT => 89, :END_TERM_CODE_CONSTRAINT => 90, :TERM_CODE => 91, :V_ISO8601_DURATION_CONSTRAINT_PATTERN => 92 } racc_use_result_var = true racc_nt_base = 93 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', 'UMINUS', 'UPLUS', '"*"', '"/"', '"+"', '"-"', 'SYM_EQ', 'SYM_NE', 'SYM_LT', 'SYM_START_DBLOCK', 'SYM_START_CBLOCK', 'SYM_GT', 'SYM_END_CBLOCK', 'SYM_END_DBLOCK', 'SYM_LE', 'SYM_GE', 'EOF', 'V_ARCHETYPE_ID', 'SYM_ARCHETYPE', 'Left_parenthesis_code', 'Right_parenthesis_code', '";"', 'SYM_ADL_VERSION', 'V_VERSION_STRING', 'SYM_IS_CONTROLLED', 'SYM_SPECIALIZE', 'SYM_CONCEPT', 'V_LOCAL_TERM_CODE_REF', 'SYM_LANGUAGE', 'SYM_DESCRIPTION', 'SYM_DEFINITION', 'SYM_MATCHES', 'START_REGEXP_BLOCK', 'REGEXP_BODY', 'END_REGEXP_BLOCK', 'ERR_C_DOMAIN_TYPE', 'START_V_C_DOMAIN_TYPE_BLOCK', 'END_V_C_DOMAIN_TYPE_BLOCK', 'SYM_USE_NODE', 'SYM_ALLOW_ARCHETYPE', 'Star_code', 'V_ATTRIBUTE_IDENTIFIER', 'SYM_INCLUDE', 'SYM_EXCLUDE', '":"', 'SYM_INVARIANT', 'V_ASSERTION_TEXT', 'SYM_ONTOLOGY', 'Left_bracket_code', 'Right_bracket_code', 'V_TYPE_IDENTIFIER', 'V_GENERIC_TYPE_IDENTIFIER', 'V_STRING', 'Comma_code', 'SYM_LIST_CONTINUE', 'V_INTEGER', 'SYM_INTERVAL_DELIM', 'SYM_ELLIPSIS', 'V_REAL', 'SYM_TRUE', 'SYM_FALSE', 'V_CHARACTER', 'V_ISO8601_EXTENDED_DATE', 'V_ISO8601_EXTENDED_TIME', 'V_ISO8601_EXTENDED_DATE_TIME', 'V_ISO8601_DURATION', 'V_QUALIFIED_TERM_CODE_REF', 'V_URI', 'SYM_EXISTS', 'SYM_NOT', '"="', 'SYM_AND', 'SYM_OR', 'SYM_XOR', 'SYM_IMPLIES', 'Slash_code', '"^"', 'SYM_EXISTENCE', 'SYM_CARDINALITY', 'Semicolon_code', 'SYM_ORDERED', 'SYM_UNORDERED', 'SYM_UNIQUE', 'SYM_OCCURRENCES', 'V_ISO8601_DATE_CONSTRAINT_PATTERN', 'V_ISO8601_TIME_CONSTRAINT_PATTERN', 'V_ISO8601_DATE_TIME_CONSTRAINT_PATTERN', 'START_TERM_CODE_CONSTRAINT', 'END_TERM_CODE_CONSTRAINT', 'TERM_CODE', 'V_ISO8601_DURATION_CONSTRAINT_PATTERN', '$start', 'input', 'archetype', 'arch_identification', 'arch_specialisation', 'arch_concept', 'arch_language', 'arch_description', 'arch_definition', 'arch_invariant', 'arch_ontology', 'arch_head', 'arch_meta_data', 'arch_meta_data_items', 'arch_meta_data_item', 'dadl_section', 'cadl_section', 'c_complex_object', 'assertions', 'c_complex_object_head', 'c_complex_object_body', 'c_complex_object_id', 'c_occurrences', 'type_identifier', 'c_any', 'c_attributes', 'c_object', 'archetype_internal_ref', 'archetype_slot', 'constraint_ref', 'c_code_phrase', 'c_ordinal', 'c_primitive_object', 'v_c_domain_type', 'absolute_path', 'c_archetype_slot_head', 'c_includes', 'c_excludes', 'c_archetype_slot_id', 'c_primitive', 'c_integer', 'c_real', 'c_date', 'c_time', 'c_date_time', 'c_duration', 'c_string', 'c_boolean', 'c_attribute', 'c_attr_head', 'c_attr_values', 'c_existence', 'c_cardinality', 'invariants', 'invariant', 'any_identifier', 'boolean_expression', 'dadl_input', 'attr_vals', 'complex_object_block', 'attr_val', 'attr_id', 'object_block', 'primitive_object_block', 'single_attr_object_block', 'multiple_attr_object_block', 'untyped_multiple_attr_object_block', 'multiple_attr_object_block_head', 'keyed_objects', 'keyed_object', 'object_key', 'simple_value', 'untyped_single_attr_object_block', 'single_attr_object_complex_head', 'untyped_primitive_object_block', 'primitive_object_value', 'simple_list_value', 'simple_interval_value', 'term_code', 'term_code_list_value', 'string_value', 'integer_value', 'real_value', 'boolean_value', 'character_value', 'date_value', 'time_value', 'date_time_value', 'duration_value', 'uri_value', 'string_list_value', 'integer_list_value', 'real_list_value', 'boolean_list_value', 'character_list_value', 'date_list_value', 'time_list_value', 'date_time_list_value', 'duration_list_value', 'integer_interval_value', 'real_interval_value', 'date_interval_value', 'time_interval_value', 'date_time_interval_value', 'duration_interval_value', 'assertion', 'boolean_leaf', 'boolean_node', 'relative_path', 'arithmetic_expression', 'arithmetic_leaf', 'arithmetic_node', 'path_segment', 'existence_spec', 'cardinality_spec', 'occurrence_spec', 'cardinality_limit_value', 'c_integer_spec', 'c_real_spec', 'c_date_constraint', 'c_time_constraint', 'c_date_time_constraint', 'c_duration_constraint', 'duration_pattern', 'c_string_spec', 'c_boolean_spec', 'c_ordinal_spec', 'ordinal', 'term_code_constraint_section', 'term_code_body'] Racc_debug_parser = false ##### racc system variables end ##### # reduce 0 omitted # reduce 1 omitted # reduce 2 omitted # reduce 3 omitted # reduce 4 omitted # reduce 5 omitted # reduce 6 omitted # reduce 7 omitted # reduce 8 omitted # reduce 9 omitted # reduce 10 omitted # 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 <<'.,.,', 'lib/parser.y', 73 def _reduce_19( val, _values, result ) result = {:language => val[1]} result end .,., # reduce 20 omitted # reduce 21 omitted # reduce 22 omitted # reduce 23 omitted # reduce 24 omitted # reduce 25 omitted # reduce 26 omitted # reduce 27 omitted # reduce 28 omitted # reduce 29 omitted # reduce 30 omitted module_eval <<'.,.,', 'lib/parser.y', 110 def _reduce_31( val, _values, result ) result = {:c_complex_object_id => {:type_identifier => val[0]}} result end .,., module_eval <<'.,.,', 'lib/parser.y', 114 def _reduce_32( val, _values, result ) result = {:c_complex_object_id => {:type_identifier => val[0], :V_LOCAL_TERM_CODE_REF => val[1]}} result end .,., # reduce 33 omitted # reduce 34 omitted # reduce 35 omitted # reduce 36 omitted # reduce 37 omitted # reduce 38 omitted # reduce 39 omitted # reduce 40 omitted # reduce 41 omitted # reduce 42 omitted # reduce 43 omitted # reduce 44 omitted # reduce 45 omitted # reduce 46 omitted # reduce 47 omitted # reduce 48 omitted # reduce 49 omitted # reduce 50 omitted # reduce 51 omitted # reduce 52 omitted # reduce 53 omitted # reduce 54 omitted # reduce 55 omitted # reduce 56 omitted # reduce 57 omitted # reduce 58 omitted # reduce 59 omitted # reduce 60 omitted # reduce 61 omitted # reduce 62 omitted # reduce 63 omitted # reduce 64 omitted # reduce 65 omitted # reduce 66 omitted # reduce 67 omitted # reduce 68 omitted # reduce 69 omitted # reduce 70 omitted # reduce 71 omitted # reduce 72 omitted # reduce 73 omitted # reduce 74 omitted # reduce 75 omitted # reduce 76 omitted # reduce 77 omitted # reduce 78 omitted # reduce 79 omitted # reduce 80 omitted # reduce 81 omitted # reduce 82 omitted # reduce 83 omitted # reduce 84 omitted # reduce 85 omitted # reduce 86 omitted # reduce 87 omitted # reduce 88 omitted # reduce 89 omitted # reduce 90 omitted # reduce 91 omitted # reduce 92 omitted # reduce 93 omitted # reduce 94 omitted # reduce 95 omitted # reduce 96 omitted # reduce 97 omitted # reduce 98 omitted # reduce 99 omitted # reduce 100 omitted # reduce 101 omitted # reduce 102 omitted # reduce 103 omitted # reduce 104 omitted # reduce 105 omitted # reduce 106 omitted # reduce 107 omitted # reduce 108 omitted # reduce 109 omitted # reduce 110 omitted # reduce 111 omitted # reduce 112 omitted # reduce 113 omitted # reduce 114 omitted # reduce 115 omitted # reduce 116 omitted # reduce 117 omitted # reduce 118 omitted # reduce 119 omitted # reduce 120 omitted # reduce 121 omitted # reduce 122 omitted # reduce 123 omitted # reduce 124 omitted # reduce 125 omitted # reduce 126 omitted # reduce 127 omitted # reduce 128 omitted # reduce 129 omitted # reduce 130 omitted # reduce 131 omitted # reduce 132 omitted # reduce 133 omitted # reduce 134 omitted # reduce 135 omitted # reduce 136 omitted # reduce 137 omitted # reduce 138 omitted # reduce 139 omitted # reduce 140 omitted # reduce 141 omitted # reduce 142 omitted # reduce 143 omitted # reduce 144 omitted # reduce 145 omitted # reduce 146 omitted # reduce 147 omitted # reduce 148 omitted # reduce 149 omitted # reduce 150 omitted # reduce 151 omitted # reduce 152 omitted # reduce 153 omitted # reduce 154 omitted # reduce 155 omitted # reduce 156 omitted # reduce 157 omitted # reduce 158 omitted # reduce 159 omitted # reduce 160 omitted # reduce 161 omitted # reduce 162 omitted # reduce 163 omitted # reduce 164 omitted # reduce 165 omitted # reduce 166 omitted # reduce 167 omitted # reduce 168 omitted # reduce 169 omitted # reduce 170 omitted # reduce 171 omitted # reduce 172 omitted # reduce 173 omitted # reduce 174 omitted # reduce 175 omitted # reduce 176 omitted # reduce 177 omitted # reduce 178 omitted # reduce 179 omitted # reduce 180 omitted # reduce 181 omitted # reduce 182 omitted # reduce 183 omitted # reduce 184 omitted # reduce 185 omitted # reduce 186 omitted # reduce 187 omitted # reduce 188 omitted # reduce 189 omitted # reduce 190 omitted # reduce 191 omitted # reduce 192 omitted # reduce 193 omitted # reduce 194 omitted # reduce 195 omitted # reduce 196 omitted # reduce 197 omitted # reduce 198 omitted # reduce 199 omitted # reduce 200 omitted # reduce 201 omitted # reduce 202 omitted # reduce 203 omitted # reduce 204 omitted # reduce 205 omitted # reduce 206 omitted # reduce 207 omitted # reduce 208 omitted # reduce 209 omitted # reduce 210 omitted # reduce 211 omitted # reduce 212 omitted # reduce 213 omitted # reduce 214 omitted # reduce 215 omitted # reduce 216 omitted # reduce 217 omitted # reduce 218 omitted # reduce 219 omitted # reduce 220 omitted # reduce 221 omitted # reduce 222 omitted # reduce 223 omitted # reduce 224 omitted # reduce 225 omitted # reduce 226 omitted # reduce 227 omitted # reduce 228 omitted # reduce 229 omitted # reduce 230 omitted # reduce 231 omitted # reduce 232 omitted # reduce 233 omitted # reduce 234 omitted # reduce 235 omitted # reduce 236 omitted # reduce 237 omitted # reduce 238 omitted # reduce 239 omitted # reduce 240 omitted # reduce 241 omitted # reduce 242 omitted # reduce 243 omitted # reduce 244 omitted # reduce 245 omitted # reduce 246 omitted # reduce 247 omitted # reduce 248 omitted # reduce 249 omitted # reduce 250 omitted # reduce 251 omitted # reduce 252 omitted # reduce 253 omitted # reduce 254 omitted # reduce 255 omitted # reduce 256 omitted # reduce 257 omitted # reduce 258 omitted # reduce 259 omitted # reduce 260 omitted # reduce 261 omitted # reduce 262 omitted # reduce 263 omitted # reduce 264 omitted # reduce 265 omitted # reduce 266 omitted # reduce 267 omitted # reduce 268 omitted # reduce 269 omitted # reduce 270 omitted # reduce 271 omitted # reduce 272 omitted # reduce 273 omitted # reduce 274 omitted # reduce 275 omitted # reduce 276 omitted # reduce 277 omitted # reduce 278 omitted # reduce 279 omitted # reduce 280 omitted # reduce 281 omitted # reduce 282 omitted # reduce 283 omitted # reduce 284 omitted # reduce 285 omitted # reduce 286 omitted # reduce 287 omitted # reduce 288 omitted # reduce 289 omitted # reduce 290 omitted # reduce 291 omitted # reduce 292 omitted # reduce 293 omitted # reduce 294 omitted # reduce 295 omitted # reduce 296 omitted # reduce 297 omitted # reduce 298 omitted # reduce 299 omitted # reduce 300 omitted # reduce 301 omitted # reduce 302 omitted # reduce 303 omitted # reduce 304 omitted # reduce 305 omitted # reduce 306 omitted # reduce 307 omitted # reduce 308 omitted # reduce 309 omitted # reduce 310 omitted # reduce 311 omitted # reduce 312 omitted # reduce 313 omitted # reduce 314 omitted # reduce 315 omitted # reduce 316 omitted # reduce 317 omitted # reduce 318 omitted # reduce 319 omitted # reduce 320 omitted # reduce 321 omitted # reduce 322 omitted # reduce 323 omitted # reduce 324 omitted # reduce 325 omitted # reduce 326 omitted # reduce 327 omitted # reduce 328 omitted # reduce 329 omitted # reduce 330 omitted # reduce 331 omitted # reduce 332 omitted # reduce 333 omitted # reduce 334 omitted # reduce 335 omitted # reduce 336 omitted # reduce 337 omitted # reduce 338 omitted # reduce 339 omitted # reduce 340 omitted # reduce 341 omitted # reduce 342 omitted # reduce 343 omitted # reduce 344 omitted # reduce 345 omitted # reduce 346 omitted # reduce 347 omitted # reduce 348 omitted # reduce 349 omitted # reduce 350 omitted # reduce 351 omitted # reduce 352 omitted # reduce 353 omitted # reduce 354 omitted # reduce 355 omitted # reduce 356 omitted # reduce 357 omitted # reduce 358 omitted # reduce 359 omitted # reduce 360 omitted # reduce 361 omitted # reduce 362 omitted # reduce 363 omitted # reduce 364 omitted # reduce 365 omitted # reduce 366 omitted # reduce 367 omitted # reduce 368 omitted # reduce 369 omitted # reduce 370 omitted # reduce 371 omitted # reduce 372 omitted # reduce 373 omitted # reduce 374 omitted # reduce 375 omitted def _reduce_none( val, _values, result ) result end end # class Parser end # module ADL end # module OpenEHR