admin/mruby-mruby
1
0
Fork 0
mirror of https://github.com/mruby/mruby synced 2026-06-08 16:11:16 +00:00
Code Issues Packages Projects Releases Wiki Activity
Files
master
mruby-mruby/mrbgems/mruby-compiler/core/y.tab.c
T
Yukihiro "Matz" Matsumoto 40264c9aad mruby-compiler: accept double-quoted strings in case/in patterns 
The p_value rule only accepted bare tSTRING tokens, which the lexer
emits for single-quoted strings.  Double-quoted strings emit
tSTRING_BEG ... tSTRING (or with interpolation, tSTRING_BEG
string_rep tSTRING), so

  case "hello"
  in "hello"
    :match
  end

raised "syntax error, unexpected string literal" at the `"` after
`in`.  Use the existing `string` non-terminal instead of bare
tSTRING, which also enables alternation (`"a" | "b"`), interpolation
(`"hel#{x}"`), and concatenation by juxtaposition in patterns.

close #6830

Co-authored-by: Claude <noreply@anthropic.com>
2026-05-16 22:01:52 +09:00

16187 lines
627 KiB
C
Raw Permalink Blame History

/* A Bison parser, made by Lrama 0.7.0. */
/* Bison implementation for Yacc-like parsers in C
Copyright (C) 1984, 1989-1990, 2000-2015, 2018-2021 Free Software Foundation,
Inc.
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program. If not, see <https://www.gnu.org/licenses/>. */
/* As a special exception, you may create a larger work that contains
part or all of the Bison parser skeleton and distribute that work
under terms of your choice, so long as that work isn't itself a
parser generator using the skeleton or a modified version thereof
as a parser skeleton. Alternatively, if you modify or redistribute
the parser skeleton itself, you may (at your option) remove this
special exception, which will cause the skeleton and the resulting
Bison output files to be licensed under the GNU General Public
License without this special exception.
This special exception was added by the Free Software Foundation in
version 2.2 of Bison. */
/* C LALR(1) parser skeleton written by Richard Stallman, by
simplifying the original so-called "semantic" parser. */
/* DO NOT RELY ON FEATURES THAT ARE NOT DOCUMENTED in the manual,
especially those whose name start with YY_ or yy_. They are
private implementation details that can be changed or removed. */
/* All symbols defined below should begin with yy or YY, to avoid
infringing on user name space. This should be done even for local
variables, as they might otherwise be expanded by user macros.
There are some unavoidable exceptions within include files to
define necessary library symbols; they are noted "INFRINGES ON
USER NAME SPACE" below. */
/* Identify Bison output, and Bison version. */
#define YYBISON 30802
/* Bison version string. */
#define YYBISON_VERSION "3.8.2"
/* Skeleton name. */
#define YYSKELETON_NAME "yacc.c"
/* Pure parsers. */
#define YYPURE 1
/* Push parsers. */
#define YYPUSH 0
/* Pull parsers. */
#define YYPULL 1
/* First part of user prologue. */
#line 7 "mrbgems/mruby-compiler/core/parse.y"
#undef PARSER_DEBUG
#ifdef PARSER_DEBUG
# define YYDEBUG 1
#endif
#define YYSTACK_USE_ALLOCA 1
#include <ctype.h>
#include <stddef.h>
#include <stdlib.h>
#include <string.h>
#include <mruby.h>
#include <mruby/compile.h>
#include <mruby/proc.h>
#include <mruby/error.h>
#include <mruby/throw.h>
#include <mruby/string.h>
#include <mruby/dump.h>
#include <mruby/internal.h>
#include "node.h"
#define YYLEX_PARAM p
#define mrbc_malloc(s) mrb_basic_alloc_func(NULL,(s))
#define mrbc_realloc(p,s) mrb_basic_alloc_func((p),(s))
#define mrbc_free(p) mrb_basic_alloc_func((p),0)
typedef mrb_ast_node node;
typedef struct mrb_parser_state parser_state;
typedef struct mrb_parser_heredoc_info parser_heredoc_info;
static int yyparse(parser_state *p);
static int yylex(void *lval, void *lp, parser_state *p);
static void yyerror(void *lp, parser_state *p, const char *s);
static void yywarning(parser_state *p, const char *s);
static void backref_error(parser_state *p, node *n);
static void void_expr_error(parser_state *p, node *n);
static void tokadd(parser_state *p, int32_t c);
static const char* tok(parser_state *p);
static int toklen(parser_state *p);
/* Forward declarations for variable-sized simple node functions */
/* Forward declarations for variable-sized advanced node functions */
/* Helper function to check node type for both traditional and variable-sized nodes */
static mrb_bool node_type_p(node *n, enum node_type type);
#define identchar(c) (ISALNUM(c) || (c) == '_' || !ISASCII(c))
typedef unsigned int stack_type;
#define BITSTACK_PUSH(stack, n) ((stack) = ((stack)<<1)|((n)&1))
#define BITSTACK_POP(stack) ((stack) = (stack) >> 1)
#define BITSTACK_LEXPOP(stack) ((stack) = ((stack) >> 1) | ((stack) & 1))
#define BITSTACK_SET_P(stack) ((stack)&1)
#define COND_PUSH(n) BITSTACK_PUSH(p->cond_stack, (n))
#define COND_POP() BITSTACK_POP(p->cond_stack)
#define COND_LEXPOP() BITSTACK_LEXPOP(p->cond_stack)
#define COND_P() BITSTACK_SET_P(p->cond_stack)
#define CMDARG_PUSH(n) BITSTACK_PUSH(p->cmdarg_stack, (n))
#define CMDARG_POP() BITSTACK_POP(p->cmdarg_stack)
#define CMDARG_LEXPOP() BITSTACK_LEXPOP(p->cmdarg_stack)
#define CMDARG_P() BITSTACK_SET_P(p->cmdarg_stack)
#define SET_LINENO(c,n) (((struct mrb_ast_var_header*)(c))->lineno = (n))
#define NUM_SUFFIX_R (1<<0)
#define NUM_SUFFIX_I (1<<1)
static inline mrb_sym
intern_cstr_gen(parser_state *p, const char *s)
{
return mrb_intern_cstr(p->mrb, s);
}
#define intern_cstr(s) intern_cstr_gen(p,(s))
static inline mrb_sym
intern_gen(parser_state *p, const char *s, size_t len)
{
return mrb_intern(p->mrb, s, len);
}
#define intern(s,len) intern_gen(p,(s),(len))
#define intern_op(op) MRB_OPSYM(op)
static mrb_sym
intern_numparam_gen(parser_state *p, int num)
{
char buf[3];
buf[0] = '_'; buf[1] = '0'+num; buf[2] = '\0';
return intern(buf, 2);
}
#define intern_numparam(n) intern_numparam_gen(p,(n))
static void
cons_free_gen(parser_state *p, node *cons)
{
cons->cdr = p->cells;
p->cells = cons;
}
#define cons_free(c) cons_free_gen(p, (c))
static void*
parser_palloc(parser_state *p, size_t size)
{
void *m = mempool_alloc(p->pool, size);
if (!m) {
MRB_THROW(p->mrb->jmp);
}
return m;
}
#define parser_pfree(ptr) do { if (sizeof(node) <= sizeof(*(ptr))) cons_free((node*)ptr);} while (0)
static node*
cons_gen(parser_state *p, node *car, node *cdr)
{
struct mrb_ast_node *c;
/* Try to reuse from free list first - only for 16-byte nodes */
if (p->cells) {
c = (struct mrb_ast_node*)p->cells;
p->cells = p->cells->cdr;
}
else {
c = (struct mrb_ast_node*)parser_palloc(p, sizeof(struct mrb_ast_node));
}
c->car = car;
c->cdr = cdr;
/* Don't initialize location fields for structure nodes - saves CPU */
return (node*)c;
}
/* Head-only location optimization: separate functions for head vs structure nodes */
#define cons(a,b) cons_gen(p,(a),(b)) /* Structure nodes - no location */
/* Initialize variable node header */
static void
init_var_header(struct mrb_ast_var_header *header, parser_state *p, enum node_type type)
{
header->lineno = p->lineno;
header->filename_index = p->current_filename_index;
header->node_type = (uint8_t)type;
/* Handle file boundary edge case: this node is reduced from a token that
was buffered by bison lookahead before partial_hook switched the file,
so attribute it to the previous file at its last known lineno rather
than the new file at lineno=0. */
if (p->lineno == 0 && p->current_filename_index > 0) {
header->filename_index--;
header->lineno = p->prev_file_lineno;
}
}
/* Combined allocate + init header helper */
static inline void*
new_node(parser_state *p, size_t size, enum node_type type)
{
void *n = parser_palloc(p, size);
init_var_header((struct mrb_ast_var_header*)n, p, type);
return n;
}
/* Type-safe macro wrapper for node allocation */
#define NEW_NODE(type_name, node_type) \
(struct mrb_ast_##type_name##_node*)new_node(p, sizeof(struct mrb_ast_##type_name##_node), node_type)
static node*
list1_gen(parser_state *p, node *a)
{
return cons(a, 0);
}
#define list1(a) list1_gen(p, (a))
static node*
list2_gen(parser_state *p, node *a, node *b)
{
return cons(a, cons(b, 0));
}
#define list2(a,b) list2_gen(p, (a),(b))
static node*
list3_gen(parser_state *p, node *a, node *b, node *c)
{
return cons(a, cons(b, cons(c, 0)));
}
#define list3(a,b,c) list3_gen(p, (a),(b),(c))
static node*
append_gen(parser_state *p, node *a, node *b)
{
node *c = a;
if (!a) return b;
if (!b) return a;
while (c->cdr) {
c = c->cdr;
}
c->cdr = b;
return a;
}
#define append(a,b) append_gen(p,(a),(b))
#define push(a,b) append_gen(p,(a),list1(b))
static char*
parser_strndup(parser_state *p, const char *s, size_t len)
{
char *b = (char*)parser_palloc(p, len+1);
memcpy(b, s, len);
b[len] = '\0';
return b;
}
#undef strndup
#define strndup(s,len) parser_strndup(p, s, len)
static char*
parser_strdup(parser_state *p, const char *s)
{
return parser_strndup(p, s, strlen(s));
}
#undef strdup
#define strdup(s) parser_strdup(p, s)
static void
dump_int(uint16_t i, char *s)
{
char *p = s;
char *t = s;
while (i > 0) {
*p++ = (i % 10)+'0';
i /= 10;
}
if (p == s) *p++ = '0';
*p = 0;
p--; /* point the last char */
while (t < p) {
char c = *t;
*t++ = *p;
*p-- = c;
}
}
/* xxx ----------------------------- */
static node*
local_switch(parser_state *p)
{
node *prev = p->locals;
p->locals = cons(0, 0);
return prev;
}
static void
local_resume(parser_state *p, node *prev)
{
p->locals = prev;
}
static void
local_nest(parser_state *p)
{
p->locals = cons(0, p->locals);
}
static void
local_unnest(parser_state *p)
{
if (p->locals) {
p->locals = p->locals->cdr;
}
}
static mrb_bool
local_var_p(parser_state *p, mrb_sym sym)
{
const struct RProc *u;
node *l = p->locals;
while (l) {
node *n = l->car;
while (n) {
if (node_to_sym(n->car) == sym) return TRUE;
n = n->cdr;
}
l = l->cdr;
}
u = p->upper;
while (u && !MRB_PROC_CFUNC_P(u)) {
const struct mrb_irep *ir = u->body.irep;
const mrb_sym *v = ir->lv;
int i;
if (v) {
for (i=0; i+1 < ir->nlocals; i++) {
if (v[i] == sym) return TRUE;
}
}
if (MRB_PROC_SCOPE_P(u)) break;
u = u->upper;
}
return FALSE;
}
static void
local_add_f(parser_state *p, mrb_sym sym)
{
if (p->locals) {
node *n = p->locals->car;
while (n) {
if (node_to_sym(n->car) == sym) {
mrb_int len;
const char* name = mrb_sym_name_len(p->mrb, sym, &len);
if (len > 0 && name[0] != '_') {
yyerror(NULL, p, "duplicated argument name");
return;
}
}
n = n->cdr;
}
p->locals->car = push(p->locals->car, sym_to_node(sym));
}
}
static void
local_add(parser_state *p, mrb_sym sym)
{
if (!local_var_p(p, sym)) {
local_add_f(p, sym);
}
}
/* allocate register for block */
#define local_add_blk(p) local_add_f(p, 0)
static void
local_add_kw(parser_state *p, mrb_sym kwd)
{
/* allocate register for keywords hash */
local_add_f(p, kwd ? kwd : intern_op(pow));
}
static node*
locals_node(parser_state *p)
{
return p->locals ? p->locals->car : NULL;
}
/* Helper function to check node type for both traditional and variable-sized nodes */
static mrb_bool
node_type_p(node *n, enum node_type type)
{
if (!n) return FALSE;
/* Check if this is a variable-sized node */
struct mrb_ast_var_header *header = (struct mrb_ast_var_header*)n;
return ((enum node_type)header->node_type == type);
}
/* Helper functions for variable-sized node detection */
static enum node_type
node_type(node *n)
{
if (!n) return (enum node_type)0;
/* Try to interpret as variable-sized node */
struct mrb_ast_var_header *header = (struct mrb_ast_var_header*)n;
enum node_type type = (enum node_type)header->node_type;
/* Validate that the node type is within valid range for variable-sized nodes */
if (type >= NODE_SCOPE && type < NODE_LAST) {
return type;
}
/* If node type is invalid, this is likely a cons-list node */
/* Return a special sentinel value to indicate cons-list fallback */
return NODE_LAST; /* Use NODE_LAST as sentinel for cons-list nodes */
}
static void
nvars_nest(parser_state *p)
{
p->nvars = cons(int_to_node(0), p->nvars);
}
static void
nvars_block(parser_state *p)
{
p->nvars = cons(int_to_node(-2), p->nvars);
}
static void
nvars_unnest(parser_state *p)
{
p->nvars = p->nvars->cdr;
}
/* struct: scope_node(locals, body) */
static node*
new_scope(parser_state *p, node *body)
{
struct mrb_ast_scope_node *scope_node = NEW_NODE(scope, NODE_SCOPE);
scope_node->locals = locals_node(p);
scope_node->body = body;
return (node*)scope_node;
}
/* struct: stmts_node(stmts) - uses cons list */
static node*
new_stmts(parser_state *p, node *body)
{
struct mrb_ast_stmts_node *n = NEW_NODE(stmts, NODE_STMTS);
n->stmts = body ? list1(body) : 0; /* Wrap single statement in cons-list */
return (node*)n;
}
/* Helper: push statement to stmts node */
static node*
stmts_push(parser_state *p, node *stmts, node *stmt)
{
struct mrb_ast_stmts_node *n = stmts_node(stmts);
n->stmts = push(n->stmts, stmt);
return stmts;
}
/* struct: begin_node(body) */
static node*
new_begin(parser_state *p, node *body)
{
struct mrb_ast_begin_node *begin_node = NEW_NODE(begin, NODE_BEGIN);
begin_node->body = body;
return (node*)begin_node;
}
#define newline_node(n) (n)
/* struct: rescue_node(body, rescue_clauses, else_clause) */
static node*
new_rescue(parser_state *p, node *body, node *resq, node *els)
{
struct mrb_ast_rescue_node *n = NEW_NODE(rescue, NODE_RESCUE);
n->body = body;
n->rescue_clauses = resq;
n->else_clause = els;
return (node*)n;
}
static node*
new_mod_rescue(parser_state *p, node *body, node *resq)
{
return new_rescue(p, body, list1(list3(0, 0, resq)), 0);
}
/* struct: ensure_node(body, ensure_clause) */
static node*
new_ensure(parser_state *p, node *a, node *b)
{
struct mrb_ast_ensure_node *ensure_node = NEW_NODE(ensure, NODE_ENSURE);
ensure_node->body = a;
ensure_node->ensure_clause = b;
return (node*)ensure_node;
}
/* struct: nil_node() */
static node*
new_nil(parser_state *p)
{
struct mrb_ast_nil_node *n = NEW_NODE(nil, NODE_NIL);
return (node*)n;
}
/* struct: true_node() */
static node*
new_true(parser_state *p)
{
struct mrb_ast_true_node *n = NEW_NODE(true, NODE_TRUE);
return (node*)n;
}
/* struct: false_node() */
static node*
new_false(parser_state *p)
{
struct mrb_ast_false_node *n = NEW_NODE(false, NODE_FALSE);
return (node*)n;
}
/* struct: alias_node(new_name, old_name) */
static node*
new_alias(parser_state *p, mrb_sym a, mrb_sym b)
{
struct mrb_ast_alias_node *alias_node = NEW_NODE(alias, NODE_ALIAS);
alias_node->new_name = a;
alias_node->old_name = b;
return (node*)alias_node;
}
/* struct: if_node(cond, then_body, else_body) */
static node*
new_if(parser_state *p, node *condition, node *then_body, node *else_body)
{
void_expr_error(p, condition);
struct mrb_ast_if_node *n = NEW_NODE(if, NODE_IF);
n->condition = condition;
n->then_body = then_body;
n->else_body = else_body;
return (node*)n;
}
/* struct: while_node(cond, body) */
static node*
new_while(parser_state *p, node *condition, node *body)
{
void_expr_error(p, condition);
struct mrb_ast_while_node *n = NEW_NODE(while, NODE_WHILE);
n->condition = condition;
n->body = body;
return (node*)n;
}
/* struct: until_node(cond, body) */
static node*
new_until(parser_state *p, node *condition, node *body)
{
void_expr_error(p, condition);
struct mrb_ast_until_node *n = NEW_NODE(until, NODE_UNTIL);
n->condition = condition;
n->body = body;
return (node*)n;
}
/* struct: while_node(cond, body) */
static node*
new_while_mod(parser_state *p, node *condition, node *body)
{
node *while_node = new_while(p, condition, body);
struct mrb_ast_while_node *n = (struct mrb_ast_while_node*)while_node;
n->header.node_type = NODE_WHILE_MOD;
return while_node;
}
/* struct: until_node(cond, body) */
static node*
new_until_mod(parser_state *p, node *a, node *b)
{
node *until_node = new_until(p, a, b);
struct mrb_ast_until_node *n = (struct mrb_ast_until_node*)until_node;
n->header.node_type = NODE_UNTIL_MOD;
return until_node;
}
/* struct: for_node(var, obj, body) */
static node*
new_for(parser_state *p, node *v, node *o, node *b)
{
void_expr_error(p, o);
struct mrb_ast_for_node *n = NEW_NODE(for, NODE_FOR);
n->var = v;
n->iterable = o;
n->body = b;
return (node*)n;
}
/* struct: case_node(expr, when_clauses) - uses cons list */
static node*
new_case(parser_state *p, node *a, node *b)
{
void_expr_error(p, a);
struct mrb_ast_case_node *n = NEW_NODE(case, NODE_CASE);
n->value = a;
n->body = b;
return (node*)n;
}
/* Pattern matching case/in expression */
static node*
new_case_match(parser_state *p, node *val, node *in_clauses)
{
void_expr_error(p, val);
struct mrb_ast_case_match_node *n = NEW_NODE(case_match, NODE_CASE_MATCH);
n->value = val;
n->in_clauses = in_clauses;
return (node*)n;
}
/* Create value pattern node */
static node*
new_pat_value(parser_state *p, node *val)
{
struct mrb_ast_pat_value_node *n = NEW_NODE(pat_value, NODE_PAT_VALUE);
n->value = val;
return (node*)n;
}
/* Create variable pattern node */
static node*
new_pat_var(parser_state *p, mrb_sym name)
{
struct mrb_ast_pat_var_node *n = NEW_NODE(pat_var, NODE_PAT_VAR);
n->name = name;
/* Register as local variable if not wildcard */
if (name) {
local_add(p, name);
}
return (node*)n;
}
/* Create pin pattern node (^var) */
static node*
new_pat_pin(parser_state *p, mrb_sym name)
{
struct mrb_ast_pat_pin_node *n = NEW_NODE(pat_pin, NODE_PAT_PIN);
n->name = name;
/* Pin operator references existing variable, does not create new binding */
return (node*)n;
}
/* Create as pattern node (pattern => var) */
static node*
new_pat_as(parser_state *p, node *pattern, mrb_sym name)
{
struct mrb_ast_pat_as_node *n = NEW_NODE(pat_as, NODE_PAT_AS);
n->pattern = pattern;
n->name = name;
local_add(p, name);
return (node*)n;
}
/* Create alternative pattern node (pat1 | pat2) */
static node*
new_pat_alt(parser_state *p, node *left, node *right)
{
struct mrb_ast_pat_alt_node *n = NEW_NODE(pat_alt, NODE_PAT_ALT);
n->left = left;
n->right = right;
return (node*)n;
}
/* Create array pattern node [a, b, *rest, c] */
static node*
new_pat_array(parser_state *p, node *pre, node *rest, node *post)
{
struct mrb_ast_pat_array_node *n = NEW_NODE(pat_array, NODE_PAT_ARRAY);
n->pre = pre;
n->rest = rest;
n->post = post;
return (node*)n;
}
/* Create find pattern node [*pre, elems, *post] */
static node*
new_pat_find(parser_state *p, node *pre, node *elems, node *post)
{
struct mrb_ast_pat_find_node *n = NEW_NODE(pat_find, NODE_PAT_FIND);
n->pre = pre;
n->elems = elems;
n->post = post;
return (node*)n;
}
/* Create hash pattern node {a:, b: x, **rest} */
static node*
new_pat_hash(parser_state *p, node *pairs, node *rest)
{
struct mrb_ast_pat_hash_node *n = NEW_NODE(pat_hash, NODE_PAT_HASH);
n->pairs = pairs;
n->rest = rest;
return (node*)n;
}
/* Create one-line pattern matching node (expr in pattern / expr => pattern) */
static node*
new_match_pat(parser_state *p, node *value, node *pattern, mrb_bool raise_on_fail)
{
struct mrb_ast_match_pat_node *n = NEW_NODE(match_pat, NODE_MATCH_PAT);
n->value = value;
n->pattern = pattern;
n->raise_on_fail = raise_on_fail;
return (node*)n;
}
/* Create in-clause node for case/in */
static node*
new_in(parser_state *p, node *pattern, node *guard, node *body, mrb_bool guard_is_unless)
{
struct mrb_ast_in_node *n = NEW_NODE(in, NODE_IN);
n->pattern = pattern;
n->guard = guard;
n->body = body;
n->guard_is_unless = guard_is_unless;
return (node*)n;
}
/* struct: postexe_node(body) */
static node*
new_postexe(parser_state *p, node *a)
{
struct mrb_ast_postexe_node *postexe_node = NEW_NODE(postexe, NODE_POSTEXE);
postexe_node->body = a;
return (node*)postexe_node;
}
/* struct: self_node() */
static node*
new_self(parser_state *p)
{
struct mrb_ast_self_node *n = NEW_NODE(self, NODE_SELF);
return (node*)n;
}
/* struct: call_node(receiver, method, args) */
static node*
new_call(parser_state *p, node *receiver, mrb_sym method, node *args, int pass)
{
/* Calculate size needed (fixed size now) */ struct mrb_ast_call_node *n = NEW_NODE(call, NODE_CALL);
n->receiver = receiver;
n->method_name = method;
n->safe_call = (pass == 0); /* pass == 0 means safe call (&.) */
/* Store args pointer directly - no need to unpack and repack */
n->args = args;
void_expr_error(p, receiver);
return (node*)n;
}
/* struct: fcall_node(method, args) */
static node*
new_fcall(parser_state *p, mrb_sym b, node *c)
{
return new_call(p, NULL, b, c, '.');
}
/* (a b . c) */
static node*
new_callargs(parser_state *p, node *a, node *b, node *c)
{
/* Allocate struct mrb_ast_callargs (fixed size, like new_args) */
struct mrb_ast_callargs *callargs = (struct mrb_ast_callargs*)parser_palloc(p, sizeof(struct mrb_ast_callargs));
/* Initialize members directly */
callargs->regular_args = a; /* Cons list of regular arguments (preserves splat compatibility) */
callargs->keyword_args = b; /* Keyword arguments hash node */
callargs->block_arg = c; /* Block argument node */
/* Return direct cast to node (like new_args) */
return (node*)callargs;
}
/* struct: super_node(args) */
static node*
new_super(parser_state *p, node *c)
{
struct mrb_ast_super_node *n = NEW_NODE(super, NODE_SUPER);
n->args = c;
return (node*)n;
}
/* struct: zsuper_node() */
static node*
new_zsuper(parser_state *p)
{
struct mrb_ast_super_node *n = NEW_NODE(super, NODE_ZSUPER);
n->args = NULL; /* zsuper initially has no args, but may be added by call_with_block */
return (node*)n;
}
/* struct: yield_node(args) */
static node*
new_yield(parser_state *p, node *c)
{
/* Handle callargs structure - direct casting like new_args() */
if (c) {
struct mrb_ast_callargs *callargs = (struct mrb_ast_callargs*)c;
if (callargs->block_arg) {
yyerror(NULL, p, "both block arg and actual block given");
}
} struct mrb_ast_yield_node *n = NEW_NODE(yield, NODE_YIELD);
n->args = c;
return (node*)n;
}
/* struct: return_node(value) */
static node*
new_return(parser_state *p, node *c)
{
struct mrb_ast_return_node *n = NEW_NODE(return, NODE_RETURN);
n->args = c;
return (node*)n;
}
/* struct: break_node(value) */
static node*
new_break(parser_state *p, node *c)
{
struct mrb_ast_break_node *n = NEW_NODE(break, NODE_BREAK);
n->value = c;
return (node*)n;
}
/* struct: next_node(value) */
static node*
new_next(parser_state *p, node *c)
{
struct mrb_ast_next_node *n = NEW_NODE(next, NODE_NEXT);
n->value = c;
return (node*)n;
}
/* struct: redo_node() */
static node*
new_redo(parser_state *p)
{
struct mrb_ast_redo_node *n = NEW_NODE(redo, NODE_REDO);
return (node*)n;
}
/* struct: retry_node() */
static node*
new_retry(parser_state *p)
{
struct mrb_ast_retry_node *n = NEW_NODE(retry, NODE_RETRY);
return (node*)n;
}
/* struct: dot2_node(beg, end) */
static node*
new_dot2(parser_state *p, node *a, node *b)
{
struct mrb_ast_dot2_node *n = NEW_NODE(dot2, NODE_DOT2);
n->left = a;
n->right = b;
return (node*)n;
}
/* struct: dot3_node(beg, end) */
static node*
new_dot3(parser_state *p, node *a, node *b)
{
struct mrb_ast_dot3_node *n = NEW_NODE(dot3, NODE_DOT3);
n->left = a;
n->right = b;
return (node*)n;
}
/* struct: colon2_node(base, name) */
static node*
new_colon2(parser_state *p, node *b, mrb_sym c)
{
void_expr_error(p, b);
struct mrb_ast_colon2_node *colon2_node = NEW_NODE(colon2, NODE_COLON2);
colon2_node->base = b;
colon2_node->name = c;
return (node*)colon2_node;
}
/* struct: colon3_node(name) */
static node*
new_colon3(parser_state *p, mrb_sym c)
{
struct mrb_ast_colon3_node *colon3_node = NEW_NODE(colon3, NODE_COLON3);
colon3_node->name = c;
return (node*)colon3_node;
}
/* struct: and_node(left, right) */
static node*
new_and(parser_state *p, node *a, node *b)
{
void_expr_error(p, a);
struct mrb_ast_and_node *n = NEW_NODE(and, NODE_AND);
n->left = a;
n->right = b;
return (node*)n;
}
/* struct: or_node(left, right) */
static node*
new_or(parser_state *p, node *a, node *b)
{
void_expr_error(p, a);
struct mrb_ast_or_node *n = NEW_NODE(or, NODE_OR);
n->left = a;
n->right = b;
return (node*)n;
}
/* struct: array_node(elements) - uses cons list */
static node*
new_array(parser_state *p, node *a)
{
struct mrb_ast_array_node *n = NEW_NODE(array, NODE_ARRAY);
n->elements = a;
return (node*)n;
}
/* struct: splat_node(value) */
static node*
new_splat(parser_state *p, node *a)
{
void_expr_error(p, a);
struct mrb_ast_splat_node *splat_node = NEW_NODE(splat, NODE_SPLAT);
splat_node->value = a;
return (node*)splat_node;
}
/* struct: hash_node(pairs) - uses cons list */
static node*
new_hash(parser_state *p, node *a)
{
struct mrb_ast_hash_node *n = NEW_NODE(hash, NODE_HASH);
n->pairs = a;
return (node*)n;
}
/* (:sym . a) */
/* Symbol node creation - supports both variable and legacy modes */
static node*
new_sym(parser_state *p, mrb_sym sym)
{
struct mrb_ast_sym_node *n = NEW_NODE(sym, NODE_SYM);
n->symbol = sym;
return (node*)n;
}
static node*
new_xvar(parser_state *p, mrb_sym sym, enum node_type type)
{
struct mrb_ast_var_node *n = NEW_NODE(var, type);
n->symbol = sym;
return (node*)n;
}
#define new_lvar(p, sym) new_xvar(p, sym, NODE_LVAR)
#define new_ivar(p, sym) new_xvar(p, sym, NODE_IVAR)
#define new_gvar(p, sym) new_xvar(p, sym, NODE_GVAR)
#define new_cvar(p, sym) new_xvar(p, sym, NODE_CVAR)
static mrb_sym
new_strsym(parser_state *p, node* str)
{
size_t len = (size_t)str->car;
const char *s = (const char*)str->cdr;
return mrb_intern(p->mrb, s, len);
}
/* (:nvar . a) */
static node*
new_nvar(parser_state *p, int num)
{
int nvar;
node *nvars = p->nvars->cdr;
while (nvars) {
nvar = node_to_int(nvars->car);
if (nvar == -2) break; /* top of the scope */
if (nvar > 0) {
yyerror(NULL, p, "numbered parameter used in outer block");
break;
}
nvars->car = int_to_node(-1);
nvars = nvars->cdr;
}
nvar = node_to_int(p->nvars->car);
if (nvar == -1) {
yyerror(NULL, p, "numbered parameter used in inner block");
}
else {
p->nvars->car = int_to_node(nvar > num ? nvar : num);
}
struct mrb_ast_nvar_node *n = NEW_NODE(nvar, NODE_NVAR);
n->num = num;
return (node*)n;
}
/* struct: const_node(name) */
static node*
new_const(parser_state *p, mrb_sym sym)
{
struct mrb_ast_const_node *n = NEW_NODE(const, NODE_CONST);
n->symbol = sym;
return (node*)n;
}
/* struct: undef_node(syms) - uses cons list */
static node*
new_undef(parser_state *p, node *syms)
{
struct mrb_ast_undef_node *undef_node = NEW_NODE(undef, NODE_UNDEF);
undef_node->syms = syms;
return (node*)undef_node;
}
/* struct: class_node(path, super, body) */
static node*
new_class(parser_state *p, node *c, node *s, node *b)
{
void_expr_error(p, s);
struct mrb_ast_class_node *n = NEW_NODE(class, NODE_CLASS);
n->name = c;
n->superclass = s;
n->body = cons(locals_node(p), b);
return (node*)n;
}
/* struct: sclass_node(obj, body) */
static node*
new_sclass(parser_state *p, node *o, node *b)
{
void_expr_error(p, o);
struct mrb_ast_sclass_node *n = NEW_NODE(sclass, NODE_SCLASS);
n->obj = o;
n->body = cons(locals_node(p), b);
return (node*)n;
}
/* struct: module_node(path, body) */
static node*
new_module(parser_state *p, node *m, node *b)
{
struct mrb_ast_module_node *n = NEW_NODE(module, NODE_MODULE);
n->name = m;
n->body = cons(locals_node(p), b);
return (node*)n;
}
/* struct: def_node(name, args, body) */
static node*
new_def(parser_state *p, mrb_sym name)
{
struct mrb_ast_def_node *n = NEW_NODE(def, NODE_DEF);
n->name = name;
n->args = (struct mrb_ast_args *)int_to_node(p->cmdarg_stack);
n->locals = local_switch(p);
n->body = NULL;
return (node*)n;
}
static void
defn_setup(parser_state *p, node *d, node *a, node *b)
{
struct mrb_ast_def_node *n = def_node(d);
node *locals = n->locals;
n->locals = locals_node(p);
p->cmdarg_stack = node_to_int(n->args);
n->args = (struct mrb_ast_args *)a;
n->body = b;
local_resume(p, locals);
}
/* struct: sdef_node(obj, name, args, body) */
static node*
new_sdef(parser_state *p, node *o, mrb_sym name)
{
void_expr_error(p, o);
struct mrb_ast_sdef_node *sdef_node = NEW_NODE(sdef, NODE_SDEF);
sdef_node->obj = o;
sdef_node->name = name;
sdef_node->args = (struct mrb_ast_args *)int_to_node(p->cmdarg_stack);
sdef_node->locals = local_switch(p);
sdef_node->body = NULL;
return (node*)sdef_node;
}
static void
local_add_margs(parser_state *p, node *n)
{
while (n) {
if (node_type(n->car) == NODE_MARG) {
struct mrb_ast_masgn_node *masgn_n = (struct mrb_ast_masgn_node*)n->car;
node *rhs = masgn_n->rhs;
/* For parameter destructuring, rhs contains the locals */
if (rhs) {
node *t = rhs;
while (t) {
local_add_f(p, node_to_sym(t->car));
t = t->cdr;
}
/* Clear cons list RHS immediately after use */
masgn_n->rhs = NULL;
}
/* Process nested destructuring in lhs components */
if (masgn_n->pre) {
local_add_margs(p, masgn_n->pre);
}
if (masgn_n->post) {
local_add_margs(p, masgn_n->post);
}
}
n = n->cdr;
}
}
static void
local_add_lv(parser_state *p, node *lv)
{
while (lv) {
local_add_f(p, node_to_sym(lv->car));
lv = lv->cdr;
}
}
/* (m o r m2 tail) */
/* m: (a b c) */
/* o: ((a . e1) (b . e2)) */
/* r: a */
/* m2: (a b c) */
/* b: a */
static node*
new_args(parser_state *p, node *m, node *opt, mrb_sym rest, node *m2, node *tail)
{
local_add_margs(p, m);
local_add_margs(p, m2);
/* Save original optional arguments before processing */
node *orig_opt = opt;
/* Process optional arguments (keep original side effects) */
while (opt) {
/* opt: (sym . (opt . lv)) -> (sym . opt) */
local_add_lv(p, opt->car->cdr->cdr);
opt->car->cdr = opt->car->cdr->car;
opt = opt->cdr;
}
/* Allocate struct mrb_ast_args (no hdr) */
struct mrb_ast_args *args = (struct mrb_ast_args*)parser_palloc(p, sizeof(struct mrb_ast_args));
/* Initialize members */
args->mandatory_args = m;
args->optional_args = orig_opt;
args->rest_arg = rest;
args->post_mandatory_args = m2;
/* Deconstruct tail cons list: (kws . (kwrest . blk)) */
if (tail) {
args->keyword_args = (node*)tail->car; /* kws */
args->kwrest_arg = (mrb_sym)(intptr_t)tail->cdr->car; /* kwrest */
args->block_arg = (mrb_sym)(intptr_t)tail->cdr->cdr; /* blk */
cons_free(tail->cdr);
cons_free(tail);
}
else {
args->keyword_args = NULL;
args->kwrest_arg = 0;
args->block_arg = 0;
}
return (node*)args;
}
/* struct: args_tail_node(kwargs, kwrest, block) */
static node*
new_args_tail(parser_state *p, node *kws, mrb_sym kwrest, mrb_sym blk)
{
node *k;
if (kws || kwrest) {
local_add_kw(p, kwrest);
}
local_add_blk(p);
if (blk && blk != MRB_SYM(nil)) local_add_f(p, blk);
/* allocate register for keywords arguments */
/* order is for Proc#parameters */
for (k = kws; k; k = k->cdr) {
if (!k->car->cdr) { /* allocate required keywords - simplified structure: (key . NULL) */
local_add_f(p, node_to_sym(k->car->car));
}
}
for (k = kws; k; k = k->cdr) {
if (k->car->cdr) { /* allocate keywords with default - simplified structure: (key . value) */
local_add_lv(p, k->car->cdr->cdr); /* value->cdr for default args */
k->car->cdr = k->car->cdr->car; /* value->car for default args */
local_add_f(p, node_to_sym(k->car->car));
}
}
/* Return cons list: (keyword . (kwrest . blk)) */
return cons(kws, cons(sym_to_node(kwrest), sym_to_node(blk)));
}
/* (kw_sym . def_arg) - simplified from NODE_KW_ARG wrapper */
static node*
new_kw_arg(parser_state *p, mrb_sym kw, node *def_arg)
{
mrb_assert(kw);
return cons(sym_to_node(kw), def_arg);
}
/* (:kw_rest_args . a) */
static node*
new_kw_rest_args(parser_state *p, mrb_sym sym)
{
return sym_to_node(intern_op(pow)); /* Use ** symbol as direct marker */
}
static node*
new_args_dots(parser_state *p, node *m)
{
mrb_sym r = intern_op(mul);
mrb_sym k = intern_op(pow);
mrb_sym b = intern_op(and);
local_add_f(p, r);
return new_args(p, m, 0, r, 0, new_args_tail(p, NULL, k, b));
}
/* struct: block_arg_node(value) */
static node*
new_block_arg(parser_state *p, node *a)
{
struct mrb_ast_block_arg_node *block_arg_node = NEW_NODE(block_arg, NODE_BLOCK_ARG);
block_arg_node->value = a;
return (node*)block_arg_node;
}
static node*
setup_numparams(parser_state *p, node *a)
{
int nvars = node_to_int(p->nvars->car);
if (nvars > 0) {
int i;
mrb_sym sym;
// Check if any arguments are already defined
struct mrb_ast_args *args = (struct mrb_ast_args *)a;
if (a && (args->mandatory_args || args->optional_args || args->rest_arg ||
args->post_mandatory_args || args->keyword_args || args->kwrest_arg)) {
yyerror(NULL, p, "ordinary parameter is defined");
}
else if (p->locals) {
/* p->locals should not be NULL unless error happens before the point */
node* args = 0;
for (i = nvars; i > 0; i--) {
char buf[3];
buf[0] = '_';
buf[1] = i+'0';
buf[2] = '\0';
sym = intern_cstr(buf);
args = cons(new_lvar(p, sym), args);
p->locals->car = cons(sym_to_node(sym), p->locals->car);
}
a = new_args(p, args, 0, 0, 0, 0);
}
}
return a;
}
/* struct: block_node(args, body) */
static node*
new_block(parser_state *p, node *a, node *b)
{
a = setup_numparams(p, a); struct mrb_ast_block_node *n = NEW_NODE(block, NODE_BLOCK);
n->locals = locals_node(p);
n->args = (struct mrb_ast_args *)a;
n->body = b;
return (node*)n;
}
/* struct: lambda_node(args, body) */
static node*
new_lambda(parser_state *p, node *a, node *b)
{
a = setup_numparams(p, a); struct mrb_ast_lambda_node *lambda_node = NEW_NODE(lambda, NODE_LAMBDA);
lambda_node->locals = locals_node(p);
lambda_node->args = (struct mrb_ast_args *)a;
lambda_node->body = b;
return (node*)lambda_node;
}
/* struct: asgn_node(lhs, rhs) */
static node*
new_asgn(parser_state *p, node *a, node *b)
{
void_expr_error(p, b);
struct mrb_ast_asgn_node *n = NEW_NODE(asgn, NODE_ASGN);
n->lhs = a;
n->rhs = b;
return (node*)n;
}
/* Helper function to create MASGN/MARG nodes */
static node*
new_masgn_helper(parser_state *p, node *a, node *b, enum node_type node_type)
{
struct mrb_ast_masgn_node *n = NEW_NODE(masgn, node_type);
/* Extract pre, rest, post from cons list structure (a b c) */
if (a) {
n->pre = a->car; /* Pre-splat variables */
if (a->cdr) {
n->rest = a->cdr->car; /* Splat variable (or -1 for anonymous) */
if (a->cdr->cdr) {
n->post = a->cdr->cdr->car; /* Post-splat variables */
cons_free(a->cdr->cdr);
}
else {
n->post = NULL;
}
cons_free(a->cdr);
}
else {
n->rest = NULL;
n->post = NULL;
}
cons_free(a);
}
else {
n->pre = NULL;
n->rest = NULL;
n->post = NULL;
}
n->rhs = b;
return (node*)n;
}
/* struct: masgn_node(lhs, rhs) */
static node*
new_masgn(parser_state *p, node *a, node *b)
{
void_expr_error(p, b);
return new_masgn_helper(p, a, b, NODE_MASGN);
}
/* (:marg mlhs mrhs) no check - for parameter destructuring */
static node*
new_marg(parser_state *p, node *a)
{
return new_masgn_helper(p, a, p->locals->car, NODE_MARG);
}
/* struct: op_asgn_node(lhs, op, rhs) */
static node*
new_op_asgn(parser_state *p, node *a, mrb_sym op, node *b)
{
void_expr_error(p, b);
struct mrb_ast_op_asgn_node *n = NEW_NODE(op_asgn, NODE_OP_ASGN);
n->lhs = a;
n->op = op;
n->rhs = b;
return (node*)n;
}
static node*
new_int_n(parser_state *p, int32_t val)
{
struct mrb_ast_int_node *n = NEW_NODE(int, NODE_INT);
n->value = val;
return (node*)n;
}
static node*
new_imaginary(parser_state *p, node *imaginary)
{
return new_fcall(p, MRB_SYM(Complex),
new_callargs(p, list2(new_int_n(p, 0), imaginary), 0, 0));
}
static node*
new_rational(parser_state *p, node *rational)
{
return new_fcall(p, MRB_SYM(Rational), new_callargs(p, list1(rational), 0, 0));
}
/* Read integer into int32_t with overflow detection */
static mrb_bool
read_int32(const char *p, int base, int32_t *result)
{
const char *e = p + strlen(p);
int32_t value = 0;
mrb_bool neg = FALSE;
if (base < 2 || base > 16) {
return FALSE;
}
if (*p == '+') {
p++;
}
else if (*p == '-') {
neg = TRUE;
p++;
}
while (p < e) {
int n;
char c = *p;
/* Skip underscores */
if (c == '_') {
p++;
continue;
}
/* Parse digit */
if (c >= '0' && c <= '9') {
n = c - '0';
}
else if (c >= 'a' && c <= 'f') {
n = c - 'a' + 10;
}
else if (c >= 'A' && c <= 'F') {
n = c - 'A' + 10;
}
else {
/* Invalid character */
return FALSE;
}
if (n >= base) {
/* Digit not valid for this base */
return FALSE;
}
/* Check for multiplication overflow */
if (value > INT32_MAX / base) {
return FALSE;
}
value *= base;
/* Check for addition overflow */
if (value > INT32_MAX - n) {
/* Special case: -INT32_MIN is valid */
if (neg && value == (INT32_MAX - n + 1) && p + 1 == e) {
*result = INT32_MIN;
return TRUE;
}
return FALSE;
}
value += n;
p++;
}
*result = neg ? -value : value;
return TRUE;
}
static node*
new_int(parser_state *p, const char *s, int base, int suffix)
{
int32_t val;
node* result;
/* Try to parse as int32_t first */
if (read_int32(s, base, &val)) {
result = new_int_n(p, val);
}
else {
/* Big integer - create NODE_BIGINT */
struct mrb_ast_bigint_node *n = NEW_NODE(bigint, NODE_BIGINT);
n->string = strdup(s);
n->base = base;
result = (node*)n;
}
/* Handle suffix modifiers */
if (suffix & NUM_SUFFIX_R) {
result = new_rational(p, result);
}
if (suffix & NUM_SUFFIX_I) {
result = new_imaginary(p, result);
}
return result;
}
#ifndef MRB_NO_FLOAT
/* struct: float_node(value) */
static node*
new_float(parser_state *p, const char *s, int suffix)
{
struct mrb_ast_float_node *n = NEW_NODE(float, NODE_FLOAT);
n->value = strdup(s);
node* result = (node*)n;
if (suffix & NUM_SUFFIX_R) {
result = new_rational(p, result);
}
if (suffix & NUM_SUFFIX_I) {
result = new_imaginary(p, result);
}
return result;
}
#endif
/* Create string node from cons list */
/* struct: str_node(str) */
static node*
new_str(parser_state *p, node *a)
{
struct mrb_ast_str_node *n = NEW_NODE(str, NODE_STR);
n->list = a;
return (node*)n;
}
/* struct: xstr_node(str) */
static node*
new_xstr(parser_state *p, node *a)
{
struct mrb_ast_xstr_node *n = NEW_NODE(xstr, NODE_XSTR);
n->list = a;
return (node*)n;
}
/* struct: dsym_node(parts) - uses cons list */
static node*
new_dsym(parser_state *p, node *a)
{
struct mrb_ast_str_node *n = NEW_NODE(str, NODE_DSYM);
n->list = a;
return (node*)n;
}
/* struct: regx_node(pattern, flags, encoding) */
static node*
new_regx(parser_state *p, node *list, const char *flags, const char *encoding)
{
struct mrb_ast_regx_node *n = NEW_NODE(regx, NODE_REGX);
n->list = list;
n->flags = flags;
n->encoding = encoding;
return (node*)n;
}
/* struct: back_ref_node(n) */
static node*
new_back_ref(parser_state *p, int n)
{
struct mrb_ast_back_ref_node *backref_node = NEW_NODE(back_ref, NODE_BACK_REF);
backref_node->type = n;
return (node*)backref_node;
}
/* struct: nth_ref_node(n) */
static node*
new_nth_ref(parser_state *p, int n)
{
struct mrb_ast_nth_ref_node *nthref_node = NEW_NODE(nth_ref, NODE_NTH_REF);
nthref_node->nth = n;
return (node*)nthref_node;
}
/* struct: heredoc_node(str) */
static node*
new_heredoc(parser_state *p, struct mrb_parser_heredoc_info **infop)
{
struct mrb_ast_heredoc_node *n = NEW_NODE(heredoc, NODE_HEREDOC);
/* Initialize embedded heredoc info struct */
n->info.allow_indent = FALSE;
n->info.remove_indent = FALSE;
n->info.line_head = FALSE;
n->info.indent = 0;
n->info.indented = NULL;
n->info.type = str_not_parsing; // Will be set by heredoc processing
n->info.term = NULL; // Will be set by heredoc processing
n->info.term_len = 0;
n->info.doc = NULL;
/* Return pointer to embedded info if requested */
*infop = &n->info;
return (node*)n;
}
static void
new_bv(parser_state *p, mrb_sym id)
{
}
static node*
new_literal_delim(parser_state *p)
{
return cons((node*)0, (node*)0);
}
/* Helper for creating string representation cons (length . string_ptr) */
static node*
new_str_rep(parser_state *p, const char *str, int len)
{
return cons(int_to_node(len), (node*)strndup(str, len));
}
/* Helper for creating string representation from current token */
static node*
new_str_tok(parser_state *p)
{
return new_str_rep(p, tok(p), toklen(p));
}
/* Helper for creating empty string representation */
static node*
new_str_empty(parser_state *p)
{
return new_str_rep(p, "", 0);
}
/* (:words . a) */
static node*
new_words(parser_state *p, node *a)
{
struct mrb_ast_words_node *words_node = NEW_NODE(words, NODE_WORDS);
words_node->args = a;
return (node*)words_node;
}
/* (:symbols . a) */
static node*
new_symbols(parser_state *p, node *a)
{
struct mrb_ast_symbols_node *symbols_node = NEW_NODE(symbols, NODE_SYMBOLS);
symbols_node->args = a;
return (node*)symbols_node;
}
/* xxx ----------------------------- */
/* (:call a op) */
static node*
call_uni_op(parser_state *p, node *recv, const char *m)
{
void_expr_error(p, recv);
return new_call(p, recv, intern_cstr(m), 0, '.');
}
/* (:call a op b) */
static node*
call_bin_op(parser_state *p, node *recv, const char *m, node *arg1)
{
return new_call(p, recv, intern_cstr(m), new_callargs(p, list1(arg1), 0, 0), '.');
}
static void
args_with_block(parser_state *p, node *a, node *b)
{
if (b) {
/* Handle callargs structure - direct casting like new_args() */
struct mrb_ast_callargs *callargs = (struct mrb_ast_callargs*)a;
if (callargs->block_arg) {
yyerror(NULL, p, "both block arg and actual block given");
}
callargs->block_arg = b;
}
}
static void
endless_method_name(parser_state *p, node *defn)
{
struct mrb_ast_def_node *def = (struct mrb_ast_def_node*)defn;
mrb_sym sym = def->name;
mrb_int len;
const char *name = mrb_sym_name_len(p->mrb, sym, &len);
if (len > 1 && name[len-1] == '=') {
for (int i=0; i<len-1; i++) {
if (!identchar(name[i])) return;
}
yyerror(NULL, p, "setter method cannot be defined by endless method definition");
}
}
static void
call_with_block(parser_state *p, node *a, node *b)
{
if (!a) return;
/* Handle direct variable-sized nodes */
struct mrb_ast_var_header *header = (struct mrb_ast_var_header*)a;
enum node_type var_type = (enum node_type)header->node_type;
switch (var_type) {
case NODE_SUPER:
case NODE_ZSUPER:
/* For variable-sized super/zsuper nodes, update the args field directly */
{
struct mrb_ast_super_node *super_n = super_node(a);
if (!super_n->args) {
super_n->args = new_callargs(p, 0, 0, b);
}
else {
args_with_block(p, super_n->args, b);
}
}
break;
case NODE_YIELD:
/* Variable-sized yield nodes should generate an error when given a block */
yyerror(NULL, p, "block given to yield");
break;
case NODE_RETURN:
/* Variable-sized return nodes - recursively call with args */
{
struct mrb_ast_return_node *return_n = return_node(a);
if (return_n->args != NULL) {
call_with_block(p, return_n->args, b);
}
}
break;
case NODE_BREAK:
/* Variable-sized break nodes - recursively call with value */
{
struct mrb_ast_break_node *break_n = (struct mrb_ast_break_node*)a;
if (break_n->value != NULL) {
call_with_block(p, break_n->value, b);
}
}
break;
case NODE_NEXT:
/* Variable-sized next nodes - recursively call with value */
{
struct mrb_ast_next_node *next_n = (struct mrb_ast_next_node*)a;
if (next_n->value != NULL) {
call_with_block(p, next_n->value, b);
}
}
break;
case NODE_CALL:
/* Variable-sized call nodes - add block to existing args */
{
struct mrb_ast_call_node *call = call_node(a);
if (call->args && callargs_node(call->args)->block_arg) {
yyerror(NULL, p, "both block arg and actual block given");
return;
}
/* Use existing args and add block */
if (call->args) {
/* Modify existing callargs structure to add block */
args_with_block(p, call->args, b);
}
else {
/* Create new callargs with just the block */
call->args = new_callargs(p, NULL, NULL, b);
}
}
break;
default:
/* For other variable-sized nodes, do nothing */
break;
}
}
static node*
new_negate(parser_state *p, node *n)
{
struct mrb_ast_negate_node *negate_node = NEW_NODE(negate, NODE_NEGATE);
negate_node->operand = n;
return (node*)negate_node;
}
static node*
cond(node *n)
{
return n;
}
static node*
ret_args(parser_state *p, node *n)
{
/* Handle callargs structure - direct casting like new_args() */
struct mrb_ast_callargs *callargs = (struct mrb_ast_callargs*)n;
if (callargs->block_arg) {
yyerror(NULL, p, "block argument should not be given");
return NULL;
}
if (!callargs->regular_args) return NULL;
if (!callargs->regular_args->cdr) return callargs->regular_args->car;
return new_array(p, callargs->regular_args);
}
static void
assignable(parser_state *p, node *lhs)
{
switch (node_type(lhs)) {
case NODE_LVAR:
local_add(p, var_node(lhs)->symbol);
break;
case NODE_CONST:
if (p->in_def)
yyerror(NULL, p, "dynamic constant assignment");
break;
default:
/* Other node types don't need special handling in assignable */
break;
}
}
static node*
var_reference(parser_state *p, node *lhs)
{
/* Check if this is a variable-sized node */
if (node_type_p(lhs, NODE_LVAR)) {
mrb_sym sym = var_node(lhs)->symbol;
if (!local_var_p(p, sym)) {
node *n = new_fcall(p, sym, 0);
/* Don't free variable-sized nodes - they're managed by the parser allocator */
return n;
}
}
return lhs;
}
static node*
label_reference(parser_state *p, mrb_sym sym)
{
const char *name = mrb_sym_name(p->mrb, sym);
if (local_var_p(p, sym)) {
return new_lvar(p, sym);
}
else if (ISUPPER(name[0])) {
return new_const(p, sym);
}
else {
return new_fcall(p, sym, 0);
}
}
typedef enum mrb_string_type string_type;
typedef struct parser_lex_strterm {
int type;
int level;
int term;
int paren;
struct parser_lex_strterm *prev;
} parser_lex_strterm;
static parser_lex_strterm*
new_strterm(parser_state *p, string_type type, int term, int paren)
{
parser_lex_strterm *lex = (parser_lex_strterm*)parser_palloc(p, sizeof(parser_lex_strterm));
lex->type = type;
lex->level = 0;
lex->term = term;
lex->paren = paren;
lex->prev = p->lex_strterm;
return lex;
}
static void
end_strterm(parser_state *p)
{
parser_lex_strterm *term = p->lex_strterm->prev;
parser_pfree(p->lex_strterm);
p->lex_strterm = term;
}
static node*
push_strterm(parser_state *p)
{
node *n = cons((node*)p->lex_strterm, p->parsing_heredoc);
p->lex_strterm = NULL;
return n;
}
static void
pop_strterm(parser_state *p, node *n)
{
p->lex_strterm = (parser_lex_strterm*)n->car;
p->parsing_heredoc = n->cdr;
cons_free(n);
}
static parser_heredoc_info *
parsing_heredoc_info(parser_state *p)
{
node *nd = p->parsing_heredoc;
if (nd == NULL) return NULL;
/* mrb_assert(nd->car->car == NODE_HEREDOC); */
if (node_type(nd->car) == NODE_HEREDOC) {
/* Variable-sized heredoc node - return address of embedded info struct */
struct mrb_ast_heredoc_node *heredoc = (struct mrb_ast_heredoc_node*)nd->car;
return &heredoc->info;
}
return (parser_heredoc_info*)nd->car->cdr;
}
static void
heredoc_treat_nextline(parser_state *p)
{
if (p->heredocs_from_nextline == NULL) return;
if (p->parsing_heredoc && p->lex_strterm) {
append(p->heredocs_from_nextline, p->parsing_heredoc);
}
p->parsing_heredoc = p->heredocs_from_nextline;
p->lex_strterm = new_strterm(p, parsing_heredoc_info(p)->type, 0, 0);
p->heredocs_from_nextline = NULL;
}
static void
heredoc_end(parser_state *p)
{
p->parsing_heredoc = p->parsing_heredoc->cdr;
if (p->parsing_heredoc == NULL) {
p->lstate = EXPR_BEG;
end_strterm(p);
}
else {
/* next heredoc */
p->lex_strterm->type = parsing_heredoc_info(p)->type;
}
}
#define is_strterm_type(p,str_func) ((p)->lex_strterm->type & (str_func))
static void
prohibit_literals(parser_state *p, node *n)
{
if (n == 0) {
yyerror(NULL, p, "can't define singleton method for ().");
}
else {
enum node_type nt = node_type(n);
switch (nt) {
case NODE_INT:
case NODE_STR:
case NODE_XSTR:
case NODE_REGX:
case NODE_FLOAT:
case NODE_ARRAY:
case NODE_HEREDOC:
yyerror(NULL, p, "can't define singleton method for literals");
default:
break;
}
}
}
/* xxx ----------------------------- */
#line 2065 "mrbgems/mruby-compiler/core/y.tab.c"
# ifndef YY_CAST
# ifdef __cplusplus
# define YY_CAST(Type, Val) static_cast<Type> (Val)
# define YY_REINTERPRET_CAST(Type, Val) reinterpret_cast<Type> (Val)
# else
# define YY_CAST(Type, Val) ((Type) (Val))
# define YY_REINTERPRET_CAST(Type, Val) ((Type) (Val))
# endif
# endif
# ifndef YY_NULLPTR
# if defined __cplusplus
# if 201103L <= __cplusplus
# define YY_NULLPTR nullptr
# else
# define YY_NULLPTR 0
# endif
# else
# define YY_NULLPTR ((void*)0)
# endif
# endif
/* Use api.header.include to #include this header
instead of duplicating it here. */
/* Debug traces. */
#ifndef YYDEBUG
# define YYDEBUG 0
#endif
#if YYDEBUG && !defined(yydebug)
extern int yydebug;
#endif
/* Token kinds. */
#ifndef YYTOKENTYPE
# define YYTOKENTYPE
enum yytokentype
{
YYEMPTY = -2,
YYEOF = 0, /* "end of file" */
YYerror = 256, /* error */
YYUNDEF = 257, /* "invalid token" */
keyword_class = 258, /* "'class'" */
keyword_module = 259, /* "'module'" */
keyword_def = 260, /* "'def'" */
keyword_begin = 261, /* "'begin'" */
keyword_if = 262, /* "'if'" */
keyword_unless = 263, /* "'unless'" */
keyword_while = 264, /* "'while'" */
keyword_until = 265, /* "'until'" */
keyword_for = 266, /* "'for'" */
keyword_undef = 267, /* "'undef'" */
keyword_rescue = 268, /* "'rescue'" */
keyword_ensure = 269, /* "'ensure'" */
keyword_end = 270, /* "'end'" */
keyword_then = 271, /* "'then'" */
keyword_elsif = 272, /* "'elsif'" */
keyword_else = 273, /* "'else'" */
keyword_case = 274, /* "'case'" */
keyword_when = 275, /* "'when'" */
keyword_break = 276, /* "'break'" */
keyword_next = 277, /* "'next'" */
keyword_redo = 278, /* "'redo'" */
keyword_retry = 279, /* "'retry'" */
keyword_in = 280, /* "'in'" */
keyword_do = 281, /* "'do'" */
keyword_do_cond = 282, /* "'do' for condition" */
keyword_do_block = 283, /* "'do' for block" */
keyword_do_LAMBDA = 284, /* "'do' for lambda" */
keyword_return = 285, /* "'return'" */
keyword_yield = 286, /* "'yield'" */
keyword_super = 287, /* "'super'" */
keyword_self = 288, /* "'self'" */
keyword_nil = 289, /* "'nil'" */
keyword_true = 290, /* "'true'" */
keyword_false = 291, /* "'false'" */
keyword_and = 292, /* "'and'" */
keyword_or = 293, /* "'or'" */
keyword_not = 294, /* "'not'" */
modifier_if = 295, /* "'if' modifier" */
modifier_unless = 296, /* "'unless' modifier" */
modifier_while = 297, /* "'while' modifier" */
modifier_until = 298, /* "'until' modifier" */
modifier_rescue = 299, /* "'rescue' modifier" */
keyword_alias = 300, /* "'alias'" */
keyword_BEGIN = 301, /* "'BEGIN'" */
keyword_END = 302, /* "'END'" */
keyword__LINE__ = 303, /* "'__LINE__'" */
keyword__FILE__ = 304, /* "'__FILE__'" */
keyword__ENCODING__ = 305, /* "'__ENCODING__'" */
tIDENTIFIER = 306, /* "local variable or method" */
tFID = 307, /* "method" */
tGVAR = 308, /* "global variable" */
tIVAR = 309, /* "instance variable" */
tCONSTANT = 310, /* "constant" */
tCVAR = 311, /* "class variable" */
tLABEL_TAG = 312, /* "label" */
tINTEGER = 313, /* "integer literal" */
tFLOAT = 314, /* "float literal" */
tCHAR = 315, /* "character literal" */
tXSTRING = 316, /* tXSTRING */
tREGEXP = 317, /* tREGEXP */
tSTRING = 318, /* tSTRING */
tSTRING_PART = 319, /* tSTRING_PART */
tSTRING_MID = 320, /* tSTRING_MID */
tNTH_REF = 321, /* tNTH_REF */
tBACK_REF = 322, /* tBACK_REF */
tREGEXP_END = 323, /* tREGEXP_END */
tNUMPARAM = 324, /* "numbered parameter" */
tUPLUS = 325, /* "unary plus" */
tUMINUS = 326, /* "unary minus" */
tCMP = 327, /* "<=>" */
tEQ = 328, /* "==" */
tEQQ = 329, /* "===" */
tNEQ = 330, /* "!=" */
tGEQ = 331, /* ">=" */
tLEQ = 332, /* "<=" */
tANDOP = 333, /* "&&" */
tOROP = 334, /* "||" */
tMATCH = 335, /* "=~" */
tNMATCH = 336, /* "!~" */
tDOT2 = 337, /* ".." */
tDOT3 = 338, /* "..." */
tBDOT2 = 339, /* tBDOT2 */
tBDOT3 = 340, /* tBDOT3 */
tAREF = 341, /* tAREF */
tASET = 342, /* tASET */
tLSHFT = 343, /* "<<" */
tRSHFT = 344, /* ">>" */
tCOLON2 = 345, /* "::" */
tCOLON3 = 346, /* tCOLON3 */
tOP_ASGN = 347, /* tOP_ASGN */
tASSOC = 348, /* "=>" */
tLPAREN = 349, /* tLPAREN */
tLPAREN_ARG = 350, /* "(" */
tRPAREN = 351, /* ")" */
tLBRACK = 352, /* "[" */
tLBRACE = 353, /* tLBRACE */
tLBRACE_ARG = 354, /* "{" */
tSTAR = 355, /* "*" */
tPOW = 356, /* tPOW */
tDSTAR = 357, /* "**" */
tAMPER = 358, /* "&" */
tLAMBDA = 359, /* "->" */
tANDDOT = 360, /* "&." */
tSYMBEG = 361, /* "symbol" */
tSTRING_BEG = 362, /* "string literal" */
tXSTRING_BEG = 363, /* tXSTRING_BEG */
tSTRING_DVAR = 364, /* tSTRING_DVAR */
tREGEXP_BEG = 365, /* tREGEXP_BEG */
tWORDS_BEG = 366, /* tWORDS_BEG */
tSYMBOLS_BEG = 367, /* tSYMBOLS_BEG */
tLAMBEG = 368, /* tLAMBEG */
tHEREDOC_BEG = 369, /* "here document" */
tHEREDOC_END = 370, /* tHEREDOC_END */
tLITERAL_DELIM = 371, /* tLITERAL_DELIM */
tHD_LITERAL_DELIM = 372, /* tHD_LITERAL_DELIM */
tHD_STRING_PART = 373, /* tHD_STRING_PART */
tHD_STRING_MID = 374, /* tHD_STRING_MID */
tLOWEST = 375, /* tLOWEST */
tUMINUS_NUM = 376, /* tUMINUS_NUM */
tLAST_TOKEN = 377 /* tLAST_TOKEN */
};
typedef enum yytokentype yytoken_kind_t;
#endif
/* Value type. */
#if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
union YYSTYPE
{
#line 2008 "mrbgems/mruby-compiler/core/parse.y"
node *nd;
mrb_sym id;
int num;
stack_type stack;
const struct vtable *vars;
#line 2244 "mrbgems/mruby-compiler/core/y.tab.c"
};
typedef union YYSTYPE YYSTYPE;
# define YYSTYPE_IS_TRIVIAL 1
# define YYSTYPE_IS_DECLARED 1
#endif
/* Location type. */
#if ! defined YYLTYPE && ! defined YYLTYPE_IS_DECLARED
typedef struct YYLTYPE YYLTYPE;
struct YYLTYPE
{
int first_line;
int first_column;
int last_line;
int last_column;
};
# define YYLTYPE_IS_DECLARED 1
# define YYLTYPE_IS_TRIVIAL 1
#endif
int yyparse (parser_state *p);
/* Symbol kind. */
enum yysymbol_kind_t
{
YYSYMBOL_YYEMPTY = -2,
YYSYMBOL_YYEOF = 0, /* "end of file" */
YYSYMBOL_YYerror = 1, /* error */
YYSYMBOL_YYUNDEF = 2, /* "invalid token" */
YYSYMBOL_keyword_class = 3, /* "'class'" */
YYSYMBOL_keyword_module = 4, /* "'module'" */
YYSYMBOL_keyword_def = 5, /* "'def'" */
YYSYMBOL_keyword_begin = 6, /* "'begin'" */
YYSYMBOL_keyword_if = 7, /* "'if'" */
YYSYMBOL_keyword_unless = 8, /* "'unless'" */
YYSYMBOL_keyword_while = 9, /* "'while'" */
YYSYMBOL_keyword_until = 10, /* "'until'" */
YYSYMBOL_keyword_for = 11, /* "'for'" */
YYSYMBOL_keyword_undef = 12, /* "'undef'" */
YYSYMBOL_keyword_rescue = 13, /* "'rescue'" */
YYSYMBOL_keyword_ensure = 14, /* "'ensure'" */
YYSYMBOL_keyword_end = 15, /* "'end'" */
YYSYMBOL_keyword_then = 16, /* "'then'" */
YYSYMBOL_keyword_elsif = 17, /* "'elsif'" */
YYSYMBOL_keyword_else = 18, /* "'else'" */
YYSYMBOL_keyword_case = 19, /* "'case'" */
YYSYMBOL_keyword_when = 20, /* "'when'" */
YYSYMBOL_keyword_break = 21, /* "'break'" */
YYSYMBOL_keyword_next = 22, /* "'next'" */
YYSYMBOL_keyword_redo = 23, /* "'redo'" */
YYSYMBOL_keyword_retry = 24, /* "'retry'" */
YYSYMBOL_keyword_in = 25, /* "'in'" */
YYSYMBOL_keyword_do = 26, /* "'do'" */
YYSYMBOL_keyword_do_cond = 27, /* "'do' for condition" */
YYSYMBOL_keyword_do_block = 28, /* "'do' for block" */
YYSYMBOL_keyword_do_LAMBDA = 29, /* "'do' for lambda" */
YYSYMBOL_keyword_return = 30, /* "'return'" */
YYSYMBOL_keyword_yield = 31, /* "'yield'" */
YYSYMBOL_keyword_super = 32, /* "'super'" */
YYSYMBOL_keyword_self = 33, /* "'self'" */
YYSYMBOL_keyword_nil = 34, /* "'nil'" */
YYSYMBOL_keyword_true = 35, /* "'true'" */
YYSYMBOL_keyword_false = 36, /* "'false'" */
YYSYMBOL_keyword_and = 37, /* "'and'" */
YYSYMBOL_keyword_or = 38, /* "'or'" */
YYSYMBOL_keyword_not = 39, /* "'not'" */
YYSYMBOL_modifier_if = 40, /* "'if' modifier" */
YYSYMBOL_modifier_unless = 41, /* "'unless' modifier" */
YYSYMBOL_modifier_while = 42, /* "'while' modifier" */
YYSYMBOL_modifier_until = 43, /* "'until' modifier" */
YYSYMBOL_modifier_rescue = 44, /* "'rescue' modifier" */
YYSYMBOL_keyword_alias = 45, /* "'alias'" */
YYSYMBOL_keyword_BEGIN = 46, /* "'BEGIN'" */
YYSYMBOL_keyword_END = 47, /* "'END'" */
YYSYMBOL_keyword__LINE__ = 48, /* "'__LINE__'" */
YYSYMBOL_keyword__FILE__ = 49, /* "'__FILE__'" */
YYSYMBOL_keyword__ENCODING__ = 50, /* "'__ENCODING__'" */
YYSYMBOL_tIDENTIFIER = 51, /* "local variable or method" */
YYSYMBOL_tFID = 52, /* "method" */
YYSYMBOL_tGVAR = 53, /* "global variable" */
YYSYMBOL_tIVAR = 54, /* "instance variable" */
YYSYMBOL_tCONSTANT = 55, /* "constant" */
YYSYMBOL_tCVAR = 56, /* "class variable" */
YYSYMBOL_tLABEL_TAG = 57, /* "label" */
YYSYMBOL_tINTEGER = 58, /* "integer literal" */
YYSYMBOL_tFLOAT = 59, /* "float literal" */
YYSYMBOL_tCHAR = 60, /* "character literal" */
YYSYMBOL_tXSTRING = 61, /* tXSTRING */
YYSYMBOL_tREGEXP = 62, /* tREGEXP */
YYSYMBOL_tSTRING = 63, /* tSTRING */
YYSYMBOL_tSTRING_PART = 64, /* tSTRING_PART */
YYSYMBOL_tSTRING_MID = 65, /* tSTRING_MID */
YYSYMBOL_tNTH_REF = 66, /* tNTH_REF */
YYSYMBOL_tBACK_REF = 67, /* tBACK_REF */
YYSYMBOL_tREGEXP_END = 68, /* tREGEXP_END */
YYSYMBOL_tNUMPARAM = 69, /* "numbered parameter" */
YYSYMBOL_tUPLUS = 70, /* "unary plus" */
YYSYMBOL_tUMINUS = 71, /* "unary minus" */
YYSYMBOL_tCMP = 72, /* "<=>" */
YYSYMBOL_tEQ = 73, /* "==" */
YYSYMBOL_tEQQ = 74, /* "===" */
YYSYMBOL_tNEQ = 75, /* "!=" */
YYSYMBOL_tGEQ = 76, /* ">=" */
YYSYMBOL_tLEQ = 77, /* "<=" */
YYSYMBOL_tANDOP = 78, /* "&&" */
YYSYMBOL_tOROP = 79, /* "||" */
YYSYMBOL_tMATCH = 80, /* "=~" */
YYSYMBOL_tNMATCH = 81, /* "!~" */
YYSYMBOL_tDOT2 = 82, /* ".." */
YYSYMBOL_tDOT3 = 83, /* "..." */
YYSYMBOL_tBDOT2 = 84, /* tBDOT2 */
YYSYMBOL_tBDOT3 = 85, /* tBDOT3 */
YYSYMBOL_tAREF = 86, /* tAREF */
YYSYMBOL_tASET = 87, /* tASET */
YYSYMBOL_tLSHFT = 88, /* "<<" */
YYSYMBOL_tRSHFT = 89, /* ">>" */
YYSYMBOL_tCOLON2 = 90, /* "::" */
YYSYMBOL_tCOLON3 = 91, /* tCOLON3 */
YYSYMBOL_tOP_ASGN = 92, /* tOP_ASGN */
YYSYMBOL_tASSOC = 93, /* "=>" */
YYSYMBOL_tLPAREN = 94, /* tLPAREN */
YYSYMBOL_tLPAREN_ARG = 95, /* "(" */
YYSYMBOL_tRPAREN = 96, /* ")" */
YYSYMBOL_tLBRACK = 97, /* "[" */
YYSYMBOL_tLBRACE = 98, /* tLBRACE */
YYSYMBOL_tLBRACE_ARG = 99, /* "{" */
YYSYMBOL_tSTAR = 100, /* "*" */
YYSYMBOL_tPOW = 101, /* tPOW */
YYSYMBOL_tDSTAR = 102, /* "**" */
YYSYMBOL_tAMPER = 103, /* "&" */
YYSYMBOL_tLAMBDA = 104, /* "->" */
YYSYMBOL_tANDDOT = 105, /* "&." */
YYSYMBOL_tSYMBEG = 106, /* "symbol" */
YYSYMBOL_tSTRING_BEG = 107, /* "string literal" */
YYSYMBOL_tXSTRING_BEG = 108, /* tXSTRING_BEG */
YYSYMBOL_tSTRING_DVAR = 109, /* tSTRING_DVAR */
YYSYMBOL_tREGEXP_BEG = 110, /* tREGEXP_BEG */
YYSYMBOL_tWORDS_BEG = 111, /* tWORDS_BEG */
YYSYMBOL_tSYMBOLS_BEG = 112, /* tSYMBOLS_BEG */
YYSYMBOL_tLAMBEG = 113, /* tLAMBEG */
YYSYMBOL_tHEREDOC_BEG = 114, /* "here document" */
YYSYMBOL_tHEREDOC_END = 115, /* tHEREDOC_END */
YYSYMBOL_tLITERAL_DELIM = 116, /* tLITERAL_DELIM */
YYSYMBOL_tHD_LITERAL_DELIM = 117, /* tHD_LITERAL_DELIM */
YYSYMBOL_tHD_STRING_PART = 118, /* tHD_STRING_PART */
YYSYMBOL_tHD_STRING_MID = 119, /* tHD_STRING_MID */
YYSYMBOL_tLOWEST = 120, /* tLOWEST */
YYSYMBOL_121_ = 121, /* '=' */
YYSYMBOL_122_ = 122, /* '?' */
YYSYMBOL_123_ = 123, /* ':' */
YYSYMBOL_124_ = 124, /* '>' */
YYSYMBOL_125_ = 125, /* '<' */
YYSYMBOL_126_ = 126, /* '|' */
YYSYMBOL_127_ = 127, /* '^' */
YYSYMBOL_128_ = 128, /* '&' */
YYSYMBOL_129_ = 129, /* '+' */
YYSYMBOL_130_ = 130, /* '-' */
YYSYMBOL_131_ = 131, /* '*' */
YYSYMBOL_132_ = 132, /* '/' */
YYSYMBOL_133_ = 133, /* '%' */
YYSYMBOL_tUMINUS_NUM = 134, /* tUMINUS_NUM */
YYSYMBOL_135_ = 135, /* '!' */
YYSYMBOL_136_ = 136, /* '~' */
YYSYMBOL_tLAST_TOKEN = 137, /* tLAST_TOKEN */
YYSYMBOL_138_ = 138, /* '{' */
YYSYMBOL_139_ = 139, /* '}' */
YYSYMBOL_140_ = 140, /* '[' */
YYSYMBOL_141_ = 141, /* ']' */
YYSYMBOL_142_ = 142, /* ',' */
YYSYMBOL_143_ = 143, /* '`' */
YYSYMBOL_144_ = 144, /* '(' */
YYSYMBOL_145_ = 145, /* ')' */
YYSYMBOL_146_ = 146, /* ';' */
YYSYMBOL_147_ = 147, /* '.' */
YYSYMBOL_148_n_ = 148, /* '\n' */
YYSYMBOL_YYACCEPT = 149, /* $accept */
YYSYMBOL_150_1 = 150, /* $@1 */
YYSYMBOL_program = 151, /* program */
YYSYMBOL_top_compstmt = 152, /* top_compstmt */
YYSYMBOL_top_stmts = 153, /* top_stmts */
YYSYMBOL_top_stmt = 154, /* top_stmt */
YYSYMBOL_155_2 = 155, /* @2 */
YYSYMBOL_bodystmt = 156, /* bodystmt */
YYSYMBOL_compstmt = 157, /* compstmt */
YYSYMBOL_stmts = 158, /* stmts */
YYSYMBOL_159_3 = 159, /* $@3 */
YYSYMBOL_stmt = 160, /* stmt */
YYSYMBOL_command_asgn = 161, /* command_asgn */
YYSYMBOL_command_rhs = 162, /* command_rhs */
YYSYMBOL_expr = 163, /* expr */
YYSYMBOL_164_4 = 164, /* $@4 */
YYSYMBOL_165_5 = 165, /* $@5 */
YYSYMBOL_defn_head = 166, /* defn_head */
YYSYMBOL_167_6 = 167, /* $@6 */
YYSYMBOL_defs_head = 168, /* defs_head */
YYSYMBOL_expr_value = 169, /* expr_value */
YYSYMBOL_command_call = 170, /* command_call */
YYSYMBOL_block_command = 171, /* block_command */
YYSYMBOL_172_7 = 172, /* $@7 */
YYSYMBOL_cmd_brace_block = 173, /* cmd_brace_block */
YYSYMBOL_command = 174, /* command */
YYSYMBOL_mlhs = 175, /* mlhs */
YYSYMBOL_mlhs_inner = 176, /* mlhs_inner */
YYSYMBOL_mlhs_basic = 177, /* mlhs_basic */
YYSYMBOL_mlhs_item = 178, /* mlhs_item */
YYSYMBOL_mlhs_list = 179, /* mlhs_list */
YYSYMBOL_mlhs_post = 180, /* mlhs_post */
YYSYMBOL_mlhs_node = 181, /* mlhs_node */
YYSYMBOL_lhs = 182, /* lhs */
YYSYMBOL_cname = 183, /* cname */
YYSYMBOL_cpath = 184, /* cpath */
YYSYMBOL_fname = 185, /* fname */
YYSYMBOL_fsym = 186, /* fsym */
YYSYMBOL_undef_list = 187, /* undef_list */
YYSYMBOL_188_8 = 188, /* $@8 */
YYSYMBOL_op = 189, /* op */
YYSYMBOL_reswords = 190, /* reswords */
YYSYMBOL_arg = 191, /* arg */
YYSYMBOL_aref_args = 192, /* aref_args */
YYSYMBOL_arg_rhs = 193, /* arg_rhs */
YYSYMBOL_paren_args = 194, /* paren_args */
YYSYMBOL_opt_paren_args = 195, /* opt_paren_args */
YYSYMBOL_opt_call_args = 196, /* opt_call_args */
YYSYMBOL_call_args = 197, /* call_args */
YYSYMBOL_198_9 = 198, /* @9 */
YYSYMBOL_command_args = 199, /* command_args */
YYSYMBOL_block_arg = 200, /* block_arg */
YYSYMBOL_opt_block_arg = 201, /* opt_block_arg */
YYSYMBOL_comma = 202, /* comma */
YYSYMBOL_args = 203, /* args */
YYSYMBOL_mrhs = 204, /* mrhs */
YYSYMBOL_primary = 205, /* primary */
YYSYMBOL_206_10 = 206, /* @10 */
YYSYMBOL_207_11 = 207, /* @11 */
YYSYMBOL_208_12 = 208, /* $@12 */
YYSYMBOL_209_13 = 209, /* $@13 */
YYSYMBOL_210_14 = 210, /* @14 */
YYSYMBOL_211_15 = 211, /* @15 */
YYSYMBOL_212_16 = 212, /* $@16 */
YYSYMBOL_213_17 = 213, /* $@17 */
YYSYMBOL_214_18 = 214, /* $@18 */
YYSYMBOL_215_19 = 215, /* $@19 */
YYSYMBOL_216_20 = 216, /* $@20 */
YYSYMBOL_217_21 = 217, /* $@21 */
YYSYMBOL_218_22 = 218, /* @22 */
YYSYMBOL_219_23 = 219, /* @23 */
YYSYMBOL_220_24 = 220, /* @24 */
YYSYMBOL_221_25 = 221, /* @25 */
YYSYMBOL_primary_value = 222, /* primary_value */
YYSYMBOL_then = 223, /* then */
YYSYMBOL_do = 224, /* do */
YYSYMBOL_if_tail = 225, /* if_tail */
YYSYMBOL_opt_else = 226, /* opt_else */
YYSYMBOL_for_var = 227, /* for_var */
YYSYMBOL_f_margs = 228, /* f_margs */
YYSYMBOL_229_26 = 229, /* $@26 */
YYSYMBOL_block_args_tail = 230, /* block_args_tail */
YYSYMBOL_opt_block_args_tail = 231, /* opt_block_args_tail */
YYSYMBOL_block_param = 232, /* block_param */
YYSYMBOL_opt_block_param = 233, /* opt_block_param */
YYSYMBOL_234_27 = 234, /* $@27 */
YYSYMBOL_block_param_def = 235, /* block_param_def */
YYSYMBOL_opt_bv_decl = 236, /* opt_bv_decl */
YYSYMBOL_bv_decls = 237, /* bv_decls */
YYSYMBOL_bvar = 238, /* bvar */
YYSYMBOL_f_larglist = 239, /* f_larglist */
YYSYMBOL_lambda_body = 240, /* lambda_body */
YYSYMBOL_241_28 = 241, /* @28 */
YYSYMBOL_do_block = 242, /* do_block */
YYSYMBOL_block_call = 243, /* block_call */
YYSYMBOL_method_call = 244, /* method_call */
YYSYMBOL_245_29 = 245, /* @29 */
YYSYMBOL_brace_block = 246, /* brace_block */
YYSYMBOL_247_30 = 247, /* @30 */
YYSYMBOL_case_body = 248, /* case_body */
YYSYMBOL_cases = 249, /* cases */
YYSYMBOL_in_clauses = 250, /* in_clauses */
YYSYMBOL_251_31 = 251, /* $@31 */
YYSYMBOL_252_32 = 252, /* $@32 */
YYSYMBOL_253_33 = 253, /* $@33 */
YYSYMBOL_p_expr = 254, /* p_expr */
YYSYMBOL_p_args_head = 255, /* p_args_head */
YYSYMBOL_p_args_post = 256, /* p_args_post */
YYSYMBOL_p_as = 257, /* p_as */
YYSYMBOL_p_alt = 258, /* p_alt */
YYSYMBOL_p_value = 259, /* p_value */
YYSYMBOL_p_array = 260, /* p_array */
YYSYMBOL_p_array_body = 261, /* p_array_body */
YYSYMBOL_p_array_elems = 262, /* p_array_elems */
YYSYMBOL_p_rest = 263, /* p_rest */
YYSYMBOL_p_const = 264, /* p_const */
YYSYMBOL_p_hash = 265, /* p_hash */
YYSYMBOL_p_hash_body = 266, /* p_hash_body */
YYSYMBOL_p_hash_elems = 267, /* p_hash_elems */
YYSYMBOL_p_hash_elem = 268, /* p_hash_elem */
YYSYMBOL_p_kwrest = 269, /* p_kwrest */
YYSYMBOL_p_var = 270, /* p_var */
YYSYMBOL_opt_rescue = 271, /* opt_rescue */
YYSYMBOL_exc_list = 272, /* exc_list */
YYSYMBOL_exc_var = 273, /* exc_var */
YYSYMBOL_opt_ensure = 274, /* opt_ensure */
YYSYMBOL_literal = 275, /* literal */
YYSYMBOL_string = 276, /* string */
YYSYMBOL_string_fragment = 277, /* string_fragment */
YYSYMBOL_string_rep = 278, /* string_rep */
YYSYMBOL_string_interp = 279, /* string_interp */
YYSYMBOL_280_34 = 280, /* @34 */
YYSYMBOL_xstring = 281, /* xstring */
YYSYMBOL_regexp = 282, /* regexp */
YYSYMBOL_heredoc = 283, /* heredoc */
YYSYMBOL_heredoc_bodies = 284, /* heredoc_bodies */
YYSYMBOL_heredoc_body = 285, /* heredoc_body */
YYSYMBOL_heredoc_string_rep = 286, /* heredoc_string_rep */
YYSYMBOL_heredoc_string_interp = 287, /* heredoc_string_interp */
YYSYMBOL_288_35 = 288, /* @35 */
YYSYMBOL_words = 289, /* words */
YYSYMBOL_symbol = 290, /* symbol */
YYSYMBOL_basic_symbol = 291, /* basic_symbol */
YYSYMBOL_sym = 292, /* sym */
YYSYMBOL_symbols = 293, /* symbols */
YYSYMBOL_numeric = 294, /* numeric */
YYSYMBOL_variable = 295, /* variable */
YYSYMBOL_var_lhs = 296, /* var_lhs */
YYSYMBOL_var_ref = 297, /* var_ref */
YYSYMBOL_backref = 298, /* backref */
YYSYMBOL_superclass = 299, /* superclass */
YYSYMBOL_300_36 = 300, /* $@36 */
YYSYMBOL_f_opt_arglist_paren = 301, /* f_opt_arglist_paren */
YYSYMBOL_f_arglist_paren = 302, /* f_arglist_paren */
YYSYMBOL_f_arglist = 303, /* f_arglist */
YYSYMBOL_f_label = 304, /* f_label */
YYSYMBOL_f_kw = 305, /* f_kw */
YYSYMBOL_f_block_kw = 306, /* f_block_kw */
YYSYMBOL_f_block_kwarg = 307, /* f_block_kwarg */
YYSYMBOL_f_kwarg = 308, /* f_kwarg */
YYSYMBOL_kwrest_mark = 309, /* kwrest_mark */
YYSYMBOL_f_kwrest = 310, /* f_kwrest */
YYSYMBOL_args_tail = 311, /* args_tail */
YYSYMBOL_opt_args_tail = 312, /* opt_args_tail */
YYSYMBOL_f_args = 313, /* f_args */
YYSYMBOL_f_bad_arg = 314, /* f_bad_arg */
YYSYMBOL_f_norm_arg = 315, /* f_norm_arg */
YYSYMBOL_f_arg_item = 316, /* f_arg_item */
YYSYMBOL_317_37 = 317, /* @37 */
YYSYMBOL_f_arg = 318, /* f_arg */
YYSYMBOL_f_opt_asgn = 319, /* f_opt_asgn */
YYSYMBOL_f_opt = 320, /* f_opt */
YYSYMBOL_f_block_opt = 321, /* f_block_opt */
YYSYMBOL_f_block_optarg = 322, /* f_block_optarg */
YYSYMBOL_f_optarg = 323, /* f_optarg */
YYSYMBOL_restarg_mark = 324, /* restarg_mark */
YYSYMBOL_f_rest_arg = 325, /* f_rest_arg */
YYSYMBOL_blkarg_mark = 326, /* blkarg_mark */
YYSYMBOL_f_block_arg = 327, /* f_block_arg */
YYSYMBOL_opt_f_block_arg = 328, /* opt_f_block_arg */
YYSYMBOL_singleton = 329, /* singleton */
YYSYMBOL_330_38 = 330, /* $@38 */
YYSYMBOL_assoc_list = 331, /* assoc_list */
YYSYMBOL_assocs = 332, /* assocs */
YYSYMBOL_assoc = 333, /* assoc */
YYSYMBOL_operation = 334, /* operation */
YYSYMBOL_operation2 = 335, /* operation2 */
YYSYMBOL_operation3 = 336, /* operation3 */
YYSYMBOL_dot_or_colon = 337, /* dot_or_colon */
YYSYMBOL_call_op = 338, /* call_op */
YYSYMBOL_call_op2 = 339, /* call_op2 */
YYSYMBOL_opt_terms = 340, /* opt_terms */
YYSYMBOL_opt_nl = 341, /* opt_nl */
YYSYMBOL_rparen = 342, /* rparen */
YYSYMBOL_trailer = 343, /* trailer */
YYSYMBOL_term = 344, /* term */
YYSYMBOL_nl = 345, /* nl */
YYSYMBOL_terms = 346, /* terms */
YYSYMBOL_none = 347 /* none */
};
typedef enum yysymbol_kind_t yysymbol_kind_t;
#ifdef short
# undef short
#endif
/* On compilers that do not define __PTRDIFF_MAX__ etc., make sure
<limits.h> and (if available) <stdint.h> are included
so that the code can choose integer types of a good width. */
#ifndef __PTRDIFF_MAX__
# include <limits.h> /* INFRINGES ON USER NAME SPACE */
# if defined __STDC_VERSION__ && 199901 <= __STDC_VERSION__
# include <stdint.h> /* INFRINGES ON USER NAME SPACE */
# define YY_STDINT_H
# endif
#endif
/* Narrow types that promote to a signed type and that can represent a
signed or unsigned integer of at least N bits. In tables they can
save space and decrease cache pressure. Promoting to a signed type
helps avoid bugs in integer arithmetic. */
#ifdef __INT_LEAST8_MAX__
typedef __INT_LEAST8_TYPE__ yytype_int8;
#elif defined YY_STDINT_H
typedef int_least8_t yytype_int8;
#else
typedef signed char yytype_int8;
#endif
#ifdef __INT_LEAST16_MAX__
typedef __INT_LEAST16_TYPE__ yytype_int16;
#elif defined YY_STDINT_H
typedef int_least16_t yytype_int16;
#else
typedef short yytype_int16;
#endif
/* Work around bug in HP-UX 11.23, which defines these macros
incorrectly for preprocessor constants. This workaround can likely
be removed in 2023, as HPE has promised support for HP-UX 11.23
(aka HP-UX 11i v2) only through the end of 2022; see Table 2 of
<https://h20195.www2.hpe.com/V2/getpdf.aspx/4AA4-7673ENW.pdf>. */
#ifdef __hpux
# undef UINT_LEAST8_MAX
# undef UINT_LEAST16_MAX
# define UINT_LEAST8_MAX 255
# define UINT_LEAST16_MAX 65535
#endif
#if defined __UINT_LEAST8_MAX__ && __UINT_LEAST8_MAX__ <= __INT_MAX__
typedef __UINT_LEAST8_TYPE__ yytype_uint8;
#elif (!defined __UINT_LEAST8_MAX__ && defined YY_STDINT_H \
&& UINT_LEAST8_MAX <= INT_MAX)
typedef uint_least8_t yytype_uint8;
#elif !defined __UINT_LEAST8_MAX__ && UCHAR_MAX <= INT_MAX
typedef unsigned char yytype_uint8;
#else
typedef short yytype_uint8;
#endif
#if defined __UINT_LEAST16_MAX__ && __UINT_LEAST16_MAX__ <= __INT_MAX__
typedef __UINT_LEAST16_TYPE__ yytype_uint16;
#elif (!defined __UINT_LEAST16_MAX__ && defined YY_STDINT_H \
&& UINT_LEAST16_MAX <= INT_MAX)
typedef uint_least16_t yytype_uint16;
#elif !defined __UINT_LEAST16_MAX__ && USHRT_MAX <= INT_MAX
typedef unsigned short yytype_uint16;
#else
typedef int yytype_uint16;
#endif
#ifndef YYPTRDIFF_T
# if defined __PTRDIFF_TYPE__ && defined __PTRDIFF_MAX__
# define YYPTRDIFF_T __PTRDIFF_TYPE__
# define YYPTRDIFF_MAXIMUM __PTRDIFF_MAX__
# elif defined PTRDIFF_MAX
# ifndef ptrdiff_t
# include <stddef.h> /* INFRINGES ON USER NAME SPACE */
# endif
# define YYPTRDIFF_T ptrdiff_t
# define YYPTRDIFF_MAXIMUM PTRDIFF_MAX
# else
# define YYPTRDIFF_T long
# define YYPTRDIFF_MAXIMUM LONG_MAX
# endif
#endif
#ifndef YYSIZE_T
# ifdef __SIZE_TYPE__
# define YYSIZE_T __SIZE_TYPE__
# elif defined size_t
# define YYSIZE_T size_t
# elif defined __STDC_VERSION__ && 199901 <= __STDC_VERSION__
# include <stddef.h> /* INFRINGES ON USER NAME SPACE */
# define YYSIZE_T size_t
# else
# define YYSIZE_T unsigned
# endif
#endif
#define YYSIZE_MAXIMUM \
YY_CAST (YYPTRDIFF_T, \
(YYPTRDIFF_MAXIMUM < YY_CAST (YYSIZE_T, -1) \
? YYPTRDIFF_MAXIMUM \
: YY_CAST (YYSIZE_T, -1)))
#define YYSIZEOF(X) YY_CAST (YYPTRDIFF_T, sizeof (X))
/* Stored state numbers (used for stacks). */
typedef yytype_int16 yy_state_t;
/* State numbers in computations. */
typedef int yy_state_fast_t;
#ifndef YY_
# if defined YYENABLE_NLS && YYENABLE_NLS
# if ENABLE_NLS
# include <libintl.h> /* INFRINGES ON USER NAME SPACE */
# define YY_(Msgid) dgettext ("bison-runtime", Msgid)
# endif
# endif
# ifndef YY_
# define YY_(Msgid) Msgid
# endif
#endif
#ifndef YY_ATTRIBUTE_PURE
# if defined __GNUC__ && 2 < __GNUC__ + (96 <= __GNUC_MINOR__)
# define YY_ATTRIBUTE_PURE __attribute__ ((__pure__))
# else
# define YY_ATTRIBUTE_PURE
# endif
#endif
#ifndef YY_ATTRIBUTE_UNUSED
# if defined __GNUC__ && 2 < __GNUC__ + (7 <= __GNUC_MINOR__)
# define YY_ATTRIBUTE_UNUSED __attribute__ ((__unused__))
# else
# define YY_ATTRIBUTE_UNUSED
# endif
#endif
/* Suppress unused-variable warnings by "using" E. */
#if ! defined lint || defined __GNUC__
# define YY_USE(E) ((void) (E))
#else
# define YY_USE(E) /* empty */
#endif
/* Suppress an incorrect diagnostic about yylval being uninitialized. */
#if defined __GNUC__ && ! defined __ICC && 406 <= __GNUC__ * 100 + __GNUC_MINOR__
# if __GNUC__ * 100 + __GNUC_MINOR__ < 407
# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \
_Pragma ("GCC diagnostic push") \
_Pragma ("GCC diagnostic ignored \"-Wuninitialized\"")
# else
# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \
_Pragma ("GCC diagnostic push") \
_Pragma ("GCC diagnostic ignored \"-Wuninitialized\"") \
_Pragma ("GCC diagnostic ignored \"-Wmaybe-uninitialized\"")
# endif
# define YY_IGNORE_MAYBE_UNINITIALIZED_END \
_Pragma ("GCC diagnostic pop")
#else
# define YY_INITIAL_VALUE(Value) Value
#endif
#ifndef YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
# define YY_IGNORE_MAYBE_UNINITIALIZED_END
#endif
#ifndef YY_INITIAL_VALUE
# define YY_INITIAL_VALUE(Value) /* Nothing. */
#endif
#if defined __cplusplus && defined __GNUC__ && ! defined __ICC && 6 <= __GNUC__
# define YY_IGNORE_USELESS_CAST_BEGIN \
_Pragma ("GCC diagnostic push") \
_Pragma ("GCC diagnostic ignored \"-Wuseless-cast\"")
# define YY_IGNORE_USELESS_CAST_END \
_Pragma ("GCC diagnostic pop")
#endif
#ifndef YY_IGNORE_USELESS_CAST_BEGIN
# define YY_IGNORE_USELESS_CAST_BEGIN
# define YY_IGNORE_USELESS_CAST_END
#endif
#define YY_ASSERT(E) ((void) (0 && (E)))
#if 1
/* The parser invokes alloca or malloc; define the necessary symbols. */
# ifdef YYSTACK_USE_ALLOCA
# if YYSTACK_USE_ALLOCA
# ifdef __GNUC__
# define YYSTACK_ALLOC __builtin_alloca
# elif defined __BUILTIN_VA_ARG_INCR
# include <alloca.h> /* INFRINGES ON USER NAME SPACE */
# elif defined _AIX
# define YYSTACK_ALLOC __alloca
# elif defined _MSC_VER
# include <malloc.h> /* INFRINGES ON USER NAME SPACE */
# define alloca _alloca
# else
# define YYSTACK_ALLOC alloca
# if ! defined _ALLOCA_H && ! defined EXIT_SUCCESS
# include <stdlib.h> /* INFRINGES ON USER NAME SPACE */
/* Use EXIT_SUCCESS as a witness for stdlib.h. */
# ifndef EXIT_SUCCESS
# define EXIT_SUCCESS 0
# endif
# endif
# endif
# endif
# endif
# ifdef YYSTACK_ALLOC
/* Pacify GCC's 'empty if-body' warning. */
# define YYSTACK_FREE(Ptr) do { /* empty */; } while (0)
# ifndef YYSTACK_ALLOC_MAXIMUM
/* The OS might guarantee only one guard page at the bottom of the stack,
and a page size can be as small as 4096 bytes. So we cannot safely
invoke alloca (N) if N exceeds 4096. Use a slightly smaller number
to allow for a few compiler-allocated temporary stack slots. */
# define YYSTACK_ALLOC_MAXIMUM 4032 /* reasonable circa 2006 */
# endif
# else
# define YYSTACK_ALLOC YYMALLOC
# define YYSTACK_FREE YYFREE
# ifndef YYSTACK_ALLOC_MAXIMUM
# define YYSTACK_ALLOC_MAXIMUM YYSIZE_MAXIMUM
# endif
# if (defined __cplusplus && ! defined EXIT_SUCCESS \
&& ! ((defined YYMALLOC || defined malloc) \
&& (defined YYFREE || defined free)))
# include <stdlib.h> /* INFRINGES ON USER NAME SPACE */
# ifndef EXIT_SUCCESS
# define EXIT_SUCCESS 0
# endif
# endif
# ifndef YYMALLOC
# define YYMALLOC malloc
# if ! defined malloc && ! defined EXIT_SUCCESS
void *malloc (YYSIZE_T); /* INFRINGES ON USER NAME SPACE */
# endif
# endif
# ifndef YYFREE
# define YYFREE free
# if ! defined free && ! defined EXIT_SUCCESS
void free (void *); /* INFRINGES ON USER NAME SPACE */
# endif
# endif
# endif
#endif /* 1 */
#if (! defined yyoverflow \
&& (! defined __cplusplus \
|| (defined YYLTYPE_IS_TRIVIAL && YYLTYPE_IS_TRIVIAL \
&& defined YYSTYPE_IS_TRIVIAL && YYSTYPE_IS_TRIVIAL)))
/* A type that is properly aligned for any stack member. */
union yyalloc
{
yy_state_t yyss_alloc;
YYSTYPE yyvs_alloc;
YYLTYPE yyls_alloc;
};
/* The size of the maximum gap between one aligned stack and the next. */
# define YYSTACK_GAP_MAXIMUM (YYSIZEOF (union yyalloc) - 1)
/* The size of an array large to enough to hold all stacks, each with
N elements. */
# define YYSTACK_BYTES(N) \
((N) * (YYSIZEOF (yy_state_t) + YYSIZEOF (YYSTYPE) \
+ YYSIZEOF (YYLTYPE)) \
+ 2 * YYSTACK_GAP_MAXIMUM)
# define YYCOPY_NEEDED 1
/* Relocate STACK from its old location to the new one. The
local variables YYSIZE and YYSTACKSIZE give the old and new number of
elements in the stack, and YYPTR gives the new location of the
stack. Advance YYPTR to a properly aligned location for the next
stack. */
# define YYSTACK_RELOCATE(Stack_alloc, Stack) \
do \
{ \
YYPTRDIFF_T yynewbytes; \
YYCOPY (&yyptr->Stack_alloc, Stack, yysize); \
Stack = &yyptr->Stack_alloc; \
yynewbytes = yystacksize * YYSIZEOF (*Stack) + YYSTACK_GAP_MAXIMUM; \
yyptr += yynewbytes / YYSIZEOF (*yyptr); \
} \
while (0)
#endif
#if defined YYCOPY_NEEDED && YYCOPY_NEEDED
/* Copy COUNT objects from SRC to DST. The source and destination do
not overlap. */
# ifndef YYCOPY
# if defined __GNUC__ && 1 < __GNUC__
# define YYCOPY(Dst, Src, Count) \
__builtin_memcpy (Dst, Src, YY_CAST (YYSIZE_T, (Count)) * sizeof (*(Src)))
# else
# define YYCOPY(Dst, Src, Count) \
do \
{ \
YYPTRDIFF_T yyi; \
for (yyi = 0; yyi < (Count); yyi++) \
(Dst)[yyi] = (Src)[yyi]; \
} \
while (0)
# endif
# endif
#endif /* !YYCOPY_NEEDED */
/* YYFINAL -- State number of the termination state. */
#define YYFINAL 106
/* YYLAST -- Last index in YYTABLE. */
#define YYLAST 13819
/* YYNTOKENS -- Number of terminals. */
#define YYNTOKENS 149
/* YYNNTS -- Number of nonterminals. */
#define YYNNTS 199
/* YYNRULES -- Number of rules. */
#define YYNRULES 692
/* YYNSTATES -- Number of states. */
#define YYNSTATES 1204
/* YYMAXUTOK -- Last valid token kind. */
#define YYMAXUTOK 377
/* YYTRANSLATE(TOKEN-NUM) -- Symbol number corresponding to TOKEN-NUM
as returned by yylex, with out-of-bounds checking. */
#define YYTRANSLATE(YYX) \
(0 <= (YYX) && (YYX) <= YYMAXUTOK \
? YY_CAST (yysymbol_kind_t, yytranslate[YYX]) \
: YYSYMBOL_YYUNDEF)
/* YYTRANSLATE[TOKEN-NUM] -- Symbol number corresponding to TOKEN-NUM
as returned by yylex. */
static const yytype_uint8 yytranslate[] =
{
0, 2, 2, 2, 2, 2, 2, 2, 2, 2,
148, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 135, 2, 2, 2, 133, 128, 2,
144, 145, 131, 129, 142, 130, 147, 132, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 123, 146,
125, 121, 124, 122, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 140, 2, 141, 127, 2, 143, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 138, 126, 139, 136, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 1, 2, 3, 4,
5, 6, 7, 8, 9, 10, 11, 12, 13, 14,
15, 16, 17, 18, 19, 20, 21, 22, 23, 24,
25, 26, 27, 28, 29, 30, 31, 32, 33, 34,
35, 36, 37, 38, 39, 40, 41, 42, 43, 44,
45, 46, 47, 48, 49, 50, 51, 52, 53, 54,
55, 56, 57, 58, 59, 60, 61, 62, 63, 64,
65, 66, 67, 68, 69, 70, 71, 72, 73, 74,
75, 76, 77, 78, 79, 80, 81, 82, 83, 84,
85, 86, 87, 88, 89, 90, 91, 92, 93, 94,
95, 96, 97, 98, 99, 100, 101, 102, 103, 104,
105, 106, 107, 108, 109, 110, 111, 112, 113, 114,
115, 116, 117, 118, 119, 120, 134, 137
};
#if YYDEBUG
/* YYRLINE[YYN] -- Source line where rule number YYN was defined. */
static const yytype_int16 yyrline[] =
{
0, 2182, 2182, 2182, 2192, 2198, 2202, 2206, 2210, 2216,
2218, 2217, 2231, 2257, 2263, 2267, 2271, 2275, 2281, 2281,
2285, 2289, 2293, 2297, 2306, 2315, 2319, 2324, 2325, 2329,
2333, 2337, 2341, 2344, 2348, 2352, 2356, 2360, 2364, 2369,
2373, 2382, 2391, 2400, 2409, 2416, 2417, 2421, 2424, 2425,
2429, 2433, 2437, 2441, 2441, 2447, 2447, 2453, 2456, 2466,
2465, 2480, 2489, 2490, 2493, 2494, 2501, 2500, 2515, 2519,
2524, 2528, 2533, 2537, 2542, 2546, 2550, 2554, 2558, 2564,
2568, 2574, 2575, 2581, 2585, 2589, 2593, 2597, 2601, 2605,
2609, 2613, 2617, 2623, 2624, 2630, 2634, 2640, 2644, 2650,
2654, 2658, 2662, 2666, 2670, 2676, 2682, 2689, 2693, 2697,
2701, 2705, 2709, 2715, 2721, 2726, 2732, 2736, 2739, 2743,
2747, 2754, 2755, 2756, 2757, 2762, 2769, 2770, 2773, 2777,
2777, 2783, 2784, 2785, 2786, 2787, 2788, 2789, 2790, 2791,
2792, 2793, 2794, 2795, 2796, 2797, 2798, 2799, 2800, 2801,
2802, 2803, 2804, 2805, 2806, 2807, 2808, 2809, 2810, 2811,
2812, 2815, 2815, 2815, 2816, 2816, 2817, 2817, 2817, 2818,
2818, 2818, 2818, 2819, 2819, 2819, 2820, 2820, 2820, 2821,
2821, 2821, 2821, 2822, 2822, 2822, 2822, 2823, 2823, 2823,
2823, 2824, 2824, 2824, 2824, 2825, 2825, 2825, 2825, 2826,
2826, 2829, 2833, 2837, 2841, 2845, 2849, 2853, 2858, 2863,
2868, 2872, 2876, 2880, 2884, 2888, 2892, 2896, 2900, 2904,
2908, 2912, 2916, 2920, 2924, 2928, 2932, 2936, 2940, 2944,
2948, 2952, 2956, 2960, 2964, 2968, 2972, 2976, 2980, 2984,
2988, 2992, 2996, 3000, 3004, 3008, 3012, 3016, 3025, 3034,
3043, 3052, 3058, 3059, 3063, 3067, 3073, 3077, 3084, 3088,
3097, 3114, 3115, 3118, 3119, 3120, 3124, 3128, 3134, 3139,
3143, 3147, 3151, 3157, 3157, 3168, 3172, 3178, 3182, 3188,
3191, 3196, 3200, 3204, 3209, 3213, 3219, 3224, 3228, 3234,
3235, 3239, 3243, 3244, 3245, 3246, 3247, 3252, 3251, 3263,
3267, 3262, 3272, 3272, 3276, 3280, 3284, 3288, 3292, 3296,
3300, 3304, 3308, 3312, 3316, 3317, 3323, 3330, 3322, 3343,
3351, 3359, 3359, 3359, 3366, 3366, 3366, 3373, 3379, 3383,
3392, 3401, 3411, 3413, 3410, 3422, 3420, 3438, 3443, 3436,
3460, 3458, 3474, 3484, 3495, 3499, 3503, 3507, 3513, 3520,
3521, 3522, 3525, 3526, 3529, 3530, 3538, 3539, 3545, 3549,
3552, 3556, 3560, 3564, 3569, 3573, 3577, 3581, 3587, 3586,
3596, 3600, 3604, 3608, 3614, 3619, 3624, 3628, 3632, 3636,
3640, 3644, 3648, 3652, 3656, 3660, 3664, 3668, 3672, 3676,
3680, 3686, 3691, 3698, 3698, 3702, 3707, 3713, 3717, 3723,
3724, 3727, 3732, 3735, 3739, 3745, 3749, 3756, 3755, 3772,
3777, 3781, 3786, 3793, 3797, 3801, 3805, 3809, 3813, 3817,
3821, 3825, 3832, 3831, 3846, 3845, 3861, 3869, 3878, 3883,
3887, 3887, 3892, 3892, 3897, 3897, 3907, 3908, 3912, 3916,
3920, 3924, 3928, 3933, 3938, 3946, 3950, 3957, 3961, 3967,
3968, 3974, 3975, 3981, 3982, 3986, 3990, 3994, 3998, 4002,
4006, 4010, 4011, 4012, 4019, 4023, 4030, 4035, 4040, 4045,
4050, 4055, 4063, 4067, 4074, 4078, 4086, 4090, 4094, 4101,
4105, 4112, 4116, 4120, 4127, 4131, 4140, 4145, 4153, 4157,
4162, 4169, 4175, 4182, 4185, 4189, 4190, 4193, 4197, 4200,
4204, 4207, 4208, 4209, 4210, 4213, 4214, 4220, 4225, 4230,
4235, 4241, 4242, 4248, 4254, 4253, 4265, 4269, 4275, 4279,
4285, 4294, 4305, 4308, 4309, 4312, 4318, 4324, 4325, 4328,
4335, 4334, 4349, 4353, 4361, 4365, 4377, 4384, 4391, 4392,
4393, 4394, 4395, 4399, 4405, 4409, 4417, 4418, 4419, 4423,
4429, 4433, 4437, 4441, 4445, 4451, 4455, 4461, 4465, 4469,
4473, 4477, 4481, 4485, 4493, 4500, 4506, 4507, 4511, 4515,
4514, 4531, 4532, 4535, 4541, 4545, 4551, 4552, 4556, 4560,
4566, 4572, 4580, 4586, 4593, 4599, 4606, 4610, 4616, 4620,
4626, 4627, 4630, 4634, 4640, 4644, 4648, 4652, 4658, 4662,
4667, 4672, 4676, 4680, 4684, 4688, 4692, 4696, 4700, 4704,
4708, 4712, 4716, 4720, 4724, 4729, 4735, 4740, 4745, 4750,
4755, 4762, 4766, 4773, 4778, 4777, 4789, 4793, 4799, 4807,
4815, 4823, 4827, 4833, 4837, 4843, 4844, 4847, 4852, 4859,
4860, 4863, 4867, 4871, 4877, 4881, 4885, 4891, 4897, 4897,
4904, 4905, 4911, 4915, 4921, 4927, 4932, 4936, 4941, 4946,
4962, 4967, 4973, 4974, 4975, 4978, 4979, 4980, 4981, 4984,
4985, 4986, 4989, 4990, 4993, 4997, 5003, 5004, 5010, 5011,
5014, 5015, 5018, 5021, 5022, 5023, 5026, 5027, 5030, 5035,
5038, 5039, 5043
};
#endif
/** Accessing symbol of state STATE. */
#define YY_ACCESSING_SYMBOL(State) YY_CAST (yysymbol_kind_t, yystos[State])
#if 1
/* The user-facing name of the symbol whose (internal) number is
YYSYMBOL. No bounds checking. */
static const char *yysymbol_name (yysymbol_kind_t yysymbol) YY_ATTRIBUTE_UNUSED;
/* YYTNAME[SYMBOL-NUM] -- String name of the symbol SYMBOL-NUM.
First, the terminals, then, starting at YYNTOKENS, nonterminals. */
static const char *const yytname[] =
{
"\"end of file\"", "error", "\"invalid token\"", "\"'class'\"",
"\"'module'\"", "\"'def'\"", "\"'begin'\"", "\"'if'\"", "\"'unless'\"",
"\"'while'\"", "\"'until'\"", "\"'for'\"", "\"'undef'\"", "\"'rescue'\"",
"\"'ensure'\"", "\"'end'\"", "\"'then'\"", "\"'elsif'\"", "\"'else'\"",
"\"'case'\"", "\"'when'\"", "\"'break'\"", "\"'next'\"", "\"'redo'\"",
"\"'retry'\"", "\"'in'\"", "\"'do'\"", "\"'do' for condition\"",
"\"'do' for block\"", "\"'do' for lambda\"", "\"'return'\"",
"\"'yield'\"", "\"'super'\"", "\"'self'\"", "\"'nil'\"", "\"'true'\"",
"\"'false'\"", "\"'and'\"", "\"'or'\"", "\"'not'\"", "\"'if' modifier\"",
"\"'unless' modifier\"", "\"'while' modifier\"", "\"'until' modifier\"",
"\"'rescue' modifier\"", "\"'alias'\"", "\"'BEGIN'\"", "\"'END'\"",
"\"'__LINE__'\"", "\"'__FILE__'\"", "\"'__ENCODING__'\"",
"\"local variable or method\"", "\"method\"", "\"global variable\"",
"\"instance variable\"", "\"constant\"", "\"class variable\"",
"\"label\"", "\"integer literal\"", "\"float literal\"",
"\"character literal\"", "tXSTRING", "tREGEXP", "tSTRING",
"tSTRING_PART", "tSTRING_MID", "tNTH_REF", "tBACK_REF", "tREGEXP_END",
"\"numbered parameter\"", "\"unary plus\"", "\"unary minus\"", "\"<=>\"",
"\"==\"", "\"===\"", "\"!=\"", "\">=\"", "\"<=\"", "\"&&\"", "\"||\"",
"\"=~\"", "\"!~\"", "\"..\"", "\"...\"", "tBDOT2", "tBDOT3", "tAREF",
"tASET", "\"<<\"", "\">>\"", "\"::\"", "tCOLON3", "tOP_ASGN", "\"=>\"",
"tLPAREN", "\"(\"", "\")\"", "\"[\"", "tLBRACE", "\"{\"", "\"*\"",
"tPOW", "\"**\"", "\"&\"", "\"->\"", "\"&.\"", "\"symbol\"",
"\"string literal\"", "tXSTRING_BEG", "tSTRING_DVAR", "tREGEXP_BEG",
"tWORDS_BEG", "tSYMBOLS_BEG", "tLAMBEG", "\"here document\"",
"tHEREDOC_END", "tLITERAL_DELIM", "tHD_LITERAL_DELIM", "tHD_STRING_PART",
"tHD_STRING_MID", "tLOWEST", "'='", "'?'", "':'", "'>'", "'<'", "'|'",
"'^'", "'&'", "'+'", "'-'", "'*'", "'/'", "'%'", "tUMINUS_NUM", "'!'",
"'~'", "tLAST_TOKEN", "'{'", "'}'", "'['", "']'", "','", "'`'", "'('",
"')'", "';'", "'.'", "'\\n'", "$accept", "$@1", "program",
"top_compstmt", "top_stmts", "top_stmt", "@2", "bodystmt", "compstmt",
"stmts", "$@3", "stmt", "command_asgn", "command_rhs", "expr", "$@4",
"$@5", "defn_head", "$@6", "defs_head", "expr_value", "command_call",
"block_command", "$@7", "cmd_brace_block", "command", "mlhs",
"mlhs_inner", "mlhs_basic", "mlhs_item", "mlhs_list", "mlhs_post",
"mlhs_node", "lhs", "cname", "cpath", "fname", "fsym", "undef_list",
"$@8", "op", "reswords", "arg", "aref_args", "arg_rhs", "paren_args",
"opt_paren_args", "opt_call_args", "call_args", "@9", "command_args",
"block_arg", "opt_block_arg", "comma", "args", "mrhs", "primary", "@10",
"@11", "$@12", "$@13", "@14", "@15", "$@16", "$@17", "$@18", "$@19",
"$@20", "$@21", "@22", "@23", "@24", "@25", "primary_value", "then",
"do", "if_tail", "opt_else", "for_var", "f_margs", "$@26",
"block_args_tail", "opt_block_args_tail", "block_param",
"opt_block_param", "$@27", "block_param_def", "opt_bv_decl", "bv_decls",
"bvar", "f_larglist", "lambda_body", "@28", "do_block", "block_call",
"method_call", "@29", "brace_block", "@30", "case_body", "cases",
"in_clauses", "$@31", "$@32", "$@33", "p_expr", "p_args_head",
"p_args_post", "p_as", "p_alt", "p_value", "p_array", "p_array_body",
"p_array_elems", "p_rest", "p_const", "p_hash", "p_hash_body",
"p_hash_elems", "p_hash_elem", "p_kwrest", "p_var", "opt_rescue",
"exc_list", "exc_var", "opt_ensure", "literal", "string",
"string_fragment", "string_rep", "string_interp", "@34", "xstring",
"regexp", "heredoc", "heredoc_bodies", "heredoc_body",
"heredoc_string_rep", "heredoc_string_interp", "@35", "words", "symbol",
"basic_symbol", "sym", "symbols", "numeric", "variable", "var_lhs",
"var_ref", "backref", "superclass", "$@36", "f_opt_arglist_paren",
"f_arglist_paren", "f_arglist", "f_label", "f_kw", "f_block_kw",
"f_block_kwarg", "f_kwarg", "kwrest_mark", "f_kwrest", "args_tail",
"opt_args_tail", "f_args", "f_bad_arg", "f_norm_arg", "f_arg_item",
"@37", "f_arg", "f_opt_asgn", "f_opt", "f_block_opt", "f_block_optarg",
"f_optarg", "restarg_mark", "f_rest_arg", "blkarg_mark", "f_block_arg",
"opt_f_block_arg", "singleton", "$@38", "assoc_list", "assocs", "assoc",
"operation", "operation2", "operation3", "dot_or_colon", "call_op",
"call_op2", "opt_terms", "opt_nl", "rparen", "trailer", "term", "nl",
"terms", "none", YY_NULLPTR
};
static const char *
yysymbol_name (yysymbol_kind_t yysymbol)
{
return yytname[yysymbol];
}
#endif
#define YYPACT_NINF (-981)
#define yypact_value_is_default(Yyn) \
((Yyn) == YYPACT_NINF)
#define YYTABLE_NINF (-693)
#define yytable_value_is_error(Yyn) \
((Yyn) == YYTABLE_NINF)
/* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing
STATE-NUM. */
static const yytype_int16 yypact[] =
{
-981, 3710, 87, 8854, 10978, 11320, 7162, -981, 10624, 10624,
-981, -981, 11092, 8344, 6778, 9090, 9090, -981, -981, 9090,
4231, 3370, -981, -981, -981, -981, -46, 8344, -981, 23,
-981, -981, -981, 7304, 3823, -981, -981, 7446, -981, -981,
-981, -981, -981, -981, -981, 232, 10742, 10742, 10742, 10742,
111, 5891, 6010, 9562, 9916, 8626, -981, 8062, 1248, 1022,
365, 1325, 1340, -981, 259, 10860, 10742, -981, 985, -981,
834, -981, 507, 2969, 2969, -981, -981, 85, 76, -981,
-3, 11206, -981, 78, 3465, 631, 667, 143, 45, -981,
209, -981, -981, -981, -981, -981, -981, -981, -981, -981,
214, 109, -981, 279, 66, -981, -981, -981, -981, -981,
-981, 88, 88, -46, 498, 748, -981, 10624, 389, 6129,
447, 2225, 2225, -981, 114, -981, 701, -981, -981, 66,
-981, -981, -981, -981, -981, -981, -981, -981, -981, -981,
-981, -981, -981, -981, -981, -981, -981, -981, -981, -981,
-981, -981, -981, -981, -981, -981, -981, -981, 77, 82,
91, 130, -981, -981, -981, -981, -981, -981, 155, 156,
165, 229, -981, 233, -981, -981, -981, -981, -981, -981,
-981, -981, -981, -981, -981, -981, -981, -981, -981, -981,
-981, -981, -981, -981, -981, -981, -981, -981, -981, -981,
-981, -981, -981, -981, -981, -981, -981, -981, -981, 248,
4923, 202, 507, 2969, 2969, 179, 210, 823, 244, 158,
263, 179, 10624, 10624, 855, 287, -981, -981, 898, 309,
58, 89, -981, -981, -981, -981, -981, -981, -981, -981,
-981, 8203, -981, -981, 237, -981, -981, -981, -981, -981,
-981, 985, -981, 549, -981, 384, -981, -981, 985, 3959,
106, 10742, 10742, 10742, 10742, -981, 13544, -981, -981, 318,
407, 318, -981, -981, -981, 9208, -981, -981, 9090, -981,
-981, -981, -981, 6778, 7016, -981, 334, 6248, -981, 929,
379, 13668, 13668, 291, 8972, 5891, 341, 1458, 834, 985,
402, -981, 6129, 985, 359, 1229, 1229, -981, 13544, 400,
1229, -981, 491, 11434, 408, 934, 950, 952, 2307, -981,
-981, -981, -981, -981, 1353, -981, -981, -981, -981, -981,
-981, 576, 1398, -981, -981, 1181, -981, 892, -981, 1401,
-981, 1416, 452, 458, -981, -981, -981, -981, 6659, 10624,
10624, 10624, 10624, 8972, 10624, 10624, 54, -981, -981, -981,
-981, 515, 985, -981, -981, -981, -981, -981, -981, -981,
2406, 462, 470, 4923, 10742, -981, 455, 553, 465, -981,
985, -981, -981, -981, 480, 10742, -981, 492, 586, 504,
51, -981, -981, 479, 4923, -981, -981, 10034, -981, 5891,
8740, 511, 10034, -981, 10742, 10742, 10742, 10742, 10742, 10742,
10742, 10742, 10742, 10742, 10742, 10742, 10742, 10742, -981, 10742,
10742, 10742, 10742, 10742, 10742, 10742, 10742, 10742, 10742, 10742,
10742, 11712, -981, 9090, -981, 11798, -981, -981, 13002, -981,
-981, -981, -981, 10860, 10860, -981, 541, -981, 507, -981,
1063, -981, -981, -981, -981, -981, -981, 11884, 9090, 11970,
4923, 10624, -981, -981, -981, 650, 649, 286, 556, 562,
-981, 5069, 673, 10742, 12056, 9090, 12142, 10742, 10742, 5507,
327, 327, 105, 12228, 9090, 12314, -981, 638, -981, 6248,
381, -981, -981, 10152, 697, -981, 10742, 10742, 13606, 13606,
13606, 10742, -981, -981, 9326, -981, 10742, -981, 9680, 6897,
571, 985, 318, 318, -981, -981, 943, 587, -981, -981,
-981, 8344, 5626, 598, 12056, 12142, 10742, 834, 985, -981,
-981, 6540, 600, -981, -981, -981, 9798, -981, 985, 9916,
-981, -981, -981, 1063, -3, 11434, -981, 11434, 12400, 9090,
12486, 2459, -981, -981, 602, -981, 1447, 6248, 576, -981,
-981, -981, -981, -981, -981, -981, 10742, 10742, -981, -981,
-981, -981, -981, -981, -981, -981, -981, -981, -981, -981,
1453, 985, 985, 604, 10860, 737, 13606, 578, -981, -981,
-981, 311, -981, -981, 2734, -981, 13606, 2459, -981, -981,
1251, -981, -981, -981, 10860, 754, 95, 10742, -981, 13260,
318, -981, 985, 11434, 628, -981, -981, -981, 729, 654,
1535, -981, -981, 1076, 290, 2835, 3556, 3556, 3556, 3556,
1656, 1656, 13686, 3121, 3556, 3556, 13668, 13668, 337, 337,
2835, 379, 13606, 1656, 1656, 1702, 1702, 1587, 542, 542,
379, 379, 379, 4367, 7802, 4639, 7920, -981, 88, -981,
636, 318, 310, -981, 342, -981, -981, 4095, -981, -981,
2566, 95, 95, -981, 13074, -981, -981, -981, -981, -981,
985, 10624, 4923, 759, 161, -981, 88, 640, 88, 767,
943, 8485, -981, 10270, 765, -981, 10742, 10742, 597, -981,
7564, 7683, 645, 469, 474, 765, -981, -981, -981, -981,
63, 84, 646, 123, 129, 10624, 8344, 655, 2835, 773,
13606, 195, -981, 13606, 13606, 13606, 857, 10742, 13544, -981,
318, 13606, -981, -981, -981, -981, 9444, 9680, -981, -981,
-981, 656, -981, -981, 190, 834, 985, 1229, 511, -981,
759, 161, 648, 764, 811, -981, 122, 2459, -981, 657,
-981, 379, 379, -981, -981, 336, 985, 658, -981, -981,
2754, 753, 13136, -981, 751, 515, -981, 465, -981, 985,
-981, -981, 668, 671, 678, -981, 689, 751, 678, 780,
13198, -981, -981, 2459, 4923, -981, -981, 13331, 10388, -981,
-981, 11434, 8972, 10860, 10742, 12572, 9090, 12658, -981, -981,
-981, 752, -981, 777, 2044, 113, 782, 191, 783, -981,
2438, 700, 194, -981, -981, 705, 761, -981, 710, -981,
-981, -981, 209, -981, -981, -981, 1139, 10860, 10860, -981,
541, 468, 9326, 10860, 10860, -981, 541, 45, 85, 4923,
6248, 95, -981, 985, 840, -981, -981, -981, -981, 13260,
-981, 769, -981, 5772, 844, -981, 10624, 850, -981, 10742,
10742, 488, 10742, 10742, 853, 6394, 6394, 154, 327, -981,
-981, 536, -981, 10506, 5215, 13606, -981, 6897, 318, -981,
-981, -981, 615, 727, 1002, 4923, 6248, -981, -981, -981,
728, -981, 1600, 985, 10742, 10742, -981, -981, 2459, -981,
1251, -981, 1251, -981, 1251, -981, -981, 10742, 10742, -981,
-981, -981, 11548, -981, 747, 465, 749, 11548, -981, 756,
758, -981, 879, 10742, 13402, -981, -981, 13606, 4503, 4775,
755, 514, 529, 2921, -981, -981, -981, -981, 771, 768,
775, 752, -981, 776, 778, -981, -981, -981, -981, -981,
789, 790, -981, 842, 2921, 2921, 852, 135, 10742, 10742,
-981, -981, -981, -981, -981, 10860, -981, -981, -981, -981,
-981, -981, -981, 903, 786, 6248, 4923, -981, -981, 11662,
179, -981, -981, 6394, -981, -981, 179, -981, 10742, -981,
919, 921, -981, 10624, 10624, 5361, 13606, 81, -981, 9680,
-981, 1341, 922, 799, 1642, 1642, 977, -981, 13606, 13606,
678, 798, 678, 678, 13606, 13606, 815, 826, 907, 1097,
578, -981, -981, 2165, -981, 1097, 2459, -981, 1251, -981,
-981, 13473, 564, -981, -981, 2438, 2921, -981, 135, -981,
2921, -981, -981, 824, -981, -981, -981, -981, 13606, 13606,
-981, -981, -981, -981, 829, 956, 910, -981, 1144, 950,
952, 4923, -981, 5069, -981, -981, 6394, 179, 179, 430,
-981, -981, -981, -981, 831, -981, -981, -981, -981, 847,
847, 1642, 854, -981, 1251, -981, -981, -981, -981, -981,
-981, 12744, -981, 465, 578, -981, -981, 858, 868, 869,
-981, 872, 869, -981, 876, 884, -981, 824, 2921, -981,
-981, 1063, 12830, 9090, 12916, 649, 597, 1005, 5361, 5361,
2835, -981, 1014, 1341, 857, 1642, 847, 1642, 678, 848,
897, -981, 2459, -981, 1251, -981, 1251, -981, 1251, -981,
-981, 2921, 2438, -981, 759, 161, 915, 711, 725, -981,
-981, -981, 430, 430, 682, -981, -981, 847, -981, 869,
918, 869, 869, 923, -981, 615, 1051, 1052, 179, 1031,
1039, -981, 1251, -981, -981, -981, 2921, -981, -981, 5361,
10624, 10624, 869, 430, 179, 179, -981, -981, 5361, 5361,
430, 430, -981, -981
};
/* YYDEFACT[STATE-NUM] -- Default reduction number in state STATE-NUM.
Performed when YYTABLE does not specify something else to do. Zero
means the default is an error. */
static const yytype_int16 yydefact[] =
{
2, 0, 0, 0, 0, 0, 0, 297, 0, 0,
321, 324, 0, 0, 678, 344, 345, 346, 347, 309,
273, 273, 560, 559, 561, 562, 680, 0, 10, 0,
564, 563, 565, 550, 664, 552, 551, 554, 553, 546,
547, 507, 508, 566, 567, 558, 0, 0, 0, 0,
0, 0, 0, 692, 692, 91, 316, 0, 0, 0,
0, 0, 0, 522, 0, 0, 0, 3, 678, 6,
9, 27, 32, 615, 615, 48, 63, 62, 0, 79,
0, 83, 93, 0, 57, 251, 0, 64, 314, 289,
290, 505, 291, 292, 293, 503, 502, 534, 504, 501,
557, 0, 294, 295, 273, 5, 1, 8, 344, 345,
309, 692, 420, 0, 116, 117, 558, 0, 0, 0,
0, 615, 615, 119, 568, 348, 0, 557, 295, 0,
340, 171, 181, 172, 168, 197, 198, 199, 200, 179,
194, 187, 177, 176, 192, 175, 174, 170, 195, 169,
182, 186, 188, 180, 173, 189, 196, 191, 190, 183,
193, 178, 167, 185, 184, 166, 164, 165, 161, 162,
163, 121, 123, 122, 156, 157, 134, 135, 136, 143,
140, 142, 137, 138, 158, 159, 144, 145, 149, 152,
153, 139, 141, 131, 132, 133, 146, 147, 148, 150,
151, 154, 155, 160, 648, 58, 124, 125, 647, 0,
0, 0, 61, 615, 615, 0, 0, 0, 557, 0,
295, 0, 0, 0, 115, 0, 359, 358, 0, 0,
557, 295, 190, 183, 193, 178, 161, 162, 163, 121,
122, 0, 126, 128, 20, 127, 525, 530, 529, 686,
688, 678, 689, 0, 527, 0, 690, 687, 679, 662,
558, 281, 661, 276, 0, 268, 280, 77, 272, 692,
505, 692, 652, 78, 76, 692, 262, 310, 0, 75,
261, 419, 74, 678, 0, 18, 0, 0, 224, 0,
225, 212, 215, 306, 0, 0, 0, 0, 15, 678,
81, 14, 0, 678, 0, 683, 683, 252, 0, 0,
683, 650, 0, 0, 89, 0, 99, 106, 615, 540,
539, 541, 542, 536, 0, 538, 537, 509, 514, 513,
516, 0, 0, 511, 518, 0, 520, 0, 532, 0,
544, 0, 548, 549, 52, 239, 240, 4, 679, 0,
0, 0, 0, 0, 0, 0, 622, 618, 617, 616,
619, 620, 0, 624, 636, 590, 591, 640, 639, 635,
615, 0, 576, 0, 583, 588, 692, 593, 692, 614,
0, 621, 623, 626, 600, 0, 633, 600, 638, 600,
643, 597, 572, 0, 0, 407, 409, 0, 95, 0,
87, 84, 0, 55, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 211, 214, 0, 0, 53, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 675, 692, 674, 0, 677, 676, 0, 424,
422, 315, 506, 0, 0, 413, 68, 313, 337, 116,
117, 118, 548, 549, 576, 569, 335, 0, 692, 0,
0, 0, 673, 672, 59, 0, 692, 306, 0, 0,
350, 0, 349, 0, 0, 692, 0, 0, 0, 0,
0, 0, 306, 0, 692, 0, 332, 0, 129, 0,
0, 526, 528, 0, 0, 691, 656, 657, 282, 660,
275, 0, 680, 269, 0, 278, 0, 270, 0, 678,
0, 678, 692, 692, 263, 274, 678, 0, 312, 51,
681, 0, 0, 0, 0, 0, 0, 17, 678, 304,
13, 0, 80, 300, 303, 307, 685, 253, 684, 685,
255, 308, 651, 105, 97, 0, 92, 0, 0, 692,
0, 615, 317, 404, 600, 543, 0, 0, 517, 523,
510, 512, 519, 521, 533, 545, 0, 0, 7, 21,
22, 23, 24, 25, 49, 50, 580, 628, 581, 579,
0, 678, 678, 600, 0, 0, 582, 645, 595, 646,
592, 645, 596, 577, 599, 607, 629, 599, 610, 637,
599, 612, 642, 641, 0, 0, 692, 281, 28, 30,
0, 31, 678, 0, 85, 96, 47, 33, 45, 0,
256, 201, 29, 0, 295, 0, 229, 234, 235, 236,
231, 233, 243, 244, 237, 238, 210, 213, 241, 242,
0, 221, 680, 230, 232, 226, 227, 228, 216, 217,
218, 219, 220, 665, 670, 666, 671, 418, 273, 416,
0, 692, 665, 667, 666, 668, 417, 273, 665, 666,
273, 692, 692, 34, 256, 202, 44, 209, 66, 69,
0, 0, 0, 116, 117, 120, 0, 0, 692, 0,
678, 0, 298, 692, 692, 493, 0, 0, 692, 351,
669, 305, 0, 665, 666, 692, 353, 322, 352, 325,
669, 305, 0, 665, 666, 0, 0, 0, 0, 0,
280, 0, 328, 655, 658, 654, 279, 284, 283, 277,
692, 659, 653, 260, 258, 264, 265, 267, 311, 682,
19, 0, 26, 208, 82, 16, 678, 683, 98, 90,
102, 104, 0, 101, 103, 680, 0, 599, 535, 0,
524, 222, 223, 622, 620, 367, 678, 360, 575, 573,
599, 40, 247, 342, 0, 0, 589, 692, 644, 0,
598, 627, 600, 600, 600, 634, 600, 622, 600, 42,
249, 343, 395, 393, 0, 392, 391, 288, 0, 94,
88, 0, 0, 0, 0, 0, 692, 0, 457, 458,
459, 491, 476, 0, 0, 0, 475, 490, 0, 56,
0, 436, 449, 451, 461, 440, 460, 462, 442, 484,
444, 453, 456, 455, 454, 54, 0, 0, 0, 415,
72, 421, 265, 0, 0, 414, 70, 410, 65, 0,
0, 692, 338, 0, 0, 421, 341, 649, 60, 494,
495, 692, 496, 0, 692, 356, 0, 0, 354, 0,
0, 421, 0, 0, 0, 0, 0, 421, 0, 130,
531, 0, 327, 0, 0, 285, 271, 678, 692, 11,
301, 254, 100, 0, 397, 0, 0, 318, 515, 368,
365, 625, 0, 678, 0, 0, 594, 578, 599, 603,
599, 605, 599, 611, 599, 608, 613, 0, 0, 390,
680, 680, 585, 586, 692, 692, 375, 0, 631, 375,
375, 373, 0, 284, 286, 86, 46, 257, 665, 666,
0, 665, 666, 487, 478, 491, 465, 472, 0, 466,
469, 0, 480, 0, 481, 483, 474, 489, 488, 463,
437, 438, 445, 0, 0, 0, 0, 0, 0, 0,
39, 206, 38, 207, 73, 0, 36, 204, 37, 205,
71, 411, 412, 0, 0, 0, 0, 570, 336, 0,
0, 498, 357, 0, 12, 500, 0, 319, 0, 320,
0, 0, 333, 0, 0, 0, 283, 692, 259, 266,
403, 0, 0, 0, 0, 0, 363, 574, 41, 248,
600, 600, 600, 600, 43, 250, 0, 0, 0, 584,
645, 371, 372, 375, 383, 630, 0, 386, 0, 388,
408, 287, 421, 486, 464, 0, 0, 479, 0, 446,
0, 450, 452, 441, 447, 477, 485, 443, 246, 245,
35, 203, 425, 423, 0, 0, 0, 497, 0, 107,
114, 0, 499, 0, 323, 326, 0, 0, 0, 692,
427, 428, 426, 401, 680, 399, 402, 406, 405, 369,
366, 0, 361, 604, 599, 601, 606, 609, 396, 394,
306, 0, 587, 692, 0, 374, 381, 375, 375, 375,
632, 375, 375, 473, 467, 470, 482, 439, 0, 67,
339, 113, 0, 692, 0, 692, 692, 0, 0, 0,
0, 429, 0, 0, 398, 0, 364, 0, 600, 669,
305, 370, 0, 378, 0, 380, 0, 387, 0, 384,
389, 0, 0, 448, 110, 112, 0, 665, 666, 492,
355, 334, 692, 692, 430, 329, 400, 362, 602, 375,
375, 375, 375, 468, 471, 108, 0, 0, 0, 0,
0, 379, 0, 376, 382, 385, 0, 330, 331, 0,
0, 0, 375, 692, 0, 0, 377, 431, 0, 0,
692, 692, 433, 435
};
/* YYPGOTO[NTERM-NUM]. */
static const yytype_int16 yypgoto[] =
{
-981, -981, -981, 563, -981, 14, -981, -267, 357, -981,
-981, 65, -318, -327, -5, -981, -981, 878, -981, 1448,
18, -45, -981, -981, -387, 29, 1072, -190, 4, -38,
-298, -461, -19, 1858, -97, 1100, 20, -20, -981, -981,
12, -981, 2730, -981, 651, 73, -247, -384, 116, -981,
-9, -454, -269, 17, 118, -365, 26, -981, -981, -981,
-981, -981, -981, -981, -981, -981, -981, -981, -981, -981,
-981, -981, -981, 141, -151, -468, -17, -590, -981, -981,
-981, 313, 275, -981, -637, -981, -981, -172, -981, -26,
-981, -981, -981, 262, -981, -981, -981, -80, -981, -479,
-981, -569, -981, -981, -981, -599, -981, 61, 250, -981,
148, -981, -981, -888, -791, -981, -981, -981, 299, -889,
-748, -981, -10, -981, -981, -981, -981, 766, 276, 62,
-159, -981, -981, -981, -981, -981, -285, -981, 870, -981,
-981, 1046, 1, -981, -981, 1154, 1875, 2479, 1129, 1627,
-981, -981, -23, 644, 16, 146, 550, 110, -981, -981,
-981, -69, 67, -219, -242, -946, -723, -554, -981, 1045,
-769, -575, -980, 108, -514, -981, -534, -981, 230, -368,
-981, -981, -981, 43, -475, 699, -356, -981, -981, -81,
-981, 75, -25, 647, -249, 1060, -268, -21, -1
};
/* YYDEFGOTO[NTERM-NUM]. */
static const yytype_int16 yydefgoto[] =
{
0, 1, 2, 67, 68, 69, 286, 465, 466, 297,
521, 298, 71, 617, 72, 640, 625, 213, 691, 214,
215, 75, 76, 851, 679, 77, 78, 299, 79, 80,
81, 546, 82, 216, 123, 124, 242, 243, 244, 716,
656, 207, 84, 304, 621, 657, 277, 510, 511, 278,
279, 268, 503, 539, 661, 611, 85, 210, 302, 746,
303, 318, 756, 222, 875, 223, 876, 715, 1076, 682,
680, 986, 460, 289, 471, 707, 867, 1131, 229, 766,
1014, 1105, 1034, 920, 794, 921, 795, 893, 1084, 1085,
552, 897, 606, 396, 87, 88, 672, 447, 671, 494,
1082, 1132, 1178, 1179, 1180, 819, 820, 1053, 821, 822,
823, 824, 948, 949, 825, 826, 827, 953, 828, 829,
830, 831, 694, 861, 990, 994, 89, 90, 91, 332,
333, 557, 92, 93, 94, 558, 252, 253, 254, 489,
95, 96, 97, 326, 98, 99, 218, 219, 102, 220,
456, 681, 371, 372, 373, 374, 375, 923, 924, 376,
377, 378, 780, 595, 380, 381, 382, 383, 580, 384,
385, 386, 928, 929, 387, 388, 389, 390, 391, 588,
209, 461, 309, 513, 272, 129, 686, 659, 464, 459,
438, 517, 894, 518, 537, 256, 257, 258, 301
};
/* YYTABLE[YYPACT[STATE-NUM]] -- What to do in state STATE-NUM. If
positive, shift that token. If negative, reduce the rule whose
number is the opposite. If YYTABLE_NINF, syntax error. */
static const yytype_int16 yytable[] =
{
105, 284, 507, 212, 212, 435, 437, 285, 441, 212,
592, 719, 282, 709, 245, 545, 520, 107, 206, 280,
344, 451, 785, 950, 927, 206, 205, 221, 245, 961,
125, 125, 251, 732, 849, 850, 314, 622, 125, 206,
781, 835, 900, 401, 265, 265, 559, 348, 265, 660,
729, 393, 307, 311, 729, 300, 1110, 540, 271, 271,
783, 542, 271, 786, 732, 1086, 70, 955, 70, 206,
479, 439, 392, 392, 687, 658, 553, 325, 1056, 667,
782, 125, 670, -107, 616, 602, 749, 106, -110, 255,
394, 702, 439, 276, 281, 446, 306, 310, 283, 863,
712, 493, 603, 688, 864, 528, 585, 125, 868, -112,
280, 576, 448, 395, -114, 874, 673, 676, 658, 881,
667, 335, 337, 339, 341, 616, 616, 605, 582, 688,
-113, 267, 273, 269, 269, 274, 476, 269, 394, 398,
379, 379, 86, 347, 86, 126, 126, 485, -109, 217,
217, 895, 800, 228, -111, 217, 217, 217, 1115, 1056,
217, 287, 1110, 497, 951, 752, 293, -560, 598, 688,
601, 305, -559, 561, 792, 577, 561, 445, 561, -108,
561, -561, 561, 440, 276, 281, 951, 1086, 379, 379,
468, 469, 86, 689, 688, 470, 315, 397, -556, 402,
-99, 443, 445, 781, 440, -102, 217, -665, 525, 612,
275, 470, 392, 392, 985, 817, 781, 212, 212, 1057,
-562, 793, 315, 783, -560, 957, -104, -115, -666, -559,
394, -106, 275, 436, 550, 896, 783, 817, -561, 455,
480, 481, 958, 782, 507, -564, -563, -105, 432, 545,
477, -305, 952, 206, 1114, -565, 782, 467, 217, 930,
86, 325, 732, 1173, 927, -101, -305, 927, 505, 41,
505, -103, 42, 760, 514, 544, 531, -562, 516, 519,
379, 379, 729, 729, 538, 538, 504, 963, 508, 538,
434, 270, 270, 1092, 246, 270, -100, 247, 248, 300,
1116, -305, -564, -563, 265, -666, -555, 265, -305, 755,
246, -80, -565, 247, 248, 545, 58, 342, 343, -550,
964, 271, 536, -554, -556, 249, 490, 250, 860, 270,
270, 473, -94, 785, 486, -107, -555, 502, 462, 125,
935, 249, 482, 250, 212, 212, 212, 212, 781, 574,
575, 86, 608, -115, 706, 478, -99, 618, 781, 527,
685, 1174, 568, 217, 217, -107, 442, 569, 570, 571,
572, 444, 530, 927, 1021, 589, -550, 589, 526, 488,
-554, 614, 444, 526, -114, 379, 556, 763, 729, 357,
358, 359, 360, 512, 515, 463, 269, 561, 618, 618,
-114, 493, 843, 300, 493, 764, 718, -113, 296, 906,
1002, -114, -113, 70, 367, 854, 217, 1080, 573, 217,
845, -106, 940, 847, 217, 217, 125, 336, 86, 328,
329, -109, 514, -105, 844, 86, 86, 379, 419, 368,
449, 845, 246, 86, 450, 247, 248, 665, 863, 658,
665, 667, -101, 974, 315, 1130, 690, 514, 520, 980,
502, 886, 265, -111, 506, 695, 426, 427, 428, 429,
430, 665, 522, 249, 514, 250, 296, 726, 899, 781,
419, 330, 331, 514, -103, 616, 529, 265, 665, 86,
217, 217, 217, 217, 86, 217, 217, 665, 891, 1108,
535, 740, 1111, 545, 265, 452, 453, 748, 666, 544,
970, 505, 505, 265, 86, 610, 976, 978, 777, 616,
610, 105, 245, -79, -662, 616, 616, 932, 1081, 736,
737, 1164, 666, 206, 732, 86, 868, 665, 217, 541,
86, 315, 807, 623, 354, 355, 543, 730, 514, 666,
547, 270, 470, 566, 270, 729, 1031, 1032, 666, 567,
975, 872, 665, 909, 911, 913, 873, 915, 520, 916,
884, 125, 578, 125, 217, 544, 1003, 1004, 265, 747,
998, 781, 983, 584, 623, 623, 735, 70, -550, -108,
-109, -571, 781, 1176, 1177, -111, 745, 587, 666, 217,
604, 86, 217, -550, 590, 796, 843, 591, 1170, -108,
-100, 721, 86, 771, 866, 863, 217, 836, 379, 886,
86, 844, 594, 666, 1197, 217, 520, 798, 1012, 774,
86, 1202, 1203, 789, 597, -109, -662, 599, -550, 125,
678, -421, -662, 419, 523, -550, 600, 775, 1060, 840,
-111, 246, 296, 615, 247, 248, 975, 616, 846, 533,
505, 848, 693, 86, 491, 692, 280, 247, 248, 280,
796, 796, 86, 428, 429, 430, 212, 696, 842, 365,
366, 367, 249, 697, 250, -108, 315, 280, 315, 699,
217, 246, 862, 865, 247, 248, 879, 865, 86, 853,
104, 555, 104, 206, 865, -421, 368, 104, 104, 270,
212, 858, 722, 104, 104, 104, 734, 245, 104, 1065,
-421, -348, -432, -434, 925, 217, 538, -109, 206, 505,
1005, 839, 739, 878, 270, 1141, -348, 742, 883, 1156,
276, -111, -94, 276, 757, 217, 770, 508, 1026, 1027,
104, 270, 773, -421, 315, -421, 296, 431, 618, 839,
270, 276, -421, 544, 104, 454, 454, 981, 688, 791,
801, -348, 432, 802, -663, 803, 589, 841, -348, 888,
270, 855, 856, 863, 270, -669, 871, 877, 882, 892,
-665, 457, 618, 972, 880, 889, 898, 904, 618, 618,
902, 1093, 1095, 1096, 1097, 514, 432, 433, 576, 943,
908, 610, 270, 910, 434, 270, 104, 778, 104, 665,
912, 778, 217, 86, 917, 270, -109, 125, 698, -109,
-109, 914, 944, 956, 959, 265, 705, -666, -554, 1071,
-111, 458, 962, -111, -111, 1073, 717, 965, 434, -669,
796, 966, 967, -554, -665, 988, 217, -109, 993, -109,
991, 212, 989, 995, -669, 997, 520, 936, 999, -665,
1015, -111, 1010, -111, 349, 350, 351, 352, 353, 73,
666, 73, 121, 121, 996, 888, -663, 505, -554, 1030,
121, 1033, -663, 1051, 1040, -554, 1042, -669, 1036, -669,
1038, -666, -665, -665, -665, 1009, -669, 1055, -665, 104,
1045, -665, 1044, 474, 759, 1047, -666, 1046, 1062, 1168,
1048, 104, 104, 589, 589, 1063, 1128, 1129, 432, 73,
618, 1049, 1050, 121, 1074, 86, 1075, 1087, 1088, 922,
1094, 1098, 315, 86, 623, -558, 532, 217, 125, -666,
534, -666, 1099, 125, 563, -666, 328, 329, -666, 121,
-558, 1103, 1100, 475, 925, 1121, 1118, 925, 1119, 925,
434, 1120, 246, 1133, 104, 247, 248, 104, 623, 217,
354, 355, 104, 104, 623, 623, 104, 1124, 483, 1135,
86, 86, -665, 104, 104, -558, 1137, 73, 212, 212,
1142, 104, -558, 432, 86, 250, 865, 217, 330, 331,
1144, 1146, 270, 270, 1148, 125, 86, 86, 1151, 524,
1161, 1077, 1078, 931, 548, 86, 1152, 1189, 763, 1165,
357, 358, 359, 360, 432, 925, 86, 86, 484, 432,
-557, -666, -295, 1198, 1199, 434, 764, 104, 104, 104,
104, 104, 104, 104, 104, -557, 1175, -295, 246, 1134,
1182, 247, 248, 1029, 947, 1186, 1187, 1188, 1035, 475,
960, 1190, 104, 925, 549, 925, 434, 925, 865, 925,
1191, 434, 270, 334, 226, 741, 328, 329, 73, 249,
-557, 250, -295, 104, 675, 677, 104, -557, 104, -295,
246, 104, 589, 247, 248, 130, 919, 1166, 442, 1160,
982, 1117, 1052, 925, 954, 1159, 623, 246, 270, 1091,
247, 248, 514, 492, 695, 865, 86, 86, 675, 677,
1068, 249, 104, 250, 86, 208, 665, 776, 330, 331,
1102, 1107, 104, 104, 217, 217, 86, 0, 1011, 0,
250, 0, 265, -306, 0, 0, 733, 104, 0, 104,
104, 865, 865, 738, 0, 73, 805, 0, -306, 0,
104, 0, 73, 73, 104, 744, 922, 743, 104, 922,
73, 432, 922, 104, 922, 212, 212, 1101, 104, 0,
0, 121, 865, 1043, 0, 0, 968, 666, 0, 865,
865, 0, 432, -306, 1037, 1039, 0, 984, 1194, 1195,
-306, 0, 86, 0, 86, 1054, 806, 86, 0, 0,
992, 104, 0, 434, 0, 0, 73, 0, 768, 769,
104, 73, 1000, 1001, 1122, 0, 0, 458, 0, 0,
0, 1007, 562, 0, 434, 328, 329, 0, 104, 432,
922, 73, 0, 1013, 246, 0, 104, 247, 248, 799,
778, 0, 969, 931, 217, 0, 931, 0, 931, 86,
86, 0, 73, 0, 0, 472, 0, 73, 121, 0,
73, 472, 0, 104, 1123, 270, 0, 250, 922, 0,
922, 434, 922, 0, 922, 1113, 947, 330, 331, 0,
1054, 0, 787, 104, 357, 358, 359, 360, 1106, 0,
0, 327, 328, 329, 0, 0, 0, 0, 495, 0,
361, 73, 73, 0, 0, 0, 0, 0, 922, 0,
86, 217, 217, 0, 931, 0, 0, 857, 73, 86,
86, 0, 1064, 0, 246, 363, 0, 247, 248, 73,
1072, 0, 365, 366, 367, 0, 0, 73, 0, 0,
0, 0, 1079, 554, 330, 331, 0, 73, 1153, 0,
0, 502, 931, 0, 931, 249, 931, 250, 931, 368,
104, 104, 1143, 1145, 1147, 0, 1149, 1150, 338, 328,
329, 832, 1083, 890, 357, 358, 359, 360, 0, 270,
73, 947, 1113, 340, 328, 329, 832, 0, 495, 73,
764, 0, 931, 901, 104, 583, 555, 328, 329, 0,
0, 0, 579, 121, 0, 121, 0, 0, 1125, 0,
1126, 0, 0, 1127, 0, 73, 1113, 0, 0, 0,
593, 330, 331, 0, 1181, 1183, 1184, 1185, 0, 74,
0, 74, 122, 122, 0, 0, 330, 331, 0, 0,
122, 560, 328, 329, 564, 328, 329, 1196, 0, 330,
331, -678, -678, -678, 0, -678, -678, 0, -678, 565,
328, 329, 0, -678, 832, 1162, 1163, 0, 971, 973,
0, 121, 0, 104, 977, 979, 0, 0, 0, 74,
0, 104, 104, 122, 763, 104, 357, 358, 359, 360,
758, 328, 329, 0, 330, 331, 0, 330, 331, 0,
971, 973, 764, 977, 979, 0, 0, 0, 0, 122,
0, 0, 330, 331, 1008, 0, 104, 104, 0, 0,
708, 708, 104, 104, 0, 0, 1193, 363, 104, 104,
1017, 0, 0, 765, 0, 1200, 1201, 0, 0, 0,
73, 0, 104, 330, 331, 104, 0, 74, 0, 0,
0, 0, 0, 246, 104, 104, 247, 248, 0, 804,
832, 0, 0, 104, 0, 0, 832, 0, 0, 0,
0, 495, 0, 0, 104, 104, 554, -678, 495, 0,
0, 0, 0, -678, 249, 0, 250, 404, 405, 406,
407, 408, 409, 410, 411, 412, 413, 414, 415, 0,
0, 0, 0, 416, 417, 767, 1061, 0, 103, 0,
103, 128, 128, 0, 0, 0, 419, 0, 0, 231,
0, 0, 784, 0, 0, 788, 0, 0, 0, 1061,
0, 763, 0, 357, 358, 359, 360, 420, 74, 421,
422, 423, 424, 425, 426, 427, 428, 429, 430, 764,
0, 833, 73, 0, 104, 416, 417, -280, 103, 121,
73, 73, 317, 0, 104, 104, 833, 0, 419, 0,
0, 0, 104, 763, 363, 357, 358, 359, 360, 0,
1016, 0, 104, 104, 104, 0, 0, 0, 317, 832,
0, 764, 0, 0, 0, 73, 426, 427, 428, 429,
430, 73, 73, 0, 0, 0, 0, 73, 73, 0,
832, 832, 0, 0, 0, 74, 363, 0, 0, 0,
852, 73, 74, 74, 416, 417, 103, 0, 0, 0,
74, 0, 0, 73, 73, 0, 0, 419, 0, 0,
0, 122, 73, 0, 833, 0, 0, 0, 0, 0,
104, 0, 104, 73, 73, 104, 0, 0, 0, 834,
0, 472, 423, 424, 425, 426, 427, 428, 429, 430,
416, 417, 0, 0, 834, 0, 74, 0, 0, 0,
121, 74, 0, 419, 0, 121, 0, 0, 0, 0,
0, 832, 832, 0, 0, 0, 832, 0, 0, 0,
0, 74, 104, 0, 0, 0, 0, 104, 104, 0,
425, 426, 427, 428, 429, 430, 0, 103, 926, 907,
0, 0, 74, 0, 0, 0, 0, 74, 122, 0,
74, 0, 0, 73, 0, 0, 0, 0, 0, 83,
833, 83, 0, 73, 73, 0, 833, 121, 0, 0,
227, 73, 834, 0, 0, 0, 100, 0, 100, 127,
127, 127, 0, 73, 832, 0, 0, 230, 104, 104,
104, 74, 74, 0, 0, 0, 832, 104, 104, 0,
0, 0, 0, 0, 0, 0, 0, 0, 74, 83,
0, 0, 0, 987, 103, 0, 0, 832, 832, 74,
0, 103, 103, 0, 0, 0, 100, 74, 0, 103,
316, 0, 0, 0, 0, 0, 0, 74, 708, 0,
317, 472, 0, 0, 0, 0, 0, 0, 0, 73,
0, 73, 832, 1020, 73, 1022, 316, 0, 0, 1023,
0, 0, 0, 0, 0, 0, 0, 0, 834, 0,
74, 0, 0, 0, 834, 103, 0, 83, 0, 74,
103, 0, 0, 0, 0, 0, 0, 0, 0, 833,
0, 0, 0, 122, 100, 122, 0, 0, 0, 0,
103, 0, 0, 0, 0, 74, 73, 73, 0, 0,
833, 833, 0, 0, 0, 0, 0, 0, 0, 0,
0, 103, 0, 0, 0, 0, 103, 317, 0, 624,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
472, 0, 0, 0, 0, 0, 472, 0, 0, 1089,
1090, 122, 0, 0, 0, 0, 0, 73, 83, 0,
624, 624, 0, 0, 0, 0, 73, 73, 808, 809,
810, 1109, 0, 1112, 0, 100, 0, 103, 0, 0,
0, 833, 833, 0, 0, 945, 833, 834, 103, 812,
0, 0, 39, 40, 41, 0, 103, 42, 0, 0,
0, 0, 0, 0, 0, 0, 103, 0, 834, 834,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
74, 0, 0, 0, 0, 813, 1136, 472, 472, 1138,
0, 814, 815, 0, 816, 83, 0, 0, 0, 103,
57, 58, 83, 83, 0, 0, 0, 0, 103, 0,
83, 0, 100, 0, 833, 0, 0, 0, 0, 100,
100, 818, 317, 0, 317, 0, 833, 100, 120, 0,
0, 0, 1167, 0, 103, 946, 0, 1169, 316, 1171,
0, 0, 0, 1172, 0, 0, 0, 833, 833, 834,
834, 0, 0, 0, 834, 0, 83, 0, 0, 0,
0, 83, 0, 0, 0, 0, 356, 0, 357, 358,
359, 360, 0, 100, 0, 0, 0, 1192, 100, 0,
0, 83, 833, 0, 361, 0, 0, 0, 472, 0,
317, 0, 74, 0, 0, 0, 0, 0, 100, 122,
74, 74, 83, 0, 472, 472, 0, 83, 0, 363,
619, 0, 0, 0, 0, 364, 365, 366, 367, 100,
0, 0, 834, 0, 100, 316, 356, 0, 357, 358,
359, 360, 0, 0, 834, 74, 0, 0, 0, 0,
0, 74, 74, 368, 361, 0, 369, 74, 74, 0,
0, 619, 619, 0, 0, 834, 834, 1104, 362, 103,
0, 74, 0, 0, 0, 0, 0, 0, 83, 363,
0, 0, 0, 74, 74, 364, 365, 366, 367, 83,
0, 0, 74, 0, 0, 100, 0, 83, 0, 0,
834, 0, 0, 74, 74, 0, 100, 83, 0, 0,
0, 0, 0, 368, 100, 0, 369, 0, 356, 0,
357, 358, 359, 360, 100, 0, 0, 0, 0, 370,
122, 0, 0, 0, 0, 122, 361, 0, 0, 0,
83, 0, 0, 0, 0, 0, 0, 0, 0, 83,
0, 0, 0, 0, 0, 0, 0, 100, 0, 0,
0, 363, 0, 0, 0, 0, 100, 364, 365, 366,
367, 0, 0, 0, 0, 83, 0, 0, 0, 0,
316, 103, 316, 74, 0, 0, 0, 0, 317, 103,
624, 0, 100, 74, 74, 368, 0, 122, 369, 0,
0, 74, 0, 0, 0, 0, 0, 0, 0, 0,
0, 551, 0, 74, 0, 0, 0, 356, 0, 357,
358, 359, 360, 0, 624, 0, 0, 0, 0, 0,
624, 624, 808, 809, 810, 361, 103, 103, 0, 0,
101, 0, 101, 0, 0, 0, 0, 0, 316, 945,
103, 581, 0, 812, 0, 0, 39, 40, 41, 0,
363, 42, 103, 103, 0, 0, 364, 365, 366, 367,
356, 103, 357, 358, 359, 360, 0, 0, 0, 74,
0, 74, 103, 103, 74, 0, 0, 0, 361, 813,
101, 0, 0, 0, 368, 814, 815, 369, 816, 0,
83, 0, 0, 0, 57, 58, 0, 0, 0, 128,
0, 0, 0, 363, 128, 0, 0, 100, 0, 364,
365, 366, 367, 0, 0, 818, -692, 0, 0, 0,
0, 0, 120, 0, 0, 0, 74, 74, 0, -692,
-692, -692, -692, -692, -692, 0, -692, 368, 0, 0,
369, -692, -692, -692, 0, 0, 0, 0, 101, 0,
0, 0, 624, -692, -692, 0, -692, -692, -692, -692,
-692, 0, 103, 103, 0, 0, 1070, 0, 0, 0,
103, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 103, 0, 0, 0, 0, 74, 0, 0,
0, 0, 0, 0, 0, 0, 74, 74, 0, 0,
0, 0, 83, 0, 0, 0, -692, 0, 0, 0,
83, 619, 0, 0, 0, 0, 0, 0, 0, 100,
0, -692, 0, 0, 0, 0, 316, 100, 0, 0,
0, -692, 0, 0, -692, -692, 0, 0, 0, 101,
0, 0, 0, 0, 0, 619, 0, 0, 103, 0,
103, 619, 619, 103, -692, -692, 0, 83, 83, 0,
275, -692, -692, -692, -692, 0, 0, 0, 0, 0,
0, 83, 0, 0, 100, 100, 0, 0, 0, 0,
0, 0, 0, 83, 83, 0, 0, 0, 100, 0,
0, 0, 83, 0, 0, 266, 266, 0, 0, 266,
100, 100, 0, 83, 83, 103, 103, 0, 0, 100,
0, 0, 0, 0, 0, 0, 101, 0, 0, 0,
100, 100, 0, 101, 101, 0, 288, 290, 291, 292,
0, 101, 0, 266, 308, 356, 0, 357, 358, 359,
360, 0, 0, 0, 0, 345, 346, 127, 0, 0,
0, 0, 127, 361, 0, 356, 0, 357, 358, 359,
360, 0, 0, 0, 0, 0, 103, 0, 0, 779,
0, 0, 0, 361, 0, 103, 103, 101, 363, 0,
0, 0, 101, 619, 364, 365, 366, 367, 0, 903,
0, 0, 0, 83, 83, 0, 0, 1067, 363, 0,
0, 83, 101, 0, 364, 365, 366, 367, 0, 0,
100, 100, 368, 83, 1069, 369, 0, 0, 100, 808,
809, 810, 0, 101, 0, 0, 0, 0, 101, 0,
100, 101, 368, 0, 0, 369, 811, 0, 0, 0,
812, 0, 0, 39, 40, 41, 0, 0, 42, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 101, 101, 0, 0, 813, 0, 0, 83,
0, 83, 814, 815, 83, 816, 0, 817, 0, 101,
0, 57, 58, 0, 0, 0, 100, 0, 100, 0,
101, 100, 0, 0, 0, 808, 809, 810, 101, 0,
0, 0, 818, 0, 0, 0, 0, 0, 101, 120,
0, 0, 945, 0, 0, 0, 812, 0, 0, 39,
40, 41, 0, 0, 42, 0, 83, 83, 0, 0,
0, 498, 499, 500, 345, 0, 0, 0, 0, 0,
0, 101, 0, 100, 100, 266, 0, 0, 266, 0,
101, 0, 813, 0, 0, 0, 0, 0, 814, 815,
356, 0, 357, 358, 359, 360, 0, 57, 58, 0,
0, 0, 0, 0, 0, 0, 101, 0, 361, 0,
0, 0, 0, 0, 0, 0, 0, 83, 818, 0,
0, 0, 362, 0, 0, 120, 83, 83, 0, 0,
0, 0, 0, 363, 100, 0, 0, 0, 0, 364,
365, 366, 367, 100, 100, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-692, 0, 0, 0, 0, 0, 0, 368, 0, 0,
369, 0, 0, 0, 586, 0, 0, 0, 0, 0,
0, 0, 0, 370, 0, 596, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 609, 0, 0,
0, 0, 620, 0, 626, 627, 628, 629, 630, 631,
632, 633, 634, 635, 636, 637, 638, 639, 0, 641,
642, 643, 644, 645, 646, 647, 648, 649, 650, 651,
652, 101, 0, 266, 0, 0, 0, 0, 0, 0,
0, 0, 0, 674, 674, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 266, 0,
0, 0, 0, 404, 405, 406, 407, 408, 409, 410,
0, 412, 413, 674, 0, 266, 0, 674, 674, 416,
417, 0, 0, 0, 266, 0, 0, 0, 0, 0,
0, 0, 419, 720, 0, 0, 723, 724, 0, 0,
0, 725, 0, 0, 728, 0, 731, 0, 308, 292,
0, 0, 0, 0, 0, 421, 422, 423, 424, 425,
426, 427, 428, 429, 430, 0, 674, 0, 0, 0,
0, 0, 0, 0, 0, 0, 728, 0, 0, 308,
0, 0, 0, 101, 0, 0, 0, 0, 0, 266,
0, 101, 101, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 761, 762, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 772, 0, 101, 0, 0, 0,
0, 0, 101, 101, 0, 0, 0, 0, 101, 101,
0, 0, 0, 0, 790, 0, 0, 797, 0, 0,
0, 0, 101, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 101, 101, 0, 0, 0, 0,
0, 0, 0, 101, 0, 0, 0, 0, 0, 0,
-420, 0, 0, 0, 101, 101, 0, 0, 0, 0,
0, 0, 0, -420, -420, -420, -420, -420, -420, 0,
-420, 0, 0, 0, 0, -420, -420, -420, -420, 0,
0, 0, 0, 0, 0, 0, 0, -420, -420, 0,
-420, -420, -420, -420, -420, 0, 0, 0, 0, 0,
0, 0, 0, 859, 0, 0, 772, 790, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, -420, -420, -420, -420, -420, -420, -420, -420,
-420, -420, -420, -420, 101, 0, 0, 885, -420, -420,
-420, 0, 0, -420, 101, 101, 728, 308, 0, -420,
0, -420, 101, 0, 0, -420, 0, 0, 0, 0,
0, 0, 0, 0, 101, -420, 0, 0, -420, -420,
403, 0, -420, 0, -420, -420, -420, -420, -420, -420,
-420, -420, -420, -420, 0, 0, 0, 0, -420, -420,
-420, -420, -420, 0, 275, -420, -420, -420, -420, 0,
0, 0, 0, 0, 0, 0, 0, 0, 934, 0,
0, 0, 0, 674, 937, 0, 266, 404, 405, 406,
407, 408, 409, 410, 411, 412, 413, 414, 415, 0,
101, 0, 101, 416, 417, 101, 0, 0, 418, 0,
0, 0, 0, 0, 0, 0, 419, 674, 674, 0,
0, 0, 728, 674, 674, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 420, 0, 421,
422, 423, 424, 425, 426, 427, 428, 429, 430, 674,
674, 0, 674, 674, 0, 0, 0, 101, 101, 0,
0, 0, 0, 1006, 0, 0, 0, 292, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, -693, -693,
-693, -693, 408, 409, 1018, 1019, -693, -693, 0, 0,
0, 0, 0, 0, 416, 417, 0, 1024, 1025, 0,
0, 0, 0, 0, 0, 0, 0, 419, 0, 0,
0, 0, 0, 1041, 0, 0, 0, 0, 101, 0,
0, 0, 0, 0, 0, 0, 0, 101, 101, 0,
421, 422, 423, 424, 425, 426, 427, 428, 429, 430,
0, 0, 0, 0, 0, 0, 0, 0, 1058, 1059,
0, 0, 0, 0, 0, 674, 0, 0, 0, 0,
-692, 3, 0, 4, 5, 6, 7, 8, 9, 10,
11, 12, 13, 0, 0, 0, 0, 0, 674, 14,
0, 15, 16, 17, 18, 0, 0, 0, 0, 308,
19, 20, 21, 22, 23, 24, 25, 0, 0, 26,
0, 0, 0, 0, 0, 27, 28, 29, 30, 31,
32, 33, 34, 35, 36, 37, 38, 0, 39, 40,
41, 0, 0, 42, 0, 0, 43, 44, 0, 45,
46, 47, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 48, 49, 0, 0, 0, 0,
0, 50, 0, 0, 51, 52, 0, 53, 54, 0,
55, 0, 0, 0, 56, 0, 57, 58, 59, 0,
60, 61, 62, -296, 63, -692, 0, 0, -692, -692,
0, 0, 0, 0, 0, 0, -296, -296, -296, -296,
-296, -296, 0, -296, 64, 65, 66, 0, -296, 0,
-296, -296, -296, 266, 0, 0, -692, 0, -692, 0,
-296, -296, 0, -296, -296, -296, -296, -296, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-296, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, -296, -296, -296, -296, -296,
-296, -296, -296, -296, -296, -296, -296, 0, 0, 0,
0, -296, -296, -296, 0, 0, -296, 0, 0, 0,
0, 0, -296, 0, -296, 0, 0, 0, -296, 0,
0, 0, 0, 0, 0, 0, -296, 0, -296, 0,
0, -296, -296, 0, 0, -296, -296, -296, -296, -296,
-296, -296, -296, -296, -296, -296, -296, 0, 0, -550,
0, 0, -296, -296, -296, -296, 0, 0, -296, -296,
-296, -296, -550, -550, -550, -550, -550, -550, 0, -550,
0, 0, 0, 0, -550, 0, -550, -550, 0, 0,
0, 0, 0, 0, 0, 0, -550, -550, 0, -550,
-550, -550, -550, -550, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 496, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, -550, -550, -550, -550, -550, -550, -550, -550, -550,
-550, -550, -550, 0, 0, 0, 0, -550, -550, -550,
0, -550, -550, 0, 0, 0, 0, 0, -550, 0,
-550, 0, 0, 0, -550, 0, 0, 0, 0, 0,
0, 0, 0, 0, -550, 0, 0, -550, -550, 0,
-550, -550, 0, -550, -550, -550, -550, -550, -550, -550,
-550, -550, -550, 0, 0, -692, 0, 0, -550, -550,
-550, -550, 0, 0, -550, -550, -550, -550, -692, -692,
-692, -692, -692, -692, 0, -692, 0, 0, 0, 0,
-692, -692, -692, -692, 0, 0, 0, 0, 0, 0,
0, 0, -692, -692, 0, -692, -692, -692, -692, -692,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, -692, -692, -692,
-692, -692, -692, -692, -692, -692, -692, -692, -692, 0,
0, 0, 0, -692, -692, -692, 0, 0, -692, 0,
0, 0, 0, 0, -692, 0, -692, 0, 0, 0,
-692, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-692, 0, 0, -692, -692, 0, 0, -692, 0, -692,
-692, -692, -692, -692, -692, -692, -692, -692, -692, 0,
0, -692, 0, -692, -692, -692, -692, -692, 0, 275,
-692, -692, -692, -692, -692, -692, -692, -692, -692, -692,
0, -692, 0, 0, 0, 0, -692, 0, -692, -692,
0, 0, 0, 0, 0, 0, 0, 0, -692, -692,
0, -692, -692, -692, -692, -692, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, -692, -692, -692, -692, -692, -692, -692,
-692, -692, -692, -692, -692, 0, 0, 0, 0, -692,
-692, -692, 0, 0, -692, 0, 0, 0, 0, 0,
-692, 0, -692, 0, 0, 0, -692, 0, 0, 0,
0, 0, 0, 0, 0, 0, -692, 0, 0, -692,
-692, 0, 0, -692, 0, -692, -692, -692, -692, -692,
-692, -692, -692, -692, -692, 0, 0, -669, 0, 0,
-692, -692, -692, -692, 0, 275, -692, -692, -692, -692,
-669, -669, -669, 0, -669, -669, 0, -669, 0, 0,
0, 0, -669, -669, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, -669, -669, 0, -669, -669, -669,
-669, -669, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, -669,
-669, -669, -669, -669, -669, -669, -669, -669, -669, -669,
-669, 0, 0, 0, 0, -669, -669, -669, 0, 837,
-669, 0, 0, 0, 0, 0, 0, 0, -669, 0,
0, 0, -669, 0, 0, 0, 0, 0, 0, 0,
0, 0, -669, 0, 0, -669, -669, 0, -110, -669,
0, -669, -669, -669, -669, -669, -669, -669, -669, -669,
-669, 0, 0, -669, 0, -669, -669, -669, 0, -102,
0, 0, -669, -669, -669, -669, -669, -669, -669, 0,
-669, -669, 0, -669, 0, 0, 0, 0, -669, -669,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-669, -669, 0, -669, -669, -669, -669, -669, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, -669, -669, -669, -669, -669,
-669, -669, -669, -669, -669, -669, -669, 0, 0, 0,
0, -669, -669, -669, 0, 837, -669, 0, 0, 0,
0, 0, 0, 0, -669, 0, 0, 0, -669, 0,
0, 0, 0, 0, 0, 0, 0, 0, -669, 0,
0, -669, -669, 0, -110, -669, 0, -669, -669, -669,
-669, -669, -669, -669, -669, -669, -669, 0, 0, -305,
0, -669, -669, -669, 0, -669, 0, 0, -669, -669,
-669, -669, -305, -305, -305, 0, -305, -305, 0, -305,
0, 0, 0, 0, -305, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, -305, -305, 0, -305,
-305, -305, -305, -305, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, -305, -305, -305, -305, -305, -305, -305, -305, -305,
-305, -305, -305, 0, 0, 0, 0, -305, -305, -305,
0, 838, -305, 0, 0, 0, 0, 0, 0, 0,
-305, 0, 0, 0, -305, 0, 0, 0, 0, 0,
0, 0, 0, 0, -305, 0, 0, -305, -305, 0,
-112, -305, 0, -305, -305, -305, -305, -305, -305, -305,
-305, -305, -305, 0, 0, -305, 0, 0, -305, -305,
0, -104, 0, 0, -305, -305, -305, -305, -305, -305,
-305, 0, -305, -305, 0, -305, 0, 0, 0, 0,
-305, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, -305, -305, 0, -305, -305, -305, -305, -305,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, -305, -305, -305,
-305, -305, -305, -305, -305, -305, -305, -305, -305, 0,
0, 0, 0, -305, -305, -305, 0, 838, -305, 0,
0, 0, 0, 0, 0, 0, -305, 0, 0, 0,
-305, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-305, 0, 0, -305, -305, 0, -112, -305, 0, -305,
-305, -305, -305, -305, -305, -305, -305, -305, -305, 0,
0, 0, 0, 0, -305, -305, 0, -305, 0, 0,
-305, -305, -305, -305, 294, 0, 4, 5, 6, 7,
8, 9, 10, 11, 12, 13, -692, -692, -692, 0,
0, -692, 14, 0, 15, 16, 17, 18, 0, 0,
0, 0, 0, 19, 20, 21, 22, 23, 24, 25,
0, 0, 26, 0, 0, 0, 0, 0, 27, 0,
29, 30, 31, 32, 33, 34, 35, 36, 37, 38,
0, 39, 40, 41, 0, 0, 42, 0, 0, 43,
44, 0, 45, 46, 47, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 48, 49, 0,
0, 0, 0, 0, 50, 0, 0, 51, 52, 0,
53, 54, 0, 55, 0, 0, 0, 56, 0, 57,
58, 59, 0, 60, 61, 62, 0, 63, -692, 0,
0, -692, -692, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 64, 65, 66,
0, 0, 0, 0, 0, 0, 0, 0, 0, -692,
294, -692, 4, 5, 6, 7, 8, 9, 10, 11,
12, 13, 0, 0, -692, 0, -692, -692, 14, 0,
15, 16, 17, 18, 0, 0, 0, 0, 0, 19,
20, 21, 22, 23, 24, 25, 0, 0, 26, 0,
0, 0, 0, 0, 27, 0, 29, 30, 31, 32,
33, 34, 35, 36, 37, 38, 0, 39, 40, 41,
0, 0, 42, 0, 0, 43, 44, 0, 45, 46,
47, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 48, 49, 0, 0, 0, 0, 0,
50, 0, 0, 51, 52, 0, 53, 54, 0, 55,
0, 0, 0, 56, 0, 57, 58, 59, 0, 60,
61, 62, 0, 63, -692, 0, 0, -692, -692, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 64, 65, 66, 0, 0, 0, 0,
0, 0, 0, 0, 0, -692, 294, -692, 4, 5,
6, 7, 8, 9, 10, 11, 12, 13, 0, 0,
-692, 0, 0, -692, 14, -692, 15, 16, 17, 18,
0, 0, 0, 0, 0, 19, 20, 21, 22, 23,
24, 25, 0, 0, 26, 0, 0, 0, 0, 0,
27, 0, 29, 30, 31, 32, 33, 34, 35, 36,
37, 38, 0, 39, 40, 41, 0, 0, 42, 0,
0, 43, 44, 0, 45, 46, 47, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 48,
49, 0, 0, 0, 0, 0, 50, 0, 0, 51,
52, 0, 53, 54, 0, 55, 0, 0, 0, 56,
0, 57, 58, 59, 0, 60, 61, 62, 0, 63,
-692, 0, 0, -692, -692, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 64,
65, 66, 0, 0, 0, 0, 0, 0, 0, 0,
0, -692, 294, -692, 4, 5, 6, 7, 8, 9,
10, 11, 12, 13, 0, 0, -692, 0, 0, -692,
14, 0, 15, 16, 17, 18, -692, 0, 0, 0,
0, 19, 20, 21, 22, 23, 24, 25, 0, 0,
26, 0, 0, 0, 0, 0, 27, 0, 29, 30,
31, 32, 33, 34, 35, 36, 37, 38, 0, 39,
40, 41, 0, 0, 42, 0, 0, 43, 44, 0,
45, 46, 47, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 48, 49, 0, 0, 0,
0, 0, 50, 0, 0, 51, 52, 0, 53, 54,
0, 55, 0, 0, 0, 56, 0, 57, 58, 59,
0, 60, 61, 62, 0, 63, -692, 0, 0, -692,
-692, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 64, 65, 66, 0, 0,
0, 0, 0, 0, 0, 0, 0, -692, 294, -692,
4, 5, 6, 7, 8, 9, 10, 11, 12, 13,
0, 0, -692, 0, 0, -692, 14, 0, 15, 16,
17, 18, 0, 0, 0, 0, 0, 19, 20, 21,
22, 23, 24, 25, 0, 0, 26, 0, 0, 0,
0, 0, 27, 0, 29, 30, 31, 32, 33, 34,
35, 36, 37, 38, 0, 39, 40, 41, 0, 0,
42, 0, 0, 43, 44, 0, 45, 46, 47, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 48, 49, 0, 0, 0, 0, 0, 50, 0,
0, 51, 52, 0, 53, 54, 0, 55, 0, 0,
0, 56, 0, 57, 58, 59, 0, 60, 61, 62,
0, 63, -692, 0, 0, -692, -692, 3, 0, 4,
5, 6, 7, 8, 9, 10, 11, 12, 13, 0,
0, 64, 65, 66, 0, 14, 0, 15, 16, 17,
18, 0, 0, -692, 0, -692, 19, 20, 21, 22,
23, 24, 25, 0, 0, 26, 0, 0, 0, 0,
0, 27, 28, 29, 30, 31, 32, 33, 34, 35,
36, 37, 38, 0, 39, 40, 41, 0, 0, 42,
0, 0, 43, 44, 0, 45, 46, 47, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
48, 49, 0, 0, 0, 0, 0, 50, 0, 0,
51, 52, 0, 53, 54, 0, 55, 0, 0, 0,
56, 0, 57, 58, 59, 0, 60, 61, 62, 0,
63, -692, 0, 0, -692, -692, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
64, 65, 66, 0, 0, -692, 0, 0, 0, 0,
0, 0, -692, 294, -692, 4, 5, 6, 7, 8,
9, 10, 11, 12, 13, 0, -692, -692, 0, 0,
0, 14, 0, 15, 16, 17, 18, 0, 0, 0,
0, 0, 19, 20, 21, 22, 23, 24, 25, 0,
0, 26, 0, 0, 0, 0, 0, 27, 0, 29,
30, 31, 32, 33, 34, 35, 36, 37, 38, 0,
39, 40, 41, 0, 0, 42, 0, 0, 43, 44,
0, 45, 46, 47, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 48, 49, 0, 0,
0, 0, 0, 50, 0, 0, 51, 52, 0, 53,
54, 0, 55, 0, 0, 0, 56, 0, 57, 58,
59, 0, 60, 61, 62, 0, 63, -692, 0, 0,
-692, -692, 294, 0, 4, 5, 6, 7, 8, 9,
10, 11, 12, 13, 0, 0, 64, 65, 66, 0,
14, 0, 15, 16, 17, 18, 0, 0, -692, 0,
-692, 19, 20, 21, 22, 23, 24, 25, 0, 0,
26, 0, 0, 0, 0, 0, 27, 0, 29, 30,
31, 32, 33, 34, 35, 36, 37, 38, 0, 39,
40, 41, 0, 0, 42, 0, 0, 43, 44, 0,
45, 46, 47, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 48, 49, 0, 0, 0,
0, 0, 50, 0, 0, 295, 52, 0, 53, 54,
0, 55, 0, 0, 0, 56, 0, 57, 58, 59,
0, 60, 61, 62, 0, 63, -692, 0, 0, -692,
-692, -299, 0, -299, -299, -299, -299, -299, -299, -299,
-299, -299, -299, 0, 0, 64, 65, 66, 0, -299,
0, -299, -299, -299, -299, 0, -692, -692, 0, -692,
-299, -299, -299, -299, -299, -299, -299, 0, 0, -299,
0, 0, 0, 0, 0, -299, 0, -299, -299, -299,
-299, -299, -299, -299, -299, -299, -299, 0, -299, -299,
-299, 0, 0, -299, 0, 0, -299, -299, 0, -299,
-299, -299, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, -299, -299, 0, 0, 0, 0,
0, -299, 0, 0, -299, -299, 0, -299, -299, 0,
-299, 0, 0, 0, -299, 0, -299, -299, -299, 0,
-299, -299, -299, 0, -299, -299, 0, 0, -299, -299,
294, 0, 4, 5, 6, 7, 8, 9, 10, 11,
12, 13, 0, 0, -299, -299, -299, 0, 14, 0,
15, 16, 17, 18, 0, -299, -299, 0, -299, 19,
20, 21, 22, 23, 24, 25, 0, 0, 26, 0,
0, 0, 0, 0, 27, 0, 29, 30, 31, 32,
33, 34, 35, 36, 37, 38, 0, 39, 40, 41,
0, 0, 42, 0, 0, 43, 44, 0, 45, 46,
47, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 48, 49, 0, 0, 0, 0, 0,
50, 0, 0, 51, 52, 0, 53, 54, 0, 55,
0, 0, 0, 56, 0, 57, 58, 59, 0, 60,
61, 62, 0, 63, -692, 0, 0, -692, -692, 294,
0, 4, 5, 6, 7, 8, 9, 10, 11, 12,
13, 0, 0, 64, 65, 66, 0, 14, 0, 15,
16, 17, 18, 0, -692, -692, 0, -692, 19, 20,
21, 22, 23, 24, 25, 0, 0, 26, 0, 0,
0, 0, 0, 27, 0, 29, 30, 31, 32, 33,
34, 35, 36, 37, 38, 0, 39, 40, 41, 0,
0, 42, 0, 0, 43, 44, 0, 45, 46, 47,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 48, 49, 0, 0, 0, 0, 0, 50,
0, 0, 51, 52, 0, 53, 54, 0, 55, 0,
0, 0, 56, 0, 57, 58, 59, 0, 60, 61,
62, 0, 63, -692, 0, 0, -692, -692, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 64, 65, 66, 0, 0, -692, 0, 0,
0, 0, 0, 0, -692, 294, -692, 4, 5, 6,
7, 8, 9, 10, 11, 12, 13, 0, 0, -692,
0, 0, 0, 14, 0, 15, 16, 17, 18, 0,
0, 0, 0, 0, 19, 20, 21, 22, 23, 24,
25, 0, 0, 26, 0, 0, 0, 0, 0, 27,
0, 29, 30, 31, 32, 33, 34, 35, 36, 37,
38, 0, 39, 40, 41, 0, 0, 42, 0, 0,
43, 44, 0, 45, 46, 47, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 48, 49,
0, 0, 0, 0, 0, 50, 0, 0, 51, 52,
0, 53, 54, 0, 55, 0, 0, 0, 56, 0,
57, 58, 59, 0, 60, 61, 62, 0, 63, -692,
0, 0, -692, -692, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 64, 65,
66, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-692, 0, -692, 4, 5, 6, 7, 8, 9, 10,
11, 12, 13, -679, -679, -679, 0, -679, -679, 14,
-679, 15, 16, 17, 18, -679, 0, 0, 0, 0,
19, 20, 21, 22, 23, 24, 25, 0, 0, 26,
0, 0, 0, 0, 0, 27, 0, 29, 30, 31,
32, 33, 34, 35, 36, 37, 38, 0, 39, 40,
41, 0, 0, 42, 0, 0, 43, 44, 0, 45,
46, 47, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 48, 49, 0, 0, 0, 0,
0, 50, 0, 0, 51, 52, 0, 53, 54, 0,
55, 0, 0, 0, 56, 0, 57, 58, 59, 0,
60, 61, 62, 0, 63, 246, 0, 0, 247, 248,
0, 0, 4, 5, 6, 7, 8, 9, 10, 11,
12, 13, 0, 0, 64, 65, 66, 0, 14, -679,
15, 16, 17, 18, 0, -679, 249, 0, 250, 19,
20, 21, 22, 23, 24, 25, 0, 0, 26, 0,
0, 0, 0, 0, 27, 28, 29, 30, 31, 32,
33, 34, 35, 36, 37, 38, 0, 39, 40, 41,
0, 0, 42, 0, 0, 43, 44, 0, 45, 46,
47, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 48, 49, 0, 0, 0, 0, 0,
50, 0, 0, 51, 52, 0, 53, 54, 0, 55,
0, 0, 0, 56, 0, 57, 58, 59, 0, 60,
61, 62, 0, 63, 246, 0, 0, 247, 248, 0,
0, 4, 5, 6, 7, 8, 9, 10, 11, 12,
0, 0, 0, 64, 65, 66, 0, 14, 0, 15,
16, 17, 18, 0, 0, 249, 0, 250, 19, 20,
21, 22, 23, 24, 25, 0, 0, 26, 0, 0,
0, 0, 0, 0, 0, 0, 30, 31, 32, 33,
34, 35, 36, 37, 38, 0, 39, 40, 41, 0,
0, 42, 0, 0, 43, 44, 0, 45, 46, 47,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 48, 49, 0, 0, 0, 0, 0, 211,
0, 0, 119, 52, 0, 53, 54, 0, 0, 0,
0, 0, 56, 0, 57, 58, 59, 0, 60, 61,
62, 0, 63, 246, 0, 0, 247, 248, 0, 0,
4, 5, 6, 7, 8, 9, 10, 11, 12, 0,
0, 0, 64, 65, 66, 0, 14, 0, 108, 109,
17, 18, 0, 0, 249, 0, 250, 110, 111, 112,
22, 23, 24, 25, 0, 0, 113, 0, 0, 0,
0, 0, 0, 0, 0, 30, 31, 32, 33, 34,
35, 36, 37, 38, 0, 39, 40, 41, 0, 0,
42, 0, 0, 43, 44, 0, 45, 46, 47, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 48, 49, 0, 0, 0, 0, 0, 211, 0,
0, 119, 52, 0, 53, 54, 0, 0, 0, 0,
0, 56, 0, 57, 58, 59, 0, 60, 61, 62,
0, 63, 246, 0, 0, 247, 248, 0, 0, 4,
5, 6, 7, 8, 9, 10, 11, 12, 0, 0,
0, 64, 264, 66, 0, 14, 0, 15, 16, 17,
18, 0, 0, 249, 0, 250, 19, 20, 21, 22,
23, 24, 25, 0, 0, 26, 0, 0, 0, 0,
0, 0, 0, 0, 30, 31, 32, 33, 34, 35,
36, 37, 38, 0, 39, 40, 41, 0, 0, 42,
0, 0, 43, 44, 0, 45, 46, 47, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
48, 49, 0, 0, 0, 0, 0, 211, 0, 0,
119, 52, 0, 53, 54, 0, 0, 0, 0, 0,
56, 0, 57, 58, 59, 0, 60, 61, 62, 0,
63, 246, 0, 0, 247, 248, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
64, 65, 66, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 250, 131, 132, 133, 134, 135,
136, 137, 138, 139, 140, 141, 142, 143, 144, 145,
146, 147, 148, 149, 150, 151, 152, 153, 154, 0,
0, 0, 155, 156, 157, 158, 159, 160, 161, 162,
163, 164, 0, 0, 0, 0, 0, 165, 166, 167,
168, 169, 170, 171, 172, 35, 36, 173, 38, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 116, 174, 175, 176, 177, 178, 179, 180, 181,
0, 0, 182, 183, 0, 0, 0, 0, 184, 185,
186, 187, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 188, 189, 190, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 191, 192, 193, 194,
195, 196, 197, 198, 199, 200, 0, 201, 202, 0,
0, 0, 0, 0, 0, 203, 204, -662, -662, -662,
-662, -662, -662, -662, -662, -662, 0, 0, 0, 0,
0, 0, 0, -662, 0, -662, -662, -662, -662, 0,
-662, 0, 0, 0, -662, -662, -662, -662, -662, -662,
-662, 0, 0, -662, 0, 0, 0, 0, 0, 0,
0, 0, -662, -662, -662, -662, -662, -662, -662, -662,
-662, 0, -662, -662, -662, 0, 0, -662, 0, 0,
-662, -662, 0, -662, -662, -662, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, -662, -662,
0, 0, 0, 0, 0, -662, 0, 0, -662, -662,
0, -662, -662, 0, -662, 0, -662, -662, -662, 0,
-662, -662, -662, 0, -662, -662, -662, 0, -662, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, -662, -662,
-662, 0, -662, 0, 0, 0, 0, 0, -662, -663,
-663, -663, -663, -663, -663, -663, -663, -663, 0, 0,
0, 0, 0, 0, 0, -663, 0, -663, -663, -663,
-663, 0, -663, 0, 0, 0, -663, -663, -663, -663,
-663, -663, -663, 0, 0, -663, 0, 0, 0, 0,
0, 0, 0, 0, -663, -663, -663, -663, -663, -663,
-663, -663, -663, 0, -663, -663, -663, 0, 0, -663,
0, 0, -663, -663, 0, -663, -663, -663, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
-663, -663, 0, 0, 0, 0, 0, -663, 0, 0,
-663, -663, 0, -663, -663, 0, -663, 0, -663, -663,
-663, 0, -663, -663, -663, 0, -663, -663, -663, 0,
-663, 0, 0, 0, 0, 0, 0, -665, -665, -665,
-665, -665, -665, -665, -665, -665, 0, 0, 0, 0,
-663, -663, -663, -665, -663, -665, -665, -665, -665, 0,
-663, 0, 0, 0, -665, -665, -665, -665, -665, -665,
-665, 0, 0, -665, 0, 0, 0, 0, 0, 0,
0, 0, -665, -665, -665, -665, -665, -665, -665, -665,
-665, 0, -665, -665, -665, 0, 0, -665, 0, 0,
-665, -665, 0, -665, -665, -665, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, -665, -665,
0, 0, 0, 0, 0, -665, 869, 0, -665, -665,
0, -665, -665, 0, -665, 0, -665, -665, -665, 0,
-665, -665, -665, 0, -665, -665, -665, 0, -665, 0,
0, 0, 0, 0, 0, -110, -666, -666, -666, -666,
-666, -666, -666, -666, -666, 0, 0, 0, -665, -665,
-665, 0, -666, 0, -666, -666, -666, -666, -665, 0,
0, 0, 0, -666, -666, -666, -666, -666, -666, -666,
0, 0, -666, 0, 0, 0, 0, 0, 0, 0,
0, -666, -666, -666, -666, -666, -666, -666, -666, -666,
0, -666, -666, -666, 0, 0, -666, 0, 0, -666,
-666, 0, -666, -666, -666, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, -666, -666, 0,
0, 0, 0, 0, -666, 870, 0, -666, -666, 0,
-666, -666, 0, -666, 0, -666, -666, -666, 0, -666,
-666, -666, 0, -666, -666, -666, 0, -666, 0, 0,
0, 0, 0, 0, -112, -667, -667, -667, -667, -667,
-667, -667, -667, -667, 0, 0, 0, -666, -666, -666,
0, -667, 0, -667, -667, -667, -667, -666, 0, 0,
0, 0, -667, -667, -667, -667, -667, -667, -667, 0,
0, -667, 0, 0, 0, 0, 0, 0, 0, 0,
-667, -667, -667, -667, -667, -667, -667, -667, -667, 0,
-667, -667, -667, 0, 0, -667, 0, 0, -667, -667,
0, -667, -667, -667, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, -667, -667, 0, 0,
0, 0, 0, -667, 0, 0, -667, -667, 0, -667,
-667, 0, -667, 0, -667, -667, -667, 0, -667, -667,
-667, 0, -667, -667, -667, 0, -667, 0, 0, 0,
0, 0, 0, -668, -668, -668, -668, -668, -668, -668,
-668, -668, 0, 0, 0, 0, -667, -667, -667, -668,
0, -668, -668, -668, -668, 0, -667, 0, 0, 0,
-668, -668, -668, -668, -668, -668, -668, 0, 0, -668,
0, 0, 0, 0, 0, 0, 0, 0, -668, -668,
-668, -668, -668, -668, -668, -668, -668, 0, -668, -668,
-668, 0, 0, -668, 0, 0, -668, -668, 0, -668,
-668, -668, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, -668, -668, 0, 0, 0, 0,
0, -668, 0, 0, -668, -668, 0, -668, -668, 0,
-668, 0, -668, -668, -668, 0, -668, -668, -668, 0,
-668, -668, -668, 0, -668, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, -668, -668, -668, 0, 0, 0,
0, 0, 0, 0, -668, 131, 132, 133, 134, 135,
136, 137, 138, 139, 140, 141, 142, 143, 144, 145,
146, 147, 148, 149, 150, 151, 152, 153, 154, 0,
0, 0, 155, 156, 157, 232, 233, 234, 235, 162,
163, 164, 0, 0, 0, 0, 0, 165, 166, 167,
236, 237, 238, 239, 172, 319, 320, 240, 321, 0,
0, 0, 0, 0, 0, 322, 0, 0, 0, 0,
0, 323, 174, 175, 176, 177, 178, 179, 180, 181,
0, 0, 182, 183, 0, 0, 0, 0, 184, 185,
186, 187, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 188, 189, 190, 0, 0, 0, 0, 324,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 191, 192, 193, 194,
195, 196, 197, 198, 199, 200, 0, 201, 202, 0,
0, 0, 0, 0, 0, 203, 131, 132, 133, 134,
135, 136, 137, 138, 139, 140, 141, 142, 143, 144,
145, 146, 147, 148, 149, 150, 151, 152, 153, 154,
0, 0, 0, 155, 156, 157, 232, 233, 234, 235,
162, 163, 164, 0, 0, 0, 0, 0, 165, 166,
167, 236, 237, 238, 239, 172, 319, 320, 240, 321,
0, 0, 0, 0, 0, 0, 322, 0, 0, 0,
0, 0, 0, 174, 175, 176, 177, 178, 179, 180,
181, 0, 0, 182, 183, 0, 0, 0, 0, 184,
185, 186, 187, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 188, 189, 190, 0, 0, 0, 0,
487, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 191, 192, 193,
194, 195, 196, 197, 198, 199, 200, 0, 201, 202,
0, 0, 0, 0, 0, 0, 203, 131, 132, 133,
134, 135, 136, 137, 138, 139, 140, 141, 142, 143,
144, 145, 146, 147, 148, 149, 150, 151, 152, 153,
154, 0, 0, 0, 155, 156, 157, 232, 233, 234,
235, 162, 163, 164, 0, 0, 0, 0, 0, 165,
166, 167, 236, 237, 238, 239, 172, 0, 0, 240,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 174, 175, 176, 177, 178, 179,
180, 181, 0, 0, 182, 183, 0, 0, 0, 0,
184, 185, 186, 187, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 188, 189, 190, 0, 0, 0,
241, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 191, 192,
193, 194, 195, 196, 197, 198, 199, 200, 0, 201,
202, 0, 0, 0, 0, 0, 0, 203, 131, 132,
133, 134, 135, 136, 137, 138, 139, 140, 141, 142,
143, 144, 145, 146, 147, 148, 149, 150, 151, 152,
153, 154, 0, 0, 0, 155, 156, 157, 232, 233,
234, 235, 162, 163, 164, 0, 0, 0, 0, 0,
165, 166, 167, 236, 237, 238, 239, 172, 0, 0,
240, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 174, 175, 176, 177, 178,
179, 180, 181, 0, 0, 182, 183, 0, 0, 0,
0, 184, 185, 186, 187, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 188, 189, 190, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 191,
192, 193, 194, 195, 196, 197, 198, 199, 200, 0,
201, 202, 0, 0, 0, 0, 0, 0, 203, 4,
5, 6, 7, 8, 9, 10, 11, 12, 0, 0,
0, 0, 0, 0, 0, 14, 0, 108, 109, 17,
18, 0, 0, 0, 0, 0, 110, 111, 112, 22,
23, 24, 25, 0, 0, 113, 0, 0, 0, 0,
0, 0, 0, 0, 30, 31, 32, 33, 34, 35,
36, 37, 38, 0, 39, 40, 41, 0, 0, 42,
0, 0, 43, 44, 0, 116, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 312, 0, 0,
119, 52, 0, 53, 54, 0, 0, 0, 0, 0,
56, 0, 57, 58, 59, 0, 60, 61, 62, 0,
63, 0, 0, 4, 5, 6, 7, 8, 9, 10,
11, 12, 0, 0, 0, 0, 0, 0, 0, 14,
120, 108, 109, 17, 18, 0, 0, 0, 313, 0,
110, 111, 112, 22, 23, 24, 25, 0, 0, 113,
0, 0, 0, 0, 0, 0, 0, 0, 30, 31,
32, 33, 34, 35, 36, 37, 38, 0, 39, 40,
41, 0, 0, 42, 0, 0, 43, 44, 0, 116,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 312, 0, 0, 119, 52, 0, 53, 54, 0,
0, 0, 0, 0, 56, 0, 57, 58, 59, 0,
60, 61, 62, 0, 63, 0, 0, 4, 5, 6,
7, 8, 9, 10, 11, 12, 13, 0, 0, 0,
0, 0, 0, 14, 120, 15, 16, 17, 18, 0,
0, 0, 613, 0, 19, 20, 21, 22, 23, 24,
25, 0, 0, 26, 0, 0, 0, 0, 0, 27,
28, 29, 30, 31, 32, 33, 34, 35, 36, 37,
38, 0, 39, 40, 41, 0, 0, 42, 0, 0,
43, 44, 0, 45, 46, 47, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 48, 49,
0, 0, 0, 0, 0, 50, 0, 0, 51, 52,
0, 53, 54, 0, 55, 0, 0, 0, 56, 0,
57, 58, 59, 0, 60, 61, 62, 0, 63, 0,
0, 0, 0, 0, 0, 4, 5, 6, 7, 8,
9, 10, 11, 12, 13, 0, 0, 0, 64, 65,
66, 14, 0, 15, 16, 17, 18, 0, 0, 0,
0, 0, 19, 20, 21, 22, 23, 24, 25, 0,
0, 26, 0, 0, 0, 0, 0, 27, 0, 29,
30, 31, 32, 33, 34, 35, 36, 37, 38, 0,
39, 40, 41, 0, 0, 42, 0, 0, 43, 44,
0, 45, 46, 47, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 48, 49, 0, 0,
0, 0, 0, 50, 0, 0, 51, 52, 0, 53,
54, 0, 55, 0, 0, 0, 56, 0, 57, 58,
59, 0, 60, 61, 62, 0, 63, 0, 0, 0,
0, 0, 0, 4, 5, 6, 7, 8, 9, 10,
11, 12, 0, 0, 0, 0, 64, 65, 66, 14,
0, 15, 16, 17, 18, 0, 0, 0, 0, 0,
19, 20, 21, 22, 23, 24, 25, 0, 0, 113,
0, 0, 0, 0, 0, 0, 0, 0, 30, 31,
32, 259, 34, 35, 36, 37, 38, 0, 39, 40,
41, 0, 0, 42, 0, 0, 43, 44, 0, 260,
46, 47, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 48, 49, 0, 0, 0, 0,
0, 211, 0, 0, 119, 52, 0, 53, 54, 0,
261, 0, 262, 263, 56, 0, 57, 58, 59, 0,
60, 61, 62, 0, 63, 0, 0, 0, 0, 0,
0, 4, 5, 6, 7, 8, 9, 10, 11, 12,
0, 0, 0, 0, 64, 264, 66, 14, 0, 15,
16, 17, 18, 0, 0, 0, 0, 0, 19, 20,
21, 22, 23, 24, 25, 0, 0, 113, 0, 0,
0, 0, 0, 0, 0, 0, 30, 31, 32, 259,
34, 35, 36, 37, 38, 0, 39, 40, 41, 0,
0, 42, 0, 0, 43, 44, 0, 260, 46, 47,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 48, 509, 0, 0, 0, 0, 0, 211,
0, 0, 119, 52, 0, 53, 54, 0, 261, 0,
262, 263, 56, 0, 57, 58, 59, 0, 60, 61,
62, 0, 63, 0, 0, 0, 0, 0, 0, 4,
5, 6, 7, 8, 9, 10, 11, 12, 0, 0,
0, 0, 64, 264, 66, 14, 0, 108, 109, 17,
18, 0, 0, 0, 0, 0, 110, 111, 112, 22,
23, 24, 25, 0, 0, 113, 0, 0, 0, 0,
0, 0, 0, 0, 30, 31, 32, 259, 34, 35,
36, 37, 38, 0, 39, 40, 41, 0, 0, 42,
0, 0, 43, 44, 0, 260, 46, 47, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
48, 49, 0, 0, 0, 0, 0, 211, 0, 0,
119, 52, 0, 53, 54, 0, 727, 0, 262, 263,
56, 0, 57, 58, 59, 0, 60, 61, 62, 0,
63, 0, 0, 0, 0, 0, 0, 4, 5, 6,
7, 8, 9, 10, 11, 12, 0, 0, 0, 0,
64, 264, 66, 14, 0, 108, 109, 17, 18, 0,
0, 0, 0, 0, 110, 111, 112, 22, 23, 24,
25, 0, 0, 113, 0, 0, 0, 0, 0, 0,
0, 0, 30, 31, 32, 259, 34, 35, 36, 37,
38, 0, 39, 40, 41, 0, 0, 42, 0, 0,
43, 44, 0, 260, 46, 47, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 48, 887,
0, 0, 0, 0, 0, 211, 0, 0, 119, 52,
0, 53, 54, 0, 727, 0, 262, 263, 56, 0,
57, 58, 59, 0, 60, 61, 62, 0, 63, 0,
0, 0, 0, 0, 0, 4, 5, 6, 7, 8,
9, 10, 11, 12, 0, 0, 0, 0, 64, 264,
66, 14, 0, 108, 109, 17, 18, 0, 0, 0,
0, 0, 110, 111, 112, 22, 23, 24, 25, 0,
0, 113, 0, 0, 0, 0, 0, 0, 0, 0,
30, 31, 32, 259, 34, 35, 36, 37, 38, 0,
39, 40, 41, 0, 0, 42, 0, 0, 43, 44,
0, 260, 46, 47, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 48, 49, 0, 0,
0, 0, 0, 211, 0, 0, 119, 52, 0, 53,
54, 0, 261, 0, 262, 0, 56, 0, 57, 58,
59, 0, 60, 61, 62, 0, 63, 0, 0, 0,
0, 0, 0, 4, 5, 6, 7, 8, 9, 10,
11, 12, 0, 0, 0, 0, 64, 264, 66, 14,
0, 108, 109, 17, 18, 0, 0, 0, 0, 0,
110, 111, 112, 22, 23, 24, 25, 0, 0, 113,
0, 0, 0, 0, 0, 0, 0, 0, 30, 31,
32, 259, 34, 35, 36, 37, 38, 0, 39, 40,
41, 0, 0, 42, 0, 0, 43, 44, 0, 260,
46, 47, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 48, 49, 0, 0, 0, 0,
0, 211, 0, 0, 119, 52, 0, 53, 54, 0,
0, 0, 262, 263, 56, 0, 57, 58, 59, 0,
60, 61, 62, 0, 63, 0, 0, 0, 0, 0,
0, 4, 5, 6, 7, 8, 9, 10, 11, 12,
0, 0, 0, 0, 64, 264, 66, 14, 0, 108,
109, 17, 18, 0, 0, 0, 0, 0, 110, 111,
112, 22, 23, 24, 25, 0, 0, 113, 0, 0,
0, 0, 0, 0, 0, 0, 30, 31, 32, 259,
34, 35, 36, 37, 38, 0, 39, 40, 41, 0,
0, 42, 0, 0, 43, 44, 0, 260, 46, 47,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 48, 49, 0, 0, 0, 0, 0, 211,
0, 0, 119, 52, 0, 53, 54, 0, 727, 0,
262, 0, 56, 0, 57, 58, 59, 0, 60, 61,
62, 0, 63, 0, 0, 0, 0, 0, 0, 4,
5, 6, 7, 8, 9, 10, 11, 12, 0, 0,
0, 0, 64, 264, 66, 14, 0, 108, 109, 17,
18, 0, 0, 0, 0, 0, 110, 111, 112, 22,
23, 24, 25, 0, 0, 113, 0, 0, 0, 0,
0, 0, 0, 0, 30, 31, 32, 259, 34, 35,
36, 37, 38, 0, 39, 40, 41, 0, 0, 42,
0, 0, 43, 44, 0, 260, 46, 47, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
48, 49, 0, 0, 0, 0, 0, 211, 0, 0,
119, 52, 0, 53, 54, 0, 0, 0, 262, 0,
56, 0, 57, 58, 59, 0, 60, 61, 62, 0,
63, 0, 0, 0, 0, 0, 0, 4, 5, 6,
7, 8, 9, 10, 11, 12, 0, 0, 0, 0,
64, 264, 66, 14, 0, 15, 16, 17, 18, 0,
0, 0, 0, 0, 19, 20, 21, 22, 23, 24,
25, 0, 0, 113, 0, 0, 0, 0, 0, 0,
0, 0, 30, 31, 32, 33, 34, 35, 36, 37,
38, 0, 39, 40, 41, 0, 0, 42, 0, 0,
43, 44, 0, 45, 46, 47, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 48, 49,
0, 0, 0, 0, 0, 211, 0, 0, 119, 52,
0, 53, 54, 0, 607, 0, 0, 0, 56, 0,
57, 58, 59, 0, 60, 61, 62, 0, 63, 0,
0, 0, 0, 0, 0, 4, 5, 6, 7, 8,
9, 10, 11, 12, 0, 0, 0, 0, 64, 264,
66, 14, 0, 108, 109, 17, 18, 0, 0, 0,
0, 0, 110, 111, 112, 22, 23, 24, 25, 0,
0, 113, 0, 0, 0, 0, 0, 0, 0, 0,
30, 31, 32, 33, 34, 35, 36, 37, 38, 0,
39, 40, 41, 0, 0, 42, 0, 0, 43, 44,
0, 45, 46, 47, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 48, 49, 0, 0,
0, 0, 0, 211, 0, 0, 119, 52, 0, 53,
54, 0, 261, 0, 0, 0, 56, 0, 57, 58,
59, 0, 60, 61, 62, 0, 63, 0, 0, 0,
0, 0, 0, 4, 5, 6, 7, 8, 9, 10,
11, 12, 0, 0, 0, 0, 64, 264, 66, 14,
0, 108, 109, 17, 18, 0, 0, 0, 0, 0,
110, 111, 112, 22, 23, 24, 25, 0, 0, 113,
0, 0, 0, 0, 0, 0, 0, 0, 30, 31,
32, 33, 34, 35, 36, 37, 38, 0, 39, 40,
41, 0, 0, 42, 0, 0, 43, 44, 0, 45,
46, 47, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 48, 49, 0, 0, 0, 0,
0, 211, 0, 0, 119, 52, 0, 53, 54, 0,
607, 0, 0, 0, 56, 0, 57, 58, 59, 0,
60, 61, 62, 0, 63, 0, 0, 0, 0, 0,
0, 4, 5, 6, 7, 8, 9, 10, 11, 12,
0, 0, 0, 0, 64, 264, 66, 14, 0, 108,
109, 17, 18, 0, 0, 0, 0, 0, 110, 111,
112, 22, 23, 24, 25, 0, 0, 113, 0, 0,
0, 0, 0, 0, 0, 0, 30, 31, 32, 33,
34, 35, 36, 37, 38, 0, 39, 40, 41, 0,
0, 42, 0, 0, 43, 44, 0, 45, 46, 47,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 48, 49, 0, 0, 0, 0, 0, 211,
0, 0, 119, 52, 0, 53, 54, 0, 933, 0,
0, 0, 56, 0, 57, 58, 59, 0, 60, 61,
62, 0, 63, 0, 0, 0, 0, 0, 0, 4,
5, 6, 7, 8, 9, 10, 11, 12, 0, 0,
0, 0, 64, 264, 66, 14, 0, 108, 109, 17,
18, 0, 0, 0, 0, 0, 110, 111, 112, 22,
23, 24, 25, 0, 0, 113, 0, 0, 0, 0,
0, 0, 0, 0, 30, 31, 32, 33, 34, 35,
36, 37, 38, 0, 39, 40, 41, 0, 0, 42,
0, 0, 43, 44, 0, 45, 46, 47, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
48, 49, 0, 0, 0, 0, 0, 211, 0, 0,
119, 52, 0, 53, 54, 0, 727, 0, 0, 0,
56, 0, 57, 58, 59, 0, 60, 61, 62, 0,
63, 0, 0, 0, 0, 0, 0, 4, 5, 6,
7, 8, 9, 10, 11, 12, 0, 0, 0, 0,
64, 264, 66, 14, 0, 15, 16, 17, 18, 0,
0, 0, 0, 0, 19, 20, 21, 22, 23, 24,
25, 0, 0, 26, 0, 0, 0, 0, 0, 0,
0, 0, 30, 31, 32, 33, 34, 35, 36, 37,
38, 0, 39, 40, 41, 0, 0, 42, 0, 0,
43, 44, 0, 45, 46, 47, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 48, 49,
0, 0, 0, 0, 0, 211, 0, 0, 119, 52,
0, 53, 54, 0, 0, 0, 0, 0, 56, 0,
57, 58, 59, 0, 60, 61, 62, 0, 63, 0,
0, 0, 0, 0, 0, 4, 5, 6, 7, 8,
9, 10, 11, 12, 0, 0, 0, 0, 64, 65,
66, 14, 0, 108, 109, 17, 18, 0, 0, 0,
0, 0, 110, 111, 112, 22, 23, 24, 25, 0,
0, 113, 0, 0, 0, 0, 0, 0, 0, 0,
30, 31, 32, 33, 34, 35, 36, 37, 38, 0,
39, 40, 41, 0, 0, 42, 0, 0, 43, 44,
0, 45, 46, 47, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 48, 49, 0, 0,
0, 0, 0, 211, 0, 0, 119, 52, 0, 53,
54, 0, 0, 0, 0, 0, 56, 0, 57, 58,
59, 0, 60, 61, 62, 0, 63, 0, 0, 0,
0, 0, 0, 4, 5, 6, 7, 8, 9, 10,
11, 12, 0, 0, 0, 0, 64, 264, 66, 14,
0, 15, 16, 17, 18, 0, 0, 0, 0, 0,
19, 20, 21, 22, 23, 24, 25, 0, 0, 113,
0, 0, 0, 0, 0, 0, 0, 0, 30, 31,
32, 33, 34, 35, 36, 37, 38, 0, 39, 40,
41, 0, 0, 42, 0, 0, 43, 44, 0, 45,
46, 47, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 48, 49, 0, 0, 0, 0,
0, 211, 0, 0, 119, 52, 0, 53, 54, 0,
0, 0, 0, 0, 56, 0, 57, 58, 59, 0,
60, 61, 62, 0, 63, 0, 0, 0, 0, 0,
0, 4, 5, 6, 7, 8, 9, 10, 11, 12,
0, 0, 0, 0, 64, 264, 66, 14, 0, 108,
109, 17, 18, 0, 0, 0, 0, 0, 110, 111,
112, 22, 23, 24, 25, 0, 0, 113, 0, 0,
0, 0, 0, 0, 0, 0, 30, 31, 32, 114,
34, 35, 36, 115, 38, 0, 39, 40, 41, 0,
0, 42, 0, 0, 43, 44, 0, 116, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 117, 0, 0, 118,
0, 0, 119, 52, 0, 53, 54, 0, 0, 0,
0, 0, 56, 0, 57, 58, 59, 0, 60, 61,
62, 0, 63, 0, 0, 4, 5, 6, 7, 8,
9, 10, 11, 12, 0, 0, 0, 0, 0, 0,
0, 14, 120, 108, 109, 17, 18, 0, 0, 0,
0, 0, 110, 111, 112, 22, 23, 24, 25, 0,
0, 113, 0, 0, 0, 0, 0, 0, 0, 0,
30, 31, 32, 33, 34, 35, 36, 37, 38, 0,
39, 40, 41, 0, 0, 42, 0, 0, 43, 44,
0, 224, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 225, 0, 0, 51, 52, 0, 53,
54, 0, 55, 0, 0, 0, 56, 0, 57, 58,
59, 0, 60, 61, 62, 0, 63, 0, 0, 4,
5, 6, 7, 8, 9, 10, 11, 12, 0, 0,
0, 0, 0, 0, 0, 14, 120, 108, 109, 17,
18, 0, 0, 0, 0, 0, 110, 111, 112, 22,
23, 24, 25, 0, 0, 113, 0, 0, 0, 0,
0, 0, 0, 0, 30, 31, 32, 33, 34, 35,
36, 37, 38, 0, 39, 40, 41, 0, 0, 42,
0, 0, 43, 44, 0, 116, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 312, 0, 0,
399, 52, 0, 53, 54, 0, 400, 0, 0, 0,
56, 0, 57, 58, 59, 0, 60, 61, 62, 0,
63, 0, 0, 4, 5, 6, 7, 8, 9, 10,
11, 12, 0, 0, 0, 0, 0, 0, 0, 14,
120, 108, 109, 17, 18, 0, 0, 0, 0, 0,
110, 111, 112, 22, 23, 24, 25, 0, 0, 113,
0, 0, 0, 0, 0, 0, 0, 0, 30, 31,
32, 114, 34, 35, 36, 115, 38, 0, 39, 40,
41, 0, 0, 42, 0, 0, 43, 44, 0, 116,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 118, 0, 0, 119, 52, 0, 53, 54, 0,
0, 0, 0, 0, 56, 0, 57, 58, 59, 0,
60, 61, 62, 0, 63, 0, 0, 4, 5, 6,
7, 8, 9, 10, 11, 12, 0, 0, 0, 0,
0, 0, 0, 14, 120, 108, 109, 17, 18, 0,
0, 0, 0, 0, 110, 111, 112, 22, 23, 24,
25, 0, 0, 113, 0, 0, 0, 0, 0, 0,
0, 0, 30, 31, 32, 33, 34, 35, 36, 37,
38, 0, 39, 40, 41, 0, 0, 42, 0, 0,
43, 44, 0, 116, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 312, 0, 0, 399, 52,
0, 53, 54, 0, 0, 0, 0, 0, 56, 0,
57, 58, 59, 0, 60, 61, 62, 0, 63, 0,
0, 4, 5, 6, 7, 8, 9, 10, 11, 12,
0, 0, 0, 0, 0, 0, 0, 14, 120, 108,
109, 17, 18, 0, 0, 0, 0, 0, 110, 111,
112, 22, 23, 24, 25, 0, 0, 113, 0, 0,
0, 0, 0, 0, 0, 0, 30, 31, 32, 33,
34, 35, 36, 37, 38, 0, 39, 40, 41, 0,
0, 42, 0, 0, 43, 44, 0, 116, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1028,
0, 0, 119, 52, 0, 53, 54, 0, 0, 0,
0, 0, 56, 0, 57, 58, 59, 0, 60, 61,
62, 0, 63, 0, 0, 4, 5, 6, 7, 8,
9, 10, 11, 12, 0, 0, 0, 0, 0, 0,
0, 14, 120, 108, 109, 17, 18, 0, 0, 0,
0, 0, 110, 111, 112, 22, 23, 24, 25, 0,
0, 113, 0, 0, 0, 0, 0, 0, 0, 0,
30, 31, 32, 33, 34, 35, 36, 37, 38, 0,
39, 40, 41, 0, 0, 42, 0, 0, 43, 44,
0, 224, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 1066, 0, 0, 119, 52, 0, 53,
54, 0, 0, 653, 654, 0, 56, 655, 57, 58,
59, 0, 60, 61, 62, 0, 63, 0, 0, 0,
0, 0, 174, 175, 176, 177, 178, 179, 180, 181,
0, 0, 182, 183, 0, 0, 120, 0, 184, 185,
186, 187, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 188, 189, 190, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 191, 192, 193, 194,
195, 196, 197, 198, 199, 200, 0, 201, 202, 662,
663, 0, 0, 664, 0, 203, 275, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 174, 175,
176, 177, 178, 179, 180, 181, 0, 0, 182, 183,
0, 0, 0, 0, 184, 185, 186, 187, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 188, 189,
190, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 191, 192, 193, 194, 195, 196, 197, 198,
199, 200, 0, 201, 202, 683, 654, 0, 0, 684,
0, 203, 275, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 174, 175, 176, 177, 178, 179,
180, 181, 0, 0, 182, 183, 0, 0, 0, 0,
184, 185, 186, 187, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 188, 189, 190, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 191, 192,
193, 194, 195, 196, 197, 198, 199, 200, 0, 201,
202, 668, 663, 0, 0, 669, 0, 203, 275, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
174, 175, 176, 177, 178, 179, 180, 181, 0, 0,
182, 183, 0, 0, 0, 0, 184, 185, 186, 187,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
188, 189, 190, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 191, 192, 193, 194, 195, 196,
197, 198, 199, 200, 0, 201, 202, 700, 654, 0,
0, 701, 0, 203, 275, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 174, 175, 176, 177,
178, 179, 180, 181, 0, 0, 182, 183, 0, 0,
0, 0, 184, 185, 186, 187, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 188, 189, 190, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
191, 192, 193, 194, 195, 196, 197, 198, 199, 200,
0, 201, 202, 703, 663, 0, 0, 704, 0, 203,
275, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 174, 175, 176, 177, 178, 179, 180, 181,
0, 0, 182, 183, 0, 0, 0, 0, 184, 185,
186, 187, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 188, 189, 190, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 191, 192, 193, 194,
195, 196, 197, 198, 199, 200, 0, 201, 202, 710,
654, 0, 0, 711, 0, 203, 275, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 174, 175,
176, 177, 178, 179, 180, 181, 0, 0, 182, 183,
0, 0, 0, 0, 184, 185, 186, 187, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 188, 189,
190, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 191, 192, 193, 194, 195, 196, 197, 198,
199, 200, 0, 201, 202, 713, 663, 0, 0, 714,
0, 203, 275, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 174, 175, 176, 177, 178, 179,
180, 181, 0, 0, 182, 183, 0, 0, 0, 0,
184, 185, 186, 187, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 188, 189, 190, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 191, 192,
193, 194, 195, 196, 197, 198, 199, 200, 0, 201,
202, 750, 654, 0, 0, 751, 0, 203, 275, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
174, 175, 176, 177, 178, 179, 180, 181, 0, 0,
182, 183, 0, 0, 0, 0, 184, 185, 186, 187,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
188, 189, 190, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 191, 192, 193, 194, 195, 196,
197, 198, 199, 200, 0, 201, 202, 753, 663, 0,
0, 754, 0, 203, 275, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 174, 175, 176, 177,
178, 179, 180, 181, 0, 0, 182, 183, 0, 0,
0, 0, 184, 185, 186, 187, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 188, 189, 190, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
191, 192, 193, 194, 195, 196, 197, 198, 199, 200,
0, 201, 202, 938, 654, 0, 0, 939, 0, 203,
275, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 174, 175, 176, 177, 178, 179, 180, 181,
0, 0, 182, 183, 0, 0, 0, 0, 184, 185,
186, 187, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 188, 189, 190, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 191, 192, 193, 194,
195, 196, 197, 198, 199, 200, 0, 201, 202, 941,
663, 0, 0, 942, 0, 203, 275, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 174, 175,
176, 177, 178, 179, 180, 181, 0, 0, 182, 183,
0, 0, 0, 0, 184, 185, 186, 187, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 188, 189,
190, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 191, 192, 193, 194, 195, 196, 197, 198,
199, 200, 0, 201, 202, 1139, 654, 0, 0, 1140,
0, 203, 275, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 174, 175, 176, 177, 178, 179,
180, 181, 0, 0, 182, 183, 0, 0, 0, 0,
184, 185, 186, 187, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 188, 189, 190, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 191, 192,
193, 194, 195, 196, 197, 198, 199, 200, 0, 201,
202, 1154, 654, 0, 0, 1155, 0, 203, 275, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
174, 175, 176, 177, 178, 179, 180, 181, 0, 0,
182, 183, 0, 0, 0, 0, 184, 185, 186, 187,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
188, 189, 190, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 191, 192, 193, 194, 195, 196,
197, 198, 199, 200, 0, 201, 202, 1157, 663, 0,
0, 1158, 0, 203, 275, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 174, 175, 176, 177,
178, 179, 180, 181, 0, 0, 182, 183, 0, 0,
0, 0, 184, 185, 186, 187, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 188, 189, 190, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
191, 192, 193, 194, 195, 196, 197, 198, 199, 200,
0, 201, 202, 668, 663, 0, 0, 669, 0, 203,
275, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 174, 175, 176, 177, 178, 179, 180, 181,
0, 0, 182, 183, 0, 0, 0, 0, 184, 185,
186, 187, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 188, 189, 190, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 804, 0,
0, 0, 0, 0, 0, 0, 191, 192, 193, 194,
195, 196, 197, 198, 199, 200, 0, 201, 202, 0,
0, 0, 0, 0, 0, 203, 404, 405, 406, 407,
408, 409, 410, 411, 412, 413, 414, 415, 0, 0,
0, 0, 416, 417, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 419, 0, 0, 0, 0,
905, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 420, 0, 421, 422,
423, 424, 425, 426, 427, 428, 429, 430, 404, 405,
406, 407, 408, 409, 410, 411, 412, 413, 414, 415,
0, 0, 0, 0, 416, 417, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 419, 0, 0,
0, 0, 918, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 420, 0,
421, 422, 423, 424, 425, 426, 427, 428, 429, 430,
404, 405, 406, 407, 408, 409, 410, 411, 412, 413,
414, 415, 0, 0, 0, 0, 416, 417, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 419,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
420, 0, 421, 422, 423, 424, 425, 426, 427, 428,
429, 430, 404, 405, 406, 407, 408, 409, 410, 411,
412, 413, 414, 415, 0, 0, 0, 0, 416, 417,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 419, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 420, 0, 421, 422, 423, 424, 425, 426,
427, 428, 429, 430, 0, 0, 0, 0, 0, 0,
0, 0, -280, 404, 405, 406, 407, 408, 409, 410,
411, 412, 413, 414, 415, 0, 0, 0, 0, 416,
417, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 419, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 420, 0, 421, 422, 423, 424, 425,
426, 427, 428, 429, 430, 0, 0, 0, 0, 0,
0, 0, 0, -282, 404, 405, 406, 407, 408, 409,
410, 411, 412, 413, 414, 415, 0, 0, 0, 0,
416, 417, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 419, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 420, 0, 421, 422, 423, 424,
425, 426, 427, 428, 429, 430, 0, 0, 0, 0,
0, 0, 0, 0, -283, 404, 405, 406, 407, 408,
409, 410, 411, 412, 413, 414, 415, 0, 0, 0,
0, 416, 417, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 419, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 420, 0, 421, 422, 423,
424, 425, 426, 427, 428, 429, 430, 0, 0, 0,
0, 0, 0, 0, 0, -285, 404, 405, 406, 407,
408, 409, 410, 411, 412, 413, 414, 415, 0, 0,
0, 0, 416, 417, 0, 0, 0, 501, 0, 0,
0, 0, 0, 0, 0, 419, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 420, 0, 421, 422,
423, 424, 425, 426, 427, 428, 429, 430, 404, 405,
406, 407, 408, 409, 410, 411, 412, 413, 414, 415,
0, 0, 0, 0, 416, 417, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 419, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 420, 0,
421, 422, 423, 424, 425, 426, 427, 428, 429, 430,
404, 405, 406, 407, 408, 409, 410, 411, 412, 413,
-693, -693, 0, 0, 0, 0, 416, 417, 404, 405,
406, 407, 408, 409, 0, 0, 412, 413, 0, 419,
0, 0, 0, 0, 416, 417, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 419, 0, 0,
0, 0, 421, 422, 423, 424, 425, 426, 427, 428,
429, 430, 0, 0, 0, 0, 0, 0, 0, 0,
421, 422, 423, 424, 425, 426, 427, 428, 429, 430
};
static const yytype_int16 yycheck[] =
{
1, 26, 271, 8, 9, 86, 87, 27, 88, 14,
378, 490, 21, 481, 13, 313, 284, 3, 6, 20,
65, 118, 597, 814, 793, 13, 6, 9, 27, 820,
4, 5, 14, 508, 671, 672, 55, 402, 12, 27,
594, 640, 765, 81, 15, 16, 331, 68, 19, 433,
504, 74, 53, 54, 508, 51, 1036, 306, 15, 16,
594, 310, 19, 597, 539, 1011, 1, 815, 3, 57,
221, 26, 73, 74, 458, 431, 318, 57, 967, 435,
594, 55, 438, 25, 402, 34, 547, 0, 25, 14,
74, 475, 26, 20, 21, 104, 53, 54, 144, 18,
484, 20, 51, 459, 694, 295, 373, 81, 698, 25,
111, 57, 117, 28, 25, 705, 443, 444, 474, 718,
476, 59, 60, 61, 62, 443, 444, 394, 370, 485,
25, 15, 16, 15, 16, 19, 217, 19, 122, 142,
73, 74, 1, 68, 3, 4, 5, 228, 25, 8,
9, 29, 613, 12, 25, 14, 15, 16, 1046, 1048,
19, 138, 1142, 57, 51, 549, 55, 90, 387, 525,
389, 53, 90, 332, 79, 121, 335, 104, 337, 25,
339, 90, 341, 138, 111, 112, 51, 1133, 121, 122,
213, 214, 51, 460, 550, 16, 55, 121, 92, 121,
142, 92, 129, 757, 138, 142, 65, 144, 289, 399,
144, 16, 213, 214, 851, 102, 770, 222, 223, 967,
90, 126, 81, 757, 147, 34, 142, 121, 144, 147,
214, 142, 144, 90, 315, 113, 770, 102, 147, 125,
222, 223, 51, 757, 513, 90, 90, 142, 105, 547,
92, 90, 139, 241, 1045, 90, 770, 55, 117, 793,
119, 241, 737, 1151, 1033, 142, 105, 1036, 269, 60,
271, 142, 63, 558, 275, 313, 297, 147, 283, 284,
213, 214, 736, 737, 305, 306, 269, 93, 271, 310,
147, 15, 16, 1016, 115, 19, 142, 118, 119, 295,
1048, 140, 147, 147, 275, 144, 92, 278, 147, 551,
115, 121, 147, 118, 119, 613, 107, 58, 59, 90,
126, 278, 305, 90, 92, 146, 251, 148, 693, 53,
54, 121, 142, 908, 25, 121, 92, 142, 90, 313,
801, 146, 55, 148, 349, 350, 351, 352, 902, 354,
355, 210, 397, 121, 27, 92, 142, 402, 912, 294,
457, 1152, 348, 222, 223, 121, 90, 349, 350, 351,
352, 92, 297, 1142, 908, 376, 147, 378, 92, 142,
147, 400, 92, 92, 121, 318, 324, 51, 842, 53,
54, 55, 56, 275, 278, 147, 278, 556, 443, 444,
121, 20, 92, 399, 20, 69, 25, 121, 51, 777,
878, 121, 121, 348, 103, 682, 275, 1007, 353, 278,
667, 142, 806, 670, 283, 284, 400, 62, 287, 64,
65, 121, 433, 142, 92, 294, 295, 370, 101, 128,
51, 688, 115, 302, 55, 118, 119, 435, 18, 805,
438, 807, 142, 840, 313, 25, 461, 458, 726, 846,
142, 730, 433, 121, 57, 466, 129, 130, 131, 132,
133, 459, 138, 146, 475, 148, 119, 502, 142, 1033,
101, 116, 117, 484, 142, 803, 145, 458, 476, 348,
349, 350, 351, 352, 353, 354, 355, 485, 747, 1033,
141, 521, 1036, 801, 475, 58, 59, 545, 435, 547,
837, 512, 513, 484, 373, 397, 843, 844, 587, 837,
402, 522, 521, 121, 26, 843, 844, 794, 1007, 512,
513, 1130, 459, 521, 1009, 394, 1126, 525, 397, 139,
399, 400, 623, 402, 37, 38, 55, 504, 549, 476,
142, 275, 16, 101, 278, 1009, 924, 925, 485, 101,
92, 92, 550, 782, 783, 784, 92, 786, 836, 788,
721, 545, 57, 547, 433, 613, 40, 41, 549, 536,
92, 1135, 849, 121, 443, 444, 511, 522, 90, 121,
121, 121, 1146, 1162, 1163, 121, 531, 142, 525, 458,
121, 460, 461, 105, 51, 606, 92, 142, 1142, 121,
142, 493, 471, 584, 17, 18, 475, 642, 551, 888,
479, 92, 142, 550, 1193, 484, 894, 610, 895, 51,
489, 1200, 1201, 604, 142, 121, 138, 51, 140, 613,
99, 26, 144, 101, 287, 147, 142, 69, 975, 658,
121, 115, 295, 142, 118, 119, 92, 975, 667, 302,
661, 670, 13, 522, 115, 15, 667, 118, 119, 670,
671, 672, 531, 131, 132, 133, 681, 121, 661, 101,
102, 103, 146, 121, 148, 121, 545, 688, 547, 16,
549, 115, 693, 694, 118, 119, 716, 698, 557, 681,
1, 63, 3, 691, 705, 90, 128, 8, 9, 433,
715, 691, 15, 14, 15, 16, 145, 716, 19, 986,
105, 90, 40, 41, 793, 584, 747, 16, 716, 730,
881, 658, 145, 715, 458, 1103, 105, 139, 721, 1123,
667, 16, 142, 670, 142, 604, 142, 730, 920, 921,
51, 475, 15, 138, 613, 140, 399, 90, 803, 686,
484, 688, 147, 801, 65, 121, 122, 847, 1124, 15,
142, 140, 105, 44, 26, 121, 777, 141, 147, 736,
504, 141, 15, 18, 508, 26, 141, 141, 15, 141,
26, 90, 837, 838, 139, 139, 139, 44, 843, 844,
142, 1020, 1021, 1022, 1023, 806, 105, 140, 57, 57,
142, 693, 536, 142, 147, 539, 117, 587, 119, 807,
142, 591, 681, 682, 44, 549, 115, 801, 471, 118,
119, 142, 55, 51, 51, 806, 479, 26, 90, 990,
115, 140, 142, 118, 119, 996, 489, 142, 147, 90,
851, 90, 142, 105, 90, 15, 715, 146, 14, 148,
861, 866, 93, 864, 105, 15, 1134, 802, 15, 105,
142, 146, 145, 148, 40, 41, 42, 43, 44, 1,
807, 3, 4, 5, 866, 842, 138, 888, 140, 142,
12, 142, 144, 51, 15, 147, 141, 138, 142, 140,
142, 90, 138, 144, 140, 888, 147, 55, 144, 210,
142, 147, 141, 90, 557, 139, 105, 142, 15, 1138,
142, 222, 223, 924, 925, 139, 1077, 1078, 105, 51,
975, 142, 142, 55, 15, 794, 15, 15, 139, 793,
142, 126, 801, 802, 803, 90, 299, 806, 922, 138,
303, 140, 126, 927, 62, 144, 64, 65, 147, 81,
105, 1030, 55, 140, 1033, 55, 142, 1036, 139, 1038,
147, 15, 115, 142, 275, 118, 119, 278, 837, 838,
37, 38, 283, 284, 843, 844, 287, 1068, 90, 142,
849, 850, 144, 294, 295, 140, 142, 119, 1003, 1004,
142, 302, 147, 105, 863, 148, 1007, 866, 116, 117,
142, 142, 736, 737, 142, 989, 875, 876, 142, 90,
15, 1003, 1004, 793, 90, 884, 142, 1178, 51, 15,
53, 54, 55, 56, 105, 1104, 895, 896, 140, 105,
90, 144, 90, 1194, 1195, 147, 69, 348, 349, 350,
351, 352, 353, 354, 355, 105, 141, 105, 115, 1084,
142, 118, 119, 922, 814, 142, 15, 15, 927, 140,
820, 40, 373, 1142, 140, 1144, 147, 1146, 1079, 1148,
41, 147, 806, 61, 12, 522, 64, 65, 210, 146,
140, 148, 140, 394, 443, 444, 397, 147, 399, 147,
115, 402, 1103, 118, 119, 5, 793, 1133, 832, 1126,
848, 1050, 964, 1182, 815, 1125, 975, 115, 842, 142,
118, 119, 1123, 253, 1125, 1126, 985, 986, 477, 478,
989, 146, 433, 148, 993, 6, 1124, 587, 116, 117,
1030, 1033, 443, 444, 1003, 1004, 1005, -1, 146, -1,
148, -1, 1123, 90, -1, -1, 509, 458, -1, 460,
461, 1162, 1163, 516, -1, 287, 90, -1, 105, -1,
471, -1, 294, 295, 475, 528, 1030, 526, 479, 1033,
302, 105, 1036, 484, 1038, 1190, 1191, 90, 489, -1,
-1, 313, 1193, 943, -1, -1, 57, 1124, -1, 1200,
1201, -1, 105, 140, 929, 930, -1, 850, 1190, 1191,
147, -1, 1071, -1, 1073, 965, 140, 1076, -1, -1,
863, 522, -1, 147, -1, -1, 348, -1, 581, 582,
531, 353, 875, 876, 90, -1, -1, 140, -1, -1,
-1, 884, 61, -1, 147, 64, 65, -1, 549, 105,
1104, 373, -1, 896, 115, -1, 557, 118, 119, 612,
1030, -1, 123, 1033, 1123, -1, 1036, -1, 1038, 1128,
1129, -1, 394, -1, -1, 215, -1, 399, 400, -1,
402, 221, -1, 584, 140, 1009, -1, 148, 1142, -1,
1144, 147, 1146, -1, 1148, 1045, 1046, 116, 117, -1,
1050, -1, 51, 604, 53, 54, 55, 56, 1033, -1,
-1, 63, 64, 65, -1, -1, -1, -1, 258, -1,
69, 443, 444, -1, -1, -1, -1, -1, 1182, -1,
1189, 1190, 1191, -1, 1104, -1, -1, 690, 460, 1198,
1199, -1, 985, -1, 115, 94, -1, 118, 119, 471,
993, -1, 101, 102, 103, -1, -1, 479, -1, -1,
-1, -1, 1005, 318, 116, 117, -1, 489, 1118, -1,
-1, 142, 1142, -1, 1144, 146, 1146, 148, 1148, 128,
681, 682, 1107, 1108, 1109, -1, 1111, 1112, 63, 64,
65, 625, 51, 746, 53, 54, 55, 56, -1, 1123,
522, 1151, 1152, 63, 64, 65, 640, -1, 348, 531,
69, -1, 1182, 766, 715, 370, 63, 64, 65, -1,
-1, -1, 362, 545, -1, 547, -1, -1, 1071, -1,
1073, -1, -1, 1076, -1, 557, 1186, -1, -1, -1,
380, 116, 117, -1, 1169, 1170, 1171, 1172, -1, 1,
-1, 3, 4, 5, -1, -1, 116, 117, -1, -1,
12, 63, 64, 65, 63, 64, 65, 1192, -1, 116,
117, 13, 14, 15, -1, 17, 18, -1, 20, 63,
64, 65, -1, 25, 718, 1128, 1129, -1, 837, 838,
-1, 613, -1, 794, 843, 844, -1, -1, -1, 51,
-1, 802, 803, 55, 51, 806, 53, 54, 55, 56,
63, 64, 65, -1, 116, 117, -1, 116, 117, -1,
869, 870, 69, 872, 873, -1, -1, -1, -1, 81,
-1, -1, 116, 117, 887, -1, 837, 838, -1, -1,
480, 481, 843, 844, -1, -1, 1189, 94, 849, 850,
903, -1, -1, 100, -1, 1198, 1199, -1, -1, -1,
682, -1, 863, 116, 117, 866, -1, 119, -1, -1,
-1, -1, -1, 115, 875, 876, 118, 119, -1, 44,
814, -1, -1, 884, -1, -1, 820, -1, -1, -1,
-1, 531, -1, -1, 895, 896, 551, 139, 538, -1,
-1, -1, -1, 145, 146, -1, 148, 72, 73, 74,
75, 76, 77, 78, 79, 80, 81, 82, 83, -1,
-1, -1, -1, 88, 89, 580, 975, -1, 1, -1,
3, 4, 5, -1, -1, -1, 101, -1, -1, 12,
-1, -1, 597, -1, -1, 600, -1, -1, -1, 998,
-1, 51, -1, 53, 54, 55, 56, 122, 210, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, 69,
-1, 625, 794, -1, 975, 88, 89, 142, 51, 801,
802, 803, 55, -1, 985, 986, 640, -1, 101, -1,
-1, -1, 993, 51, 94, 53, 54, 55, 56, -1,
100, -1, 1003, 1004, 1005, -1, -1, -1, 81, 943,
-1, 69, -1, -1, -1, 837, 129, 130, 131, 132,
133, 843, 844, -1, -1, -1, -1, 849, 850, -1,
964, 965, -1, -1, -1, 287, 94, -1, -1, -1,
680, 863, 294, 295, 88, 89, 119, -1, -1, -1,
302, -1, -1, 875, 876, -1, -1, 101, -1, -1,
-1, 313, 884, -1, 718, -1, -1, -1, -1, -1,
1071, -1, 1073, 895, 896, 1076, -1, -1, -1, 625,
-1, 721, 126, 127, 128, 129, 130, 131, 132, 133,
88, 89, -1, -1, 640, -1, 348, -1, -1, -1,
922, 353, -1, 101, -1, 927, -1, -1, -1, -1,
-1, 1045, 1046, -1, -1, -1, 1050, -1, -1, -1,
-1, 373, 1123, -1, -1, -1, -1, 1128, 1129, -1,
128, 129, 130, 131, 132, 133, -1, 210, 793, 779,
-1, -1, 394, -1, -1, -1, -1, 399, 400, -1,
402, -1, -1, 975, -1, -1, -1, -1, -1, 1,
814, 3, -1, 985, 986, -1, 820, 989, -1, -1,
12, 993, 718, -1, -1, -1, 1, -1, 3, 4,
5, 6, -1, 1005, 1118, -1, -1, 12, 1189, 1190,
1191, 443, 444, -1, -1, -1, 1130, 1198, 1199, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 460, 51,
-1, -1, -1, 853, 287, -1, -1, 1151, 1152, 471,
-1, 294, 295, -1, -1, -1, 51, 479, -1, 302,
55, -1, -1, -1, -1, -1, -1, 489, 878, -1,
313, 881, -1, -1, -1, -1, -1, -1, -1, 1071,
-1, 1073, 1186, 908, 1076, 910, 81, -1, -1, 914,
-1, -1, -1, -1, -1, -1, -1, -1, 814, -1,
522, -1, -1, -1, 820, 348, -1, 119, -1, 531,
353, -1, -1, -1, -1, -1, -1, -1, -1, 943,
-1, -1, -1, 545, 119, 547, -1, -1, -1, -1,
373, -1, -1, -1, -1, 557, 1128, 1129, -1, -1,
964, 965, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 394, -1, -1, -1, -1, 399, 400, -1, 402,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
990, -1, -1, -1, -1, -1, 996, -1, -1, 1014,
1015, 613, -1, -1, -1, -1, -1, 1189, 210, -1,
443, 444, -1, -1, -1, -1, 1198, 1199, 34, 35,
36, 1036, -1, 1038, -1, 210, -1, 460, -1, -1,
-1, 1045, 1046, -1, -1, 51, 1050, 943, 471, 55,
-1, -1, 58, 59, 60, -1, 479, 63, -1, -1,
-1, -1, -1, -1, -1, -1, 489, -1, 964, 965,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
682, -1, -1, -1, -1, 91, 1091, 1077, 1078, 1094,
-1, 97, 98, -1, 100, 287, -1, -1, -1, 522,
106, 107, 294, 295, -1, -1, -1, -1, 531, -1,
302, -1, 287, -1, 1118, -1, -1, -1, -1, 294,
295, 127, 545, -1, 547, -1, 1130, 302, 134, -1,
-1, -1, 1137, -1, 557, 141, -1, 1142, 313, 1144,
-1, -1, -1, 1148, -1, -1, -1, 1151, 1152, 1045,
1046, -1, -1, -1, 1050, -1, 348, -1, -1, -1,
-1, 353, -1, -1, -1, -1, 51, -1, 53, 54,
55, 56, -1, 348, -1, -1, -1, 1182, 353, -1,
-1, 373, 1186, -1, 69, -1, -1, -1, 1178, -1,
613, -1, 794, -1, -1, -1, -1, -1, 373, 801,
802, 803, 394, -1, 1194, 1195, -1, 399, -1, 94,
402, -1, -1, -1, -1, 100, 101, 102, 103, 394,
-1, -1, 1118, -1, 399, 400, 51, -1, 53, 54,
55, 56, -1, -1, 1130, 837, -1, -1, -1, -1,
-1, 843, 844, 128, 69, -1, 131, 849, 850, -1,
-1, 443, 444, -1, -1, 1151, 1152, 142, 83, 682,
-1, 863, -1, -1, -1, -1, -1, -1, 460, 94,
-1, -1, -1, 875, 876, 100, 101, 102, 103, 471,
-1, -1, 884, -1, -1, 460, -1, 479, -1, -1,
1186, -1, -1, 895, 896, -1, 471, 489, -1, -1,
-1, -1, -1, 128, 479, -1, 131, -1, 51, -1,
53, 54, 55, 56, 489, -1, -1, -1, -1, 144,
922, -1, -1, -1, -1, 927, 69, -1, -1, -1,
522, -1, -1, -1, -1, -1, -1, -1, -1, 531,
-1, -1, -1, -1, -1, -1, -1, 522, -1, -1,
-1, 94, -1, -1, -1, -1, 531, 100, 101, 102,
103, -1, -1, -1, -1, 557, -1, -1, -1, -1,
545, 794, 547, 975, -1, -1, -1, -1, 801, 802,
803, -1, 557, 985, 986, 128, -1, 989, 131, -1,
-1, 993, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 144, -1, 1005, -1, -1, -1, 51, -1, 53,
54, 55, 56, -1, 837, -1, -1, -1, -1, -1,
843, 844, 34, 35, 36, 69, 849, 850, -1, -1,
1, -1, 3, -1, -1, -1, -1, -1, 613, 51,
863, 85, -1, 55, -1, -1, 58, 59, 60, -1,
94, 63, 875, 876, -1, -1, 100, 101, 102, 103,
51, 884, 53, 54, 55, 56, -1, -1, -1, 1071,
-1, 1073, 895, 896, 1076, -1, -1, -1, 69, 91,
51, -1, -1, -1, 128, 97, 98, 131, 100, -1,
682, -1, -1, -1, 106, 107, -1, -1, -1, 922,
-1, -1, -1, 94, 927, -1, -1, 682, -1, 100,
101, 102, 103, -1, -1, 127, 0, -1, -1, -1,
-1, -1, 134, -1, -1, -1, 1128, 1129, -1, 13,
14, 15, 16, 17, 18, -1, 20, 128, -1, -1,
131, 25, 26, 27, -1, -1, -1, -1, 119, -1,
-1, -1, 975, 37, 38, -1, 40, 41, 42, 43,
44, -1, 985, 986, -1, -1, 989, -1, -1, -1,
993, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 1005, -1, -1, -1, -1, 1189, -1, -1,
-1, -1, -1, -1, -1, -1, 1198, 1199, -1, -1,
-1, -1, 794, -1, -1, -1, 90, -1, -1, -1,
802, 803, -1, -1, -1, -1, -1, -1, -1, 794,
-1, 105, -1, -1, -1, -1, 801, 802, -1, -1,
-1, 115, -1, -1, 118, 119, -1, -1, -1, 210,
-1, -1, -1, -1, -1, 837, -1, -1, 1071, -1,
1073, 843, 844, 1076, 138, 139, -1, 849, 850, -1,
144, 145, 146, 147, 148, -1, -1, -1, -1, -1,
-1, 863, -1, -1, 849, 850, -1, -1, -1, -1,
-1, -1, -1, 875, 876, -1, -1, -1, 863, -1,
-1, -1, 884, -1, -1, 15, 16, -1, -1, 19,
875, 876, -1, 895, 896, 1128, 1129, -1, -1, 884,
-1, -1, -1, -1, -1, -1, 287, -1, -1, -1,
895, 896, -1, 294, 295, -1, 46, 47, 48, 49,
-1, 302, -1, 53, 54, 51, -1, 53, 54, 55,
56, -1, -1, -1, -1, 65, 66, 922, -1, -1,
-1, -1, 927, 69, -1, 51, -1, 53, 54, 55,
56, -1, -1, -1, -1, -1, 1189, -1, -1, 85,
-1, -1, -1, 69, -1, 1198, 1199, 348, 94, -1,
-1, -1, 353, 975, 100, 101, 102, 103, -1, 85,
-1, -1, -1, 985, 986, -1, -1, 989, 94, -1,
-1, 993, 373, -1, 100, 101, 102, 103, -1, -1,
985, 986, 128, 1005, 989, 131, -1, -1, 993, 34,
35, 36, -1, 394, -1, -1, -1, -1, 399, -1,
1005, 402, 128, -1, -1, 131, 51, -1, -1, -1,
55, -1, -1, 58, 59, 60, -1, -1, 63, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 443, 444, -1, -1, 91, -1, -1, 1071,
-1, 1073, 97, 98, 1076, 100, -1, 102, -1, 460,
-1, 106, 107, -1, -1, -1, 1071, -1, 1073, -1,
471, 1076, -1, -1, -1, 34, 35, 36, 479, -1,
-1, -1, 127, -1, -1, -1, -1, -1, 489, 134,
-1, -1, 51, -1, -1, -1, 55, -1, -1, 58,
59, 60, -1, -1, 63, -1, 1128, 1129, -1, -1,
-1, 261, 262, 263, 264, -1, -1, -1, -1, -1,
-1, 522, -1, 1128, 1129, 275, -1, -1, 278, -1,
531, -1, 91, -1, -1, -1, -1, -1, 97, 98,
51, -1, 53, 54, 55, 56, -1, 106, 107, -1,
-1, -1, -1, -1, -1, -1, 557, -1, 69, -1,
-1, -1, -1, -1, -1, -1, -1, 1189, 127, -1,
-1, -1, 83, -1, -1, 134, 1198, 1199, -1, -1,
-1, -1, -1, 94, 1189, -1, -1, -1, -1, 100,
101, 102, 103, 1198, 1199, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
121, -1, -1, -1, -1, -1, -1, 128, -1, -1,
131, -1, -1, -1, 374, -1, -1, -1, -1, -1,
-1, -1, -1, 144, -1, 385, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 397, -1, -1,
-1, -1, 402, -1, 404, 405, 406, 407, 408, 409,
410, 411, 412, 413, 414, 415, 416, 417, -1, 419,
420, 421, 422, 423, 424, 425, 426, 427, 428, 429,
430, 682, -1, 433, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 443, 444, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 458, -1,
-1, -1, -1, 72, 73, 74, 75, 76, 77, 78,
-1, 80, 81, 473, -1, 475, -1, 477, 478, 88,
89, -1, -1, -1, 484, -1, -1, -1, -1, -1,
-1, -1, 101, 493, -1, -1, 496, 497, -1, -1,
-1, 501, -1, -1, 504, -1, 506, -1, 508, 509,
-1, -1, -1, -1, -1, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, 526, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 536, -1, -1, 539,
-1, -1, -1, 794, -1, -1, -1, -1, -1, 549,
-1, 802, 803, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 566, 567, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 584, -1, 837, -1, -1, -1,
-1, -1, 843, 844, -1, -1, -1, -1, 849, 850,
-1, -1, -1, -1, 604, -1, -1, 607, -1, -1,
-1, -1, 863, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 875, 876, -1, -1, -1, -1,
-1, -1, -1, 884, -1, -1, -1, -1, -1, -1,
0, -1, -1, -1, 895, 896, -1, -1, -1, -1,
-1, -1, -1, 13, 14, 15, 16, 17, 18, -1,
20, -1, -1, -1, -1, 25, 26, 27, 28, -1,
-1, -1, -1, -1, -1, -1, -1, 37, 38, -1,
40, 41, 42, 43, 44, -1, -1, -1, -1, -1,
-1, -1, -1, 693, -1, -1, 696, 697, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 72, 73, 74, 75, 76, 77, 78, 79,
80, 81, 82, 83, 975, -1, -1, 727, 88, 89,
90, -1, -1, 93, 985, 986, 736, 737, -1, 99,
-1, 101, 993, -1, -1, 105, -1, -1, -1, -1,
-1, -1, -1, -1, 1005, 115, -1, -1, 118, 119,
25, -1, 122, -1, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, -1, -1, -1, -1, 138, 139,
140, 141, 142, -1, 144, 145, 146, 147, 148, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 798, -1,
-1, -1, -1, 803, 804, -1, 806, 72, 73, 74,
75, 76, 77, 78, 79, 80, 81, 82, 83, -1,
1071, -1, 1073, 88, 89, 1076, -1, -1, 93, -1,
-1, -1, -1, -1, -1, -1, 101, 837, 838, -1,
-1, -1, 842, 843, 844, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 122, -1, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, 869,
870, -1, 872, 873, -1, -1, -1, 1128, 1129, -1,
-1, -1, -1, 883, -1, -1, -1, 887, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 72, 73,
74, 75, 76, 77, 904, 905, 80, 81, -1, -1,
-1, -1, -1, -1, 88, 89, -1, 917, 918, -1,
-1, -1, -1, -1, -1, -1, -1, 101, -1, -1,
-1, -1, -1, 933, -1, -1, -1, -1, 1189, -1,
-1, -1, -1, -1, -1, -1, -1, 1198, 1199, -1,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
-1, -1, -1, -1, -1, -1, -1, -1, 968, 969,
-1, -1, -1, -1, -1, 975, -1, -1, -1, -1,
0, 1, -1, 3, 4, 5, 6, 7, 8, 9,
10, 11, 12, -1, -1, -1, -1, -1, 998, 19,
-1, 21, 22, 23, 24, -1, -1, -1, -1, 1009,
30, 31, 32, 33, 34, 35, 36, -1, -1, 39,
-1, -1, -1, -1, -1, 45, 46, 47, 48, 49,
50, 51, 52, 53, 54, 55, 56, -1, 58, 59,
60, -1, -1, 63, -1, -1, 66, 67, -1, 69,
70, 71, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 84, 85, -1, -1, -1, -1,
-1, 91, -1, -1, 94, 95, -1, 97, 98, -1,
100, -1, -1, -1, 104, -1, 106, 107, 108, -1,
110, 111, 112, 0, 114, 115, -1, -1, 118, 119,
-1, -1, -1, -1, -1, -1, 13, 14, 15, 16,
17, 18, -1, 20, 134, 135, 136, -1, 25, -1,
27, 28, 29, 1123, -1, -1, 146, -1, 148, -1,
37, 38, -1, 40, 41, 42, 43, 44, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
57, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 72, 73, 74, 75, 76,
77, 78, 79, 80, 81, 82, 83, -1, -1, -1,
-1, 88, 89, 90, -1, -1, 93, -1, -1, -1,
-1, -1, 99, -1, 101, -1, -1, -1, 105, -1,
-1, -1, -1, -1, -1, -1, 113, -1, 115, -1,
-1, 118, 119, -1, -1, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, 0,
-1, -1, 139, 140, 141, 142, -1, -1, 145, 146,
147, 148, 13, 14, 15, 16, 17, 18, -1, 20,
-1, -1, -1, -1, 25, -1, 27, 28, -1, -1,
-1, -1, -1, -1, -1, -1, 37, 38, -1, 40,
41, 42, 43, 44, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 57, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 72, 73, 74, 75, 76, 77, 78, 79, 80,
81, 82, 83, -1, -1, -1, -1, 88, 89, 90,
-1, 92, 93, -1, -1, -1, -1, -1, 99, -1,
101, -1, -1, -1, 105, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 115, -1, -1, 118, 119, -1,
121, 122, -1, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, 0, -1, -1, 139, 140,
141, 142, -1, -1, 145, 146, 147, 148, 13, 14,
15, 16, 17, 18, -1, 20, -1, -1, -1, -1,
25, 26, 27, 28, -1, -1, -1, -1, -1, -1,
-1, -1, 37, 38, -1, 40, 41, 42, 43, 44,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 72, 73, 74,
75, 76, 77, 78, 79, 80, 81, 82, 83, -1,
-1, -1, -1, 88, 89, 90, -1, -1, 93, -1,
-1, -1, -1, -1, 99, -1, 101, -1, -1, -1,
105, -1, -1, -1, -1, -1, -1, -1, -1, -1,
115, -1, -1, 118, 119, -1, -1, 122, -1, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, 0, -1, 138, 139, 140, 141, 142, -1, 144,
145, 146, 147, 148, 13, 14, 15, 16, 17, 18,
-1, 20, -1, -1, -1, -1, 25, -1, 27, 28,
-1, -1, -1, -1, -1, -1, -1, -1, 37, 38,
-1, 40, 41, 42, 43, 44, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 72, 73, 74, 75, 76, 77, 78,
79, 80, 81, 82, 83, -1, -1, -1, -1, 88,
89, 90, -1, -1, 93, -1, -1, -1, -1, -1,
99, -1, 101, -1, -1, -1, 105, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 115, -1, -1, 118,
119, -1, -1, 122, -1, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, 0, -1, -1,
139, 140, 141, 142, -1, 144, 145, 146, 147, 148,
13, 14, 15, -1, 17, 18, -1, 20, -1, -1,
-1, -1, 25, 26, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 37, 38, -1, 40, 41, 42,
43, 44, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 72,
73, 74, 75, 76, 77, 78, 79, 80, 81, 82,
83, -1, -1, -1, -1, 88, 89, 90, -1, 92,
93, -1, -1, -1, -1, -1, -1, -1, 101, -1,
-1, -1, 105, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 115, -1, -1, 118, 119, -1, 121, 122,
-1, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, 0, -1, 138, 139, 140, -1, 142,
-1, -1, 145, 146, 147, 148, 13, 14, 15, -1,
17, 18, -1, 20, -1, -1, -1, -1, 25, 26,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
37, 38, -1, 40, 41, 42, 43, 44, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 72, 73, 74, 75, 76,
77, 78, 79, 80, 81, 82, 83, -1, -1, -1,
-1, 88, 89, 90, -1, 92, 93, -1, -1, -1,
-1, -1, -1, -1, 101, -1, -1, -1, 105, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 115, -1,
-1, 118, 119, -1, 121, 122, -1, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, 0,
-1, 138, 139, 140, -1, 142, -1, -1, 145, 146,
147, 148, 13, 14, 15, -1, 17, 18, -1, 20,
-1, -1, -1, -1, 25, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 37, 38, -1, 40,
41, 42, 43, 44, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 72, 73, 74, 75, 76, 77, 78, 79, 80,
81, 82, 83, -1, -1, -1, -1, 88, 89, 90,
-1, 92, 93, -1, -1, -1, -1, -1, -1, -1,
101, -1, -1, -1, 105, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 115, -1, -1, 118, 119, -1,
121, 122, -1, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, 0, -1, -1, 139, 140,
-1, 142, -1, -1, 145, 146, 147, 148, 13, 14,
15, -1, 17, 18, -1, 20, -1, -1, -1, -1,
25, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 37, 38, -1, 40, 41, 42, 43, 44,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 72, 73, 74,
75, 76, 77, 78, 79, 80, 81, 82, 83, -1,
-1, -1, -1, 88, 89, 90, -1, 92, 93, -1,
-1, -1, -1, -1, -1, -1, 101, -1, -1, -1,
105, -1, -1, -1, -1, -1, -1, -1, -1, -1,
115, -1, -1, 118, 119, -1, 121, 122, -1, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, -1, 139, 140, -1, 142, -1, -1,
145, 146, 147, 148, 1, -1, 3, 4, 5, 6,
7, 8, 9, 10, 11, 12, 13, 14, 15, -1,
-1, 18, 19, -1, 21, 22, 23, 24, -1, -1,
-1, -1, -1, 30, 31, 32, 33, 34, 35, 36,
-1, -1, 39, -1, -1, -1, -1, -1, 45, -1,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
-1, 58, 59, 60, -1, -1, 63, -1, -1, 66,
67, -1, 69, 70, 71, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 84, 85, -1,
-1, -1, -1, -1, 91, -1, -1, 94, 95, -1,
97, 98, -1, 100, -1, -1, -1, 104, -1, 106,
107, 108, -1, 110, 111, 112, -1, 114, 115, -1,
-1, 118, 119, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 134, 135, 136,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 146,
1, 148, 3, 4, 5, 6, 7, 8, 9, 10,
11, 12, -1, -1, 15, -1, 17, 18, 19, -1,
21, 22, 23, 24, -1, -1, -1, -1, -1, 30,
31, 32, 33, 34, 35, 36, -1, -1, 39, -1,
-1, -1, -1, -1, 45, -1, 47, 48, 49, 50,
51, 52, 53, 54, 55, 56, -1, 58, 59, 60,
-1, -1, 63, -1, -1, 66, 67, -1, 69, 70,
71, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 84, 85, -1, -1, -1, -1, -1,
91, -1, -1, 94, 95, -1, 97, 98, -1, 100,
-1, -1, -1, 104, -1, 106, 107, 108, -1, 110,
111, 112, -1, 114, 115, -1, -1, 118, 119, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 134, 135, 136, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 146, 1, 148, 3, 4,
5, 6, 7, 8, 9, 10, 11, 12, -1, -1,
15, -1, -1, 18, 19, 20, 21, 22, 23, 24,
-1, -1, -1, -1, -1, 30, 31, 32, 33, 34,
35, 36, -1, -1, 39, -1, -1, -1, -1, -1,
45, -1, 47, 48, 49, 50, 51, 52, 53, 54,
55, 56, -1, 58, 59, 60, -1, -1, 63, -1,
-1, 66, 67, -1, 69, 70, 71, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 84,
85, -1, -1, -1, -1, -1, 91, -1, -1, 94,
95, -1, 97, 98, -1, 100, -1, -1, -1, 104,
-1, 106, 107, 108, -1, 110, 111, 112, -1, 114,
115, -1, -1, 118, 119, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 134,
135, 136, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 146, 1, 148, 3, 4, 5, 6, 7, 8,
9, 10, 11, 12, -1, -1, 15, -1, -1, 18,
19, -1, 21, 22, 23, 24, 25, -1, -1, -1,
-1, 30, 31, 32, 33, 34, 35, 36, -1, -1,
39, -1, -1, -1, -1, -1, 45, -1, 47, 48,
49, 50, 51, 52, 53, 54, 55, 56, -1, 58,
59, 60, -1, -1, 63, -1, -1, 66, 67, -1,
69, 70, 71, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 84, 85, -1, -1, -1,
-1, -1, 91, -1, -1, 94, 95, -1, 97, 98,
-1, 100, -1, -1, -1, 104, -1, 106, 107, 108,
-1, 110, 111, 112, -1, 114, 115, -1, -1, 118,
119, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 134, 135, 136, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 146, 1, 148,
3, 4, 5, 6, 7, 8, 9, 10, 11, 12,
-1, -1, 15, -1, -1, 18, 19, -1, 21, 22,
23, 24, -1, -1, -1, -1, -1, 30, 31, 32,
33, 34, 35, 36, -1, -1, 39, -1, -1, -1,
-1, -1, 45, -1, 47, 48, 49, 50, 51, 52,
53, 54, 55, 56, -1, 58, 59, 60, -1, -1,
63, -1, -1, 66, 67, -1, 69, 70, 71, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 84, 85, -1, -1, -1, -1, -1, 91, -1,
-1, 94, 95, -1, 97, 98, -1, 100, -1, -1,
-1, 104, -1, 106, 107, 108, -1, 110, 111, 112,
-1, 114, 115, -1, -1, 118, 119, 1, -1, 3,
4, 5, 6, 7, 8, 9, 10, 11, 12, -1,
-1, 134, 135, 136, -1, 19, -1, 21, 22, 23,
24, -1, -1, 146, -1, 148, 30, 31, 32, 33,
34, 35, 36, -1, -1, 39, -1, -1, -1, -1,
-1, 45, 46, 47, 48, 49, 50, 51, 52, 53,
54, 55, 56, -1, 58, 59, 60, -1, -1, 63,
-1, -1, 66, 67, -1, 69, 70, 71, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
84, 85, -1, -1, -1, -1, -1, 91, -1, -1,
94, 95, -1, 97, 98, -1, 100, -1, -1, -1,
104, -1, 106, 107, 108, -1, 110, 111, 112, -1,
114, 115, -1, -1, 118, 119, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
134, 135, 136, -1, -1, 139, -1, -1, -1, -1,
-1, -1, 146, 1, 148, 3, 4, 5, 6, 7,
8, 9, 10, 11, 12, -1, 14, 15, -1, -1,
-1, 19, -1, 21, 22, 23, 24, -1, -1, -1,
-1, -1, 30, 31, 32, 33, 34, 35, 36, -1,
-1, 39, -1, -1, -1, -1, -1, 45, -1, 47,
48, 49, 50, 51, 52, 53, 54, 55, 56, -1,
58, 59, 60, -1, -1, 63, -1, -1, 66, 67,
-1, 69, 70, 71, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 84, 85, -1, -1,
-1, -1, -1, 91, -1, -1, 94, 95, -1, 97,
98, -1, 100, -1, -1, -1, 104, -1, 106, 107,
108, -1, 110, 111, 112, -1, 114, 115, -1, -1,
118, 119, 1, -1, 3, 4, 5, 6, 7, 8,
9, 10, 11, 12, -1, -1, 134, 135, 136, -1,
19, -1, 21, 22, 23, 24, -1, -1, 146, -1,
148, 30, 31, 32, 33, 34, 35, 36, -1, -1,
39, -1, -1, -1, -1, -1, 45, -1, 47, 48,
49, 50, 51, 52, 53, 54, 55, 56, -1, 58,
59, 60, -1, -1, 63, -1, -1, 66, 67, -1,
69, 70, 71, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 84, 85, -1, -1, -1,
-1, -1, 91, -1, -1, 94, 95, -1, 97, 98,
-1, 100, -1, -1, -1, 104, -1, 106, 107, 108,
-1, 110, 111, 112, -1, 114, 115, -1, -1, 118,
119, 1, -1, 3, 4, 5, 6, 7, 8, 9,
10, 11, 12, -1, -1, 134, 135, 136, -1, 19,
-1, 21, 22, 23, 24, -1, 145, 146, -1, 148,
30, 31, 32, 33, 34, 35, 36, -1, -1, 39,
-1, -1, -1, -1, -1, 45, -1, 47, 48, 49,
50, 51, 52, 53, 54, 55, 56, -1, 58, 59,
60, -1, -1, 63, -1, -1, 66, 67, -1, 69,
70, 71, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 84, 85, -1, -1, -1, -1,
-1, 91, -1, -1, 94, 95, -1, 97, 98, -1,
100, -1, -1, -1, 104, -1, 106, 107, 108, -1,
110, 111, 112, -1, 114, 115, -1, -1, 118, 119,
1, -1, 3, 4, 5, 6, 7, 8, 9, 10,
11, 12, -1, -1, 134, 135, 136, -1, 19, -1,
21, 22, 23, 24, -1, 145, 146, -1, 148, 30,
31, 32, 33, 34, 35, 36, -1, -1, 39, -1,
-1, -1, -1, -1, 45, -1, 47, 48, 49, 50,
51, 52, 53, 54, 55, 56, -1, 58, 59, 60,
-1, -1, 63, -1, -1, 66, 67, -1, 69, 70,
71, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 84, 85, -1, -1, -1, -1, -1,
91, -1, -1, 94, 95, -1, 97, 98, -1, 100,
-1, -1, -1, 104, -1, 106, 107, 108, -1, 110,
111, 112, -1, 114, 115, -1, -1, 118, 119, 1,
-1, 3, 4, 5, 6, 7, 8, 9, 10, 11,
12, -1, -1, 134, 135, 136, -1, 19, -1, 21,
22, 23, 24, -1, 145, 146, -1, 148, 30, 31,
32, 33, 34, 35, 36, -1, -1, 39, -1, -1,
-1, -1, -1, 45, -1, 47, 48, 49, 50, 51,
52, 53, 54, 55, 56, -1, 58, 59, 60, -1,
-1, 63, -1, -1, 66, 67, -1, 69, 70, 71,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 84, 85, -1, -1, -1, -1, -1, 91,
-1, -1, 94, 95, -1, 97, 98, -1, 100, -1,
-1, -1, 104, -1, 106, 107, 108, -1, 110, 111,
112, -1, 114, 115, -1, -1, 118, 119, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 134, 135, 136, -1, -1, 139, -1, -1,
-1, -1, -1, -1, 146, 1, 148, 3, 4, 5,
6, 7, 8, 9, 10, 11, 12, -1, -1, 15,
-1, -1, -1, 19, -1, 21, 22, 23, 24, -1,
-1, -1, -1, -1, 30, 31, 32, 33, 34, 35,
36, -1, -1, 39, -1, -1, -1, -1, -1, 45,
-1, 47, 48, 49, 50, 51, 52, 53, 54, 55,
56, -1, 58, 59, 60, -1, -1, 63, -1, -1,
66, 67, -1, 69, 70, 71, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 84, 85,
-1, -1, -1, -1, -1, 91, -1, -1, 94, 95,
-1, 97, 98, -1, 100, -1, -1, -1, 104, -1,
106, 107, 108, -1, 110, 111, 112, -1, 114, 115,
-1, -1, 118, 119, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 134, 135,
136, -1, -1, -1, -1, -1, -1, -1, -1, -1,
146, -1, 148, 3, 4, 5, 6, 7, 8, 9,
10, 11, 12, 13, 14, 15, -1, 17, 18, 19,
20, 21, 22, 23, 24, 25, -1, -1, -1, -1,
30, 31, 32, 33, 34, 35, 36, -1, -1, 39,
-1, -1, -1, -1, -1, 45, -1, 47, 48, 49,
50, 51, 52, 53, 54, 55, 56, -1, 58, 59,
60, -1, -1, 63, -1, -1, 66, 67, -1, 69,
70, 71, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 84, 85, -1, -1, -1, -1,
-1, 91, -1, -1, 94, 95, -1, 97, 98, -1,
100, -1, -1, -1, 104, -1, 106, 107, 108, -1,
110, 111, 112, -1, 114, 115, -1, -1, 118, 119,
-1, -1, 3, 4, 5, 6, 7, 8, 9, 10,
11, 12, -1, -1, 134, 135, 136, -1, 19, 139,
21, 22, 23, 24, -1, 145, 146, -1, 148, 30,
31, 32, 33, 34, 35, 36, -1, -1, 39, -1,
-1, -1, -1, -1, 45, 46, 47, 48, 49, 50,
51, 52, 53, 54, 55, 56, -1, 58, 59, 60,
-1, -1, 63, -1, -1, 66, 67, -1, 69, 70,
71, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 84, 85, -1, -1, -1, -1, -1,
91, -1, -1, 94, 95, -1, 97, 98, -1, 100,
-1, -1, -1, 104, -1, 106, 107, 108, -1, 110,
111, 112, -1, 114, 115, -1, -1, 118, 119, -1,
-1, 3, 4, 5, 6, 7, 8, 9, 10, 11,
-1, -1, -1, 134, 135, 136, -1, 19, -1, 21,
22, 23, 24, -1, -1, 146, -1, 148, 30, 31,
32, 33, 34, 35, 36, -1, -1, 39, -1, -1,
-1, -1, -1, -1, -1, -1, 48, 49, 50, 51,
52, 53, 54, 55, 56, -1, 58, 59, 60, -1,
-1, 63, -1, -1, 66, 67, -1, 69, 70, 71,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 84, 85, -1, -1, -1, -1, -1, 91,
-1, -1, 94, 95, -1, 97, 98, -1, -1, -1,
-1, -1, 104, -1, 106, 107, 108, -1, 110, 111,
112, -1, 114, 115, -1, -1, 118, 119, -1, -1,
3, 4, 5, 6, 7, 8, 9, 10, 11, -1,
-1, -1, 134, 135, 136, -1, 19, -1, 21, 22,
23, 24, -1, -1, 146, -1, 148, 30, 31, 32,
33, 34, 35, 36, -1, -1, 39, -1, -1, -1,
-1, -1, -1, -1, -1, 48, 49, 50, 51, 52,
53, 54, 55, 56, -1, 58, 59, 60, -1, -1,
63, -1, -1, 66, 67, -1, 69, 70, 71, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 84, 85, -1, -1, -1, -1, -1, 91, -1,
-1, 94, 95, -1, 97, 98, -1, -1, -1, -1,
-1, 104, -1, 106, 107, 108, -1, 110, 111, 112,
-1, 114, 115, -1, -1, 118, 119, -1, -1, 3,
4, 5, 6, 7, 8, 9, 10, 11, -1, -1,
-1, 134, 135, 136, -1, 19, -1, 21, 22, 23,
24, -1, -1, 146, -1, 148, 30, 31, 32, 33,
34, 35, 36, -1, -1, 39, -1, -1, -1, -1,
-1, -1, -1, -1, 48, 49, 50, 51, 52, 53,
54, 55, 56, -1, 58, 59, 60, -1, -1, 63,
-1, -1, 66, 67, -1, 69, 70, 71, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
84, 85, -1, -1, -1, -1, -1, 91, -1, -1,
94, 95, -1, 97, 98, -1, -1, -1, -1, -1,
104, -1, 106, 107, 108, -1, 110, 111, 112, -1,
114, 115, -1, -1, 118, 119, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
134, 135, 136, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 148, 3, 4, 5, 6, 7,
8, 9, 10, 11, 12, 13, 14, 15, 16, 17,
18, 19, 20, 21, 22, 23, 24, 25, 26, -1,
-1, -1, 30, 31, 32, 33, 34, 35, 36, 37,
38, 39, -1, -1, -1, -1, -1, 45, 46, 47,
48, 49, 50, 51, 52, 53, 54, 55, 56, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 69, 70, 71, 72, 73, 74, 75, 76, 77,
-1, -1, 80, 81, -1, -1, -1, -1, 86, 87,
88, 89, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 100, 101, 102, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, 135, 136, -1,
-1, -1, -1, -1, -1, 143, 144, 3, 4, 5,
6, 7, 8, 9, 10, 11, -1, -1, -1, -1,
-1, -1, -1, 19, -1, 21, 22, 23, 24, -1,
26, -1, -1, -1, 30, 31, 32, 33, 34, 35,
36, -1, -1, 39, -1, -1, -1, -1, -1, -1,
-1, -1, 48, 49, 50, 51, 52, 53, 54, 55,
56, -1, 58, 59, 60, -1, -1, 63, -1, -1,
66, 67, -1, 69, 70, 71, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 84, 85,
-1, -1, -1, -1, -1, 91, -1, -1, 94, 95,
-1, 97, 98, -1, 100, -1, 102, 103, 104, -1,
106, 107, 108, -1, 110, 111, 112, -1, 114, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 134, 135,
136, -1, 138, -1, -1, -1, -1, -1, 144, 3,
4, 5, 6, 7, 8, 9, 10, 11, -1, -1,
-1, -1, -1, -1, -1, 19, -1, 21, 22, 23,
24, -1, 26, -1, -1, -1, 30, 31, 32, 33,
34, 35, 36, -1, -1, 39, -1, -1, -1, -1,
-1, -1, -1, -1, 48, 49, 50, 51, 52, 53,
54, 55, 56, -1, 58, 59, 60, -1, -1, 63,
-1, -1, 66, 67, -1, 69, 70, 71, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
84, 85, -1, -1, -1, -1, -1, 91, -1, -1,
94, 95, -1, 97, 98, -1, 100, -1, 102, 103,
104, -1, 106, 107, 108, -1, 110, 111, 112, -1,
114, -1, -1, -1, -1, -1, -1, 3, 4, 5,
6, 7, 8, 9, 10, 11, -1, -1, -1, -1,
134, 135, 136, 19, 138, 21, 22, 23, 24, -1,
144, -1, -1, -1, 30, 31, 32, 33, 34, 35,
36, -1, -1, 39, -1, -1, -1, -1, -1, -1,
-1, -1, 48, 49, 50, 51, 52, 53, 54, 55,
56, -1, 58, 59, 60, -1, -1, 63, -1, -1,
66, 67, -1, 69, 70, 71, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 84, 85,
-1, -1, -1, -1, -1, 91, 92, -1, 94, 95,
-1, 97, 98, -1, 100, -1, 102, 103, 104, -1,
106, 107, 108, -1, 110, 111, 112, -1, 114, -1,
-1, -1, -1, -1, -1, 121, 3, 4, 5, 6,
7, 8, 9, 10, 11, -1, -1, -1, 134, 135,
136, -1, 19, -1, 21, 22, 23, 24, 144, -1,
-1, -1, -1, 30, 31, 32, 33, 34, 35, 36,
-1, -1, 39, -1, -1, -1, -1, -1, -1, -1,
-1, 48, 49, 50, 51, 52, 53, 54, 55, 56,
-1, 58, 59, 60, -1, -1, 63, -1, -1, 66,
67, -1, 69, 70, 71, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 84, 85, -1,
-1, -1, -1, -1, 91, 92, -1, 94, 95, -1,
97, 98, -1, 100, -1, 102, 103, 104, -1, 106,
107, 108, -1, 110, 111, 112, -1, 114, -1, -1,
-1, -1, -1, -1, 121, 3, 4, 5, 6, 7,
8, 9, 10, 11, -1, -1, -1, 134, 135, 136,
-1, 19, -1, 21, 22, 23, 24, 144, -1, -1,
-1, -1, 30, 31, 32, 33, 34, 35, 36, -1,
-1, 39, -1, -1, -1, -1, -1, -1, -1, -1,
48, 49, 50, 51, 52, 53, 54, 55, 56, -1,
58, 59, 60, -1, -1, 63, -1, -1, 66, 67,
-1, 69, 70, 71, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 84, 85, -1, -1,
-1, -1, -1, 91, -1, -1, 94, 95, -1, 97,
98, -1, 100, -1, 102, 103, 104, -1, 106, 107,
108, -1, 110, 111, 112, -1, 114, -1, -1, -1,
-1, -1, -1, 3, 4, 5, 6, 7, 8, 9,
10, 11, -1, -1, -1, -1, 134, 135, 136, 19,
-1, 21, 22, 23, 24, -1, 144, -1, -1, -1,
30, 31, 32, 33, 34, 35, 36, -1, -1, 39,
-1, -1, -1, -1, -1, -1, -1, -1, 48, 49,
50, 51, 52, 53, 54, 55, 56, -1, 58, 59,
60, -1, -1, 63, -1, -1, 66, 67, -1, 69,
70, 71, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 84, 85, -1, -1, -1, -1,
-1, 91, -1, -1, 94, 95, -1, 97, 98, -1,
100, -1, 102, 103, 104, -1, 106, 107, 108, -1,
110, 111, 112, -1, 114, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 134, 135, 136, -1, -1, -1,
-1, -1, -1, -1, 144, 3, 4, 5, 6, 7,
8, 9, 10, 11, 12, 13, 14, 15, 16, 17,
18, 19, 20, 21, 22, 23, 24, 25, 26, -1,
-1, -1, 30, 31, 32, 33, 34, 35, 36, 37,
38, 39, -1, -1, -1, -1, -1, 45, 46, 47,
48, 49, 50, 51, 52, 53, 54, 55, 56, -1,
-1, -1, -1, -1, -1, 63, -1, -1, -1, -1,
-1, 69, 70, 71, 72, 73, 74, 75, 76, 77,
-1, -1, 80, 81, -1, -1, -1, -1, 86, 87,
88, 89, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 100, 101, 102, -1, -1, -1, -1, 107,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, 135, 136, -1,
-1, -1, -1, -1, -1, 143, 3, 4, 5, 6,
7, 8, 9, 10, 11, 12, 13, 14, 15, 16,
17, 18, 19, 20, 21, 22, 23, 24, 25, 26,
-1, -1, -1, 30, 31, 32, 33, 34, 35, 36,
37, 38, 39, -1, -1, -1, -1, -1, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
-1, -1, -1, -1, -1, -1, 63, -1, -1, -1,
-1, -1, -1, 70, 71, 72, 73, 74, 75, 76,
77, -1, -1, 80, 81, -1, -1, -1, -1, 86,
87, 88, 89, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 100, 101, 102, -1, -1, -1, -1,
107, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, 135, 136,
-1, -1, -1, -1, -1, -1, 143, 3, 4, 5,
6, 7, 8, 9, 10, 11, 12, 13, 14, 15,
16, 17, 18, 19, 20, 21, 22, 23, 24, 25,
26, -1, -1, -1, 30, 31, 32, 33, 34, 35,
36, 37, 38, 39, -1, -1, -1, -1, -1, 45,
46, 47, 48, 49, 50, 51, 52, -1, -1, 55,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 70, 71, 72, 73, 74, 75,
76, 77, -1, -1, 80, 81, -1, -1, -1, -1,
86, 87, 88, 89, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 100, 101, 102, -1, -1, -1,
106, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, -1, 135,
136, -1, -1, -1, -1, -1, -1, 143, 3, 4,
5, 6, 7, 8, 9, 10, 11, 12, 13, 14,
15, 16, 17, 18, 19, 20, 21, 22, 23, 24,
25, 26, -1, -1, -1, 30, 31, 32, 33, 34,
35, 36, 37, 38, 39, -1, -1, -1, -1, -1,
45, 46, 47, 48, 49, 50, 51, 52, -1, -1,
55, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 70, 71, 72, 73, 74,
75, 76, 77, -1, -1, 80, 81, -1, -1, -1,
-1, 86, 87, 88, 89, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 100, 101, 102, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
135, 136, -1, -1, -1, -1, -1, -1, 143, 3,
4, 5, 6, 7, 8, 9, 10, 11, -1, -1,
-1, -1, -1, -1, -1, 19, -1, 21, 22, 23,
24, -1, -1, -1, -1, -1, 30, 31, 32, 33,
34, 35, 36, -1, -1, 39, -1, -1, -1, -1,
-1, -1, -1, -1, 48, 49, 50, 51, 52, 53,
54, 55, 56, -1, 58, 59, 60, -1, -1, 63,
-1, -1, 66, 67, -1, 69, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 91, -1, -1,
94, 95, -1, 97, 98, -1, -1, -1, -1, -1,
104, -1, 106, 107, 108, -1, 110, 111, 112, -1,
114, -1, -1, 3, 4, 5, 6, 7, 8, 9,
10, 11, -1, -1, -1, -1, -1, -1, -1, 19,
134, 21, 22, 23, 24, -1, -1, -1, 142, -1,
30, 31, 32, 33, 34, 35, 36, -1, -1, 39,
-1, -1, -1, -1, -1, -1, -1, -1, 48, 49,
50, 51, 52, 53, 54, 55, 56, -1, 58, 59,
60, -1, -1, 63, -1, -1, 66, 67, -1, 69,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 91, -1, -1, 94, 95, -1, 97, 98, -1,
-1, -1, -1, -1, 104, -1, 106, 107, 108, -1,
110, 111, 112, -1, 114, -1, -1, 3, 4, 5,
6, 7, 8, 9, 10, 11, 12, -1, -1, -1,
-1, -1, -1, 19, 134, 21, 22, 23, 24, -1,
-1, -1, 142, -1, 30, 31, 32, 33, 34, 35,
36, -1, -1, 39, -1, -1, -1, -1, -1, 45,
46, 47, 48, 49, 50, 51, 52, 53, 54, 55,
56, -1, 58, 59, 60, -1, -1, 63, -1, -1,
66, 67, -1, 69, 70, 71, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 84, 85,
-1, -1, -1, -1, -1, 91, -1, -1, 94, 95,
-1, 97, 98, -1, 100, -1, -1, -1, 104, -1,
106, 107, 108, -1, 110, 111, 112, -1, 114, -1,
-1, -1, -1, -1, -1, 3, 4, 5, 6, 7,
8, 9, 10, 11, 12, -1, -1, -1, 134, 135,
136, 19, -1, 21, 22, 23, 24, -1, -1, -1,
-1, -1, 30, 31, 32, 33, 34, 35, 36, -1,
-1, 39, -1, -1, -1, -1, -1, 45, -1, 47,
48, 49, 50, 51, 52, 53, 54, 55, 56, -1,
58, 59, 60, -1, -1, 63, -1, -1, 66, 67,
-1, 69, 70, 71, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 84, 85, -1, -1,
-1, -1, -1, 91, -1, -1, 94, 95, -1, 97,
98, -1, 100, -1, -1, -1, 104, -1, 106, 107,
108, -1, 110, 111, 112, -1, 114, -1, -1, -1,
-1, -1, -1, 3, 4, 5, 6, 7, 8, 9,
10, 11, -1, -1, -1, -1, 134, 135, 136, 19,
-1, 21, 22, 23, 24, -1, -1, -1, -1, -1,
30, 31, 32, 33, 34, 35, 36, -1, -1, 39,
-1, -1, -1, -1, -1, -1, -1, -1, 48, 49,
50, 51, 52, 53, 54, 55, 56, -1, 58, 59,
60, -1, -1, 63, -1, -1, 66, 67, -1, 69,
70, 71, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 84, 85, -1, -1, -1, -1,
-1, 91, -1, -1, 94, 95, -1, 97, 98, -1,
100, -1, 102, 103, 104, -1, 106, 107, 108, -1,
110, 111, 112, -1, 114, -1, -1, -1, -1, -1,
-1, 3, 4, 5, 6, 7, 8, 9, 10, 11,
-1, -1, -1, -1, 134, 135, 136, 19, -1, 21,
22, 23, 24, -1, -1, -1, -1, -1, 30, 31,
32, 33, 34, 35, 36, -1, -1, 39, -1, -1,
-1, -1, -1, -1, -1, -1, 48, 49, 50, 51,
52, 53, 54, 55, 56, -1, 58, 59, 60, -1,
-1, 63, -1, -1, 66, 67, -1, 69, 70, 71,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 84, 85, -1, -1, -1, -1, -1, 91,
-1, -1, 94, 95, -1, 97, 98, -1, 100, -1,
102, 103, 104, -1, 106, 107, 108, -1, 110, 111,
112, -1, 114, -1, -1, -1, -1, -1, -1, 3,
4, 5, 6, 7, 8, 9, 10, 11, -1, -1,
-1, -1, 134, 135, 136, 19, -1, 21, 22, 23,
24, -1, -1, -1, -1, -1, 30, 31, 32, 33,
34, 35, 36, -1, -1, 39, -1, -1, -1, -1,
-1, -1, -1, -1, 48, 49, 50, 51, 52, 53,
54, 55, 56, -1, 58, 59, 60, -1, -1, 63,
-1, -1, 66, 67, -1, 69, 70, 71, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
84, 85, -1, -1, -1, -1, -1, 91, -1, -1,
94, 95, -1, 97, 98, -1, 100, -1, 102, 103,
104, -1, 106, 107, 108, -1, 110, 111, 112, -1,
114, -1, -1, -1, -1, -1, -1, 3, 4, 5,
6, 7, 8, 9, 10, 11, -1, -1, -1, -1,
134, 135, 136, 19, -1, 21, 22, 23, 24, -1,
-1, -1, -1, -1, 30, 31, 32, 33, 34, 35,
36, -1, -1, 39, -1, -1, -1, -1, -1, -1,
-1, -1, 48, 49, 50, 51, 52, 53, 54, 55,
56, -1, 58, 59, 60, -1, -1, 63, -1, -1,
66, 67, -1, 69, 70, 71, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 84, 85,
-1, -1, -1, -1, -1, 91, -1, -1, 94, 95,
-1, 97, 98, -1, 100, -1, 102, 103, 104, -1,
106, 107, 108, -1, 110, 111, 112, -1, 114, -1,
-1, -1, -1, -1, -1, 3, 4, 5, 6, 7,
8, 9, 10, 11, -1, -1, -1, -1, 134, 135,
136, 19, -1, 21, 22, 23, 24, -1, -1, -1,
-1, -1, 30, 31, 32, 33, 34, 35, 36, -1,
-1, 39, -1, -1, -1, -1, -1, -1, -1, -1,
48, 49, 50, 51, 52, 53, 54, 55, 56, -1,
58, 59, 60, -1, -1, 63, -1, -1, 66, 67,
-1, 69, 70, 71, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 84, 85, -1, -1,
-1, -1, -1, 91, -1, -1, 94, 95, -1, 97,
98, -1, 100, -1, 102, -1, 104, -1, 106, 107,
108, -1, 110, 111, 112, -1, 114, -1, -1, -1,
-1, -1, -1, 3, 4, 5, 6, 7, 8, 9,
10, 11, -1, -1, -1, -1, 134, 135, 136, 19,
-1, 21, 22, 23, 24, -1, -1, -1, -1, -1,
30, 31, 32, 33, 34, 35, 36, -1, -1, 39,
-1, -1, -1, -1, -1, -1, -1, -1, 48, 49,
50, 51, 52, 53, 54, 55, 56, -1, 58, 59,
60, -1, -1, 63, -1, -1, 66, 67, -1, 69,
70, 71, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 84, 85, -1, -1, -1, -1,
-1, 91, -1, -1, 94, 95, -1, 97, 98, -1,
-1, -1, 102, 103, 104, -1, 106, 107, 108, -1,
110, 111, 112, -1, 114, -1, -1, -1, -1, -1,
-1, 3, 4, 5, 6, 7, 8, 9, 10, 11,
-1, -1, -1, -1, 134, 135, 136, 19, -1, 21,
22, 23, 24, -1, -1, -1, -1, -1, 30, 31,
32, 33, 34, 35, 36, -1, -1, 39, -1, -1,
-1, -1, -1, -1, -1, -1, 48, 49, 50, 51,
52, 53, 54, 55, 56, -1, 58, 59, 60, -1,
-1, 63, -1, -1, 66, 67, -1, 69, 70, 71,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 84, 85, -1, -1, -1, -1, -1, 91,
-1, -1, 94, 95, -1, 97, 98, -1, 100, -1,
102, -1, 104, -1, 106, 107, 108, -1, 110, 111,
112, -1, 114, -1, -1, -1, -1, -1, -1, 3,
4, 5, 6, 7, 8, 9, 10, 11, -1, -1,
-1, -1, 134, 135, 136, 19, -1, 21, 22, 23,
24, -1, -1, -1, -1, -1, 30, 31, 32, 33,
34, 35, 36, -1, -1, 39, -1, -1, -1, -1,
-1, -1, -1, -1, 48, 49, 50, 51, 52, 53,
54, 55, 56, -1, 58, 59, 60, -1, -1, 63,
-1, -1, 66, 67, -1, 69, 70, 71, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
84, 85, -1, -1, -1, -1, -1, 91, -1, -1,
94, 95, -1, 97, 98, -1, -1, -1, 102, -1,
104, -1, 106, 107, 108, -1, 110, 111, 112, -1,
114, -1, -1, -1, -1, -1, -1, 3, 4, 5,
6, 7, 8, 9, 10, 11, -1, -1, -1, -1,
134, 135, 136, 19, -1, 21, 22, 23, 24, -1,
-1, -1, -1, -1, 30, 31, 32, 33, 34, 35,
36, -1, -1, 39, -1, -1, -1, -1, -1, -1,
-1, -1, 48, 49, 50, 51, 52, 53, 54, 55,
56, -1, 58, 59, 60, -1, -1, 63, -1, -1,
66, 67, -1, 69, 70, 71, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 84, 85,
-1, -1, -1, -1, -1, 91, -1, -1, 94, 95,
-1, 97, 98, -1, 100, -1, -1, -1, 104, -1,
106, 107, 108, -1, 110, 111, 112, -1, 114, -1,
-1, -1, -1, -1, -1, 3, 4, 5, 6, 7,
8, 9, 10, 11, -1, -1, -1, -1, 134, 135,
136, 19, -1, 21, 22, 23, 24, -1, -1, -1,
-1, -1, 30, 31, 32, 33, 34, 35, 36, -1,
-1, 39, -1, -1, -1, -1, -1, -1, -1, -1,
48, 49, 50, 51, 52, 53, 54, 55, 56, -1,
58, 59, 60, -1, -1, 63, -1, -1, 66, 67,
-1, 69, 70, 71, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 84, 85, -1, -1,
-1, -1, -1, 91, -1, -1, 94, 95, -1, 97,
98, -1, 100, -1, -1, -1, 104, -1, 106, 107,
108, -1, 110, 111, 112, -1, 114, -1, -1, -1,
-1, -1, -1, 3, 4, 5, 6, 7, 8, 9,
10, 11, -1, -1, -1, -1, 134, 135, 136, 19,
-1, 21, 22, 23, 24, -1, -1, -1, -1, -1,
30, 31, 32, 33, 34, 35, 36, -1, -1, 39,
-1, -1, -1, -1, -1, -1, -1, -1, 48, 49,
50, 51, 52, 53, 54, 55, 56, -1, 58, 59,
60, -1, -1, 63, -1, -1, 66, 67, -1, 69,
70, 71, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 84, 85, -1, -1, -1, -1,
-1, 91, -1, -1, 94, 95, -1, 97, 98, -1,
100, -1, -1, -1, 104, -1, 106, 107, 108, -1,
110, 111, 112, -1, 114, -1, -1, -1, -1, -1,
-1, 3, 4, 5, 6, 7, 8, 9, 10, 11,
-1, -1, -1, -1, 134, 135, 136, 19, -1, 21,
22, 23, 24, -1, -1, -1, -1, -1, 30, 31,
32, 33, 34, 35, 36, -1, -1, 39, -1, -1,
-1, -1, -1, -1, -1, -1, 48, 49, 50, 51,
52, 53, 54, 55, 56, -1, 58, 59, 60, -1,
-1, 63, -1, -1, 66, 67, -1, 69, 70, 71,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 84, 85, -1, -1, -1, -1, -1, 91,
-1, -1, 94, 95, -1, 97, 98, -1, 100, -1,
-1, -1, 104, -1, 106, 107, 108, -1, 110, 111,
112, -1, 114, -1, -1, -1, -1, -1, -1, 3,
4, 5, 6, 7, 8, 9, 10, 11, -1, -1,
-1, -1, 134, 135, 136, 19, -1, 21, 22, 23,
24, -1, -1, -1, -1, -1, 30, 31, 32, 33,
34, 35, 36, -1, -1, 39, -1, -1, -1, -1,
-1, -1, -1, -1, 48, 49, 50, 51, 52, 53,
54, 55, 56, -1, 58, 59, 60, -1, -1, 63,
-1, -1, 66, 67, -1, 69, 70, 71, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
84, 85, -1, -1, -1, -1, -1, 91, -1, -1,
94, 95, -1, 97, 98, -1, 100, -1, -1, -1,
104, -1, 106, 107, 108, -1, 110, 111, 112, -1,
114, -1, -1, -1, -1, -1, -1, 3, 4, 5,
6, 7, 8, 9, 10, 11, -1, -1, -1, -1,
134, 135, 136, 19, -1, 21, 22, 23, 24, -1,
-1, -1, -1, -1, 30, 31, 32, 33, 34, 35,
36, -1, -1, 39, -1, -1, -1, -1, -1, -1,
-1, -1, 48, 49, 50, 51, 52, 53, 54, 55,
56, -1, 58, 59, 60, -1, -1, 63, -1, -1,
66, 67, -1, 69, 70, 71, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 84, 85,
-1, -1, -1, -1, -1, 91, -1, -1, 94, 95,
-1, 97, 98, -1, -1, -1, -1, -1, 104, -1,
106, 107, 108, -1, 110, 111, 112, -1, 114, -1,
-1, -1, -1, -1, -1, 3, 4, 5, 6, 7,
8, 9, 10, 11, -1, -1, -1, -1, 134, 135,
136, 19, -1, 21, 22, 23, 24, -1, -1, -1,
-1, -1, 30, 31, 32, 33, 34, 35, 36, -1,
-1, 39, -1, -1, -1, -1, -1, -1, -1, -1,
48, 49, 50, 51, 52, 53, 54, 55, 56, -1,
58, 59, 60, -1, -1, 63, -1, -1, 66, 67,
-1, 69, 70, 71, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 84, 85, -1, -1,
-1, -1, -1, 91, -1, -1, 94, 95, -1, 97,
98, -1, -1, -1, -1, -1, 104, -1, 106, 107,
108, -1, 110, 111, 112, -1, 114, -1, -1, -1,
-1, -1, -1, 3, 4, 5, 6, 7, 8, 9,
10, 11, -1, -1, -1, -1, 134, 135, 136, 19,
-1, 21, 22, 23, 24, -1, -1, -1, -1, -1,
30, 31, 32, 33, 34, 35, 36, -1, -1, 39,
-1, -1, -1, -1, -1, -1, -1, -1, 48, 49,
50, 51, 52, 53, 54, 55, 56, -1, 58, 59,
60, -1, -1, 63, -1, -1, 66, 67, -1, 69,
70, 71, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 84, 85, -1, -1, -1, -1,
-1, 91, -1, -1, 94, 95, -1, 97, 98, -1,
-1, -1, -1, -1, 104, -1, 106, 107, 108, -1,
110, 111, 112, -1, 114, -1, -1, -1, -1, -1,
-1, 3, 4, 5, 6, 7, 8, 9, 10, 11,
-1, -1, -1, -1, 134, 135, 136, 19, -1, 21,
22, 23, 24, -1, -1, -1, -1, -1, 30, 31,
32, 33, 34, 35, 36, -1, -1, 39, -1, -1,
-1, -1, -1, -1, -1, -1, 48, 49, 50, 51,
52, 53, 54, 55, 56, -1, 58, 59, 60, -1,
-1, 63, -1, -1, 66, 67, -1, 69, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 88, -1, -1, 91,
-1, -1, 94, 95, -1, 97, 98, -1, -1, -1,
-1, -1, 104, -1, 106, 107, 108, -1, 110, 111,
112, -1, 114, -1, -1, 3, 4, 5, 6, 7,
8, 9, 10, 11, -1, -1, -1, -1, -1, -1,
-1, 19, 134, 21, 22, 23, 24, -1, -1, -1,
-1, -1, 30, 31, 32, 33, 34, 35, 36, -1,
-1, 39, -1, -1, -1, -1, -1, -1, -1, -1,
48, 49, 50, 51, 52, 53, 54, 55, 56, -1,
58, 59, 60, -1, -1, 63, -1, -1, 66, 67,
-1, 69, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 91, -1, -1, 94, 95, -1, 97,
98, -1, 100, -1, -1, -1, 104, -1, 106, 107,
108, -1, 110, 111, 112, -1, 114, -1, -1, 3,
4, 5, 6, 7, 8, 9, 10, 11, -1, -1,
-1, -1, -1, -1, -1, 19, 134, 21, 22, 23,
24, -1, -1, -1, -1, -1, 30, 31, 32, 33,
34, 35, 36, -1, -1, 39, -1, -1, -1, -1,
-1, -1, -1, -1, 48, 49, 50, 51, 52, 53,
54, 55, 56, -1, 58, 59, 60, -1, -1, 63,
-1, -1, 66, 67, -1, 69, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 91, -1, -1,
94, 95, -1, 97, 98, -1, 100, -1, -1, -1,
104, -1, 106, 107, 108, -1, 110, 111, 112, -1,
114, -1, -1, 3, 4, 5, 6, 7, 8, 9,
10, 11, -1, -1, -1, -1, -1, -1, -1, 19,
134, 21, 22, 23, 24, -1, -1, -1, -1, -1,
30, 31, 32, 33, 34, 35, 36, -1, -1, 39,
-1, -1, -1, -1, -1, -1, -1, -1, 48, 49,
50, 51, 52, 53, 54, 55, 56, -1, 58, 59,
60, -1, -1, 63, -1, -1, 66, 67, -1, 69,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 91, -1, -1, 94, 95, -1, 97, 98, -1,
-1, -1, -1, -1, 104, -1, 106, 107, 108, -1,
110, 111, 112, -1, 114, -1, -1, 3, 4, 5,
6, 7, 8, 9, 10, 11, -1, -1, -1, -1,
-1, -1, -1, 19, 134, 21, 22, 23, 24, -1,
-1, -1, -1, -1, 30, 31, 32, 33, 34, 35,
36, -1, -1, 39, -1, -1, -1, -1, -1, -1,
-1, -1, 48, 49, 50, 51, 52, 53, 54, 55,
56, -1, 58, 59, 60, -1, -1, 63, -1, -1,
66, 67, -1, 69, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 91, -1, -1, 94, 95,
-1, 97, 98, -1, -1, -1, -1, -1, 104, -1,
106, 107, 108, -1, 110, 111, 112, -1, 114, -1,
-1, 3, 4, 5, 6, 7, 8, 9, 10, 11,
-1, -1, -1, -1, -1, -1, -1, 19, 134, 21,
22, 23, 24, -1, -1, -1, -1, -1, 30, 31,
32, 33, 34, 35, 36, -1, -1, 39, -1, -1,
-1, -1, -1, -1, -1, -1, 48, 49, 50, 51,
52, 53, 54, 55, 56, -1, 58, 59, 60, -1,
-1, 63, -1, -1, 66, 67, -1, 69, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 91,
-1, -1, 94, 95, -1, 97, 98, -1, -1, -1,
-1, -1, 104, -1, 106, 107, 108, -1, 110, 111,
112, -1, 114, -1, -1, 3, 4, 5, 6, 7,
8, 9, 10, 11, -1, -1, -1, -1, -1, -1,
-1, 19, 134, 21, 22, 23, 24, -1, -1, -1,
-1, -1, 30, 31, 32, 33, 34, 35, 36, -1,
-1, 39, -1, -1, -1, -1, -1, -1, -1, -1,
48, 49, 50, 51, 52, 53, 54, 55, 56, -1,
58, 59, 60, -1, -1, 63, -1, -1, 66, 67,
-1, 69, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 91, -1, -1, 94, 95, -1, 97,
98, -1, -1, 51, 52, -1, 104, 55, 106, 107,
108, -1, 110, 111, 112, -1, 114, -1, -1, -1,
-1, -1, 70, 71, 72, 73, 74, 75, 76, 77,
-1, -1, 80, 81, -1, -1, 134, -1, 86, 87,
88, 89, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 100, 101, 102, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, 135, 136, 51,
52, -1, -1, 55, -1, 143, 144, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 70, 71,
72, 73, 74, 75, 76, 77, -1, -1, 80, 81,
-1, -1, -1, -1, 86, 87, 88, 89, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 100, 101,
102, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 124, 125, 126, 127, 128, 129, 130, 131,
132, 133, -1, 135, 136, 51, 52, -1, -1, 55,
-1, 143, 144, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 70, 71, 72, 73, 74, 75,
76, 77, -1, -1, 80, 81, -1, -1, -1, -1,
86, 87, 88, 89, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 100, 101, 102, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, -1, 135,
136, 51, 52, -1, -1, 55, -1, 143, 144, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
70, 71, 72, 73, 74, 75, 76, 77, -1, -1,
80, 81, -1, -1, -1, -1, 86, 87, 88, 89,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
100, 101, 102, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, -1, 135, 136, 51, 52, -1,
-1, 55, -1, 143, 144, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 70, 71, 72, 73,
74, 75, 76, 77, -1, -1, 80, 81, -1, -1,
-1, -1, 86, 87, 88, 89, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 100, 101, 102, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
-1, 135, 136, 51, 52, -1, -1, 55, -1, 143,
144, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 70, 71, 72, 73, 74, 75, 76, 77,
-1, -1, 80, 81, -1, -1, -1, -1, 86, 87,
88, 89, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 100, 101, 102, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, 135, 136, 51,
52, -1, -1, 55, -1, 143, 144, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 70, 71,
72, 73, 74, 75, 76, 77, -1, -1, 80, 81,
-1, -1, -1, -1, 86, 87, 88, 89, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 100, 101,
102, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 124, 125, 126, 127, 128, 129, 130, 131,
132, 133, -1, 135, 136, 51, 52, -1, -1, 55,
-1, 143, 144, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 70, 71, 72, 73, 74, 75,
76, 77, -1, -1, 80, 81, -1, -1, -1, -1,
86, 87, 88, 89, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 100, 101, 102, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, -1, 135,
136, 51, 52, -1, -1, 55, -1, 143, 144, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
70, 71, 72, 73, 74, 75, 76, 77, -1, -1,
80, 81, -1, -1, -1, -1, 86, 87, 88, 89,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
100, 101, 102, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, -1, 135, 136, 51, 52, -1,
-1, 55, -1, 143, 144, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 70, 71, 72, 73,
74, 75, 76, 77, -1, -1, 80, 81, -1, -1,
-1, -1, 86, 87, 88, 89, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 100, 101, 102, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
-1, 135, 136, 51, 52, -1, -1, 55, -1, 143,
144, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 70, 71, 72, 73, 74, 75, 76, 77,
-1, -1, 80, 81, -1, -1, -1, -1, 86, 87,
88, 89, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 100, 101, 102, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, 135, 136, 51,
52, -1, -1, 55, -1, 143, 144, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 70, 71,
72, 73, 74, 75, 76, 77, -1, -1, 80, 81,
-1, -1, -1, -1, 86, 87, 88, 89, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 100, 101,
102, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 124, 125, 126, 127, 128, 129, 130, 131,
132, 133, -1, 135, 136, 51, 52, -1, -1, 55,
-1, 143, 144, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 70, 71, 72, 73, 74, 75,
76, 77, -1, -1, 80, 81, -1, -1, -1, -1,
86, 87, 88, 89, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 100, 101, 102, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, -1, 135,
136, 51, 52, -1, -1, 55, -1, 143, 144, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
70, 71, 72, 73, 74, 75, 76, 77, -1, -1,
80, 81, -1, -1, -1, -1, 86, 87, 88, 89,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
100, 101, 102, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, -1, 135, 136, 51, 52, -1,
-1, 55, -1, 143, 144, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 70, 71, 72, 73,
74, 75, 76, 77, -1, -1, 80, 81, -1, -1,
-1, -1, 86, 87, 88, 89, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 100, 101, 102, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
-1, 135, 136, 51, 52, -1, -1, 55, -1, 143,
144, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 70, 71, 72, 73, 74, 75, 76, 77,
-1, -1, 80, 81, -1, -1, -1, -1, 86, 87,
88, 89, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 100, 101, 102, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 44, -1,
-1, -1, -1, -1, -1, -1, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, 135, 136, -1,
-1, -1, -1, -1, -1, 143, 72, 73, 74, 75,
76, 77, 78, 79, 80, 81, 82, 83, -1, -1,
-1, -1, 88, 89, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 101, -1, -1, -1, -1,
44, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 122, -1, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, 72, 73,
74, 75, 76, 77, 78, 79, 80, 81, 82, 83,
-1, -1, -1, -1, 88, 89, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 101, -1, -1,
-1, -1, 44, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 122, -1,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
72, 73, 74, 75, 76, 77, 78, 79, 80, 81,
82, 83, -1, -1, -1, -1, 88, 89, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 101,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
122, -1, 124, 125, 126, 127, 128, 129, 130, 131,
132, 133, 72, 73, 74, 75, 76, 77, 78, 79,
80, 81, 82, 83, -1, -1, -1, -1, 88, 89,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 101, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 122, -1, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, -1, -1, -1, -1, -1, -1,
-1, -1, 142, 72, 73, 74, 75, 76, 77, 78,
79, 80, 81, 82, 83, -1, -1, -1, -1, 88,
89, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 101, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 122, -1, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, -1,
-1, -1, -1, 142, 72, 73, 74, 75, 76, 77,
78, 79, 80, 81, 82, 83, -1, -1, -1, -1,
88, 89, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 101, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 122, -1, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, -1, -1, -1,
-1, -1, -1, -1, 142, 72, 73, 74, 75, 76,
77, 78, 79, 80, 81, 82, 83, -1, -1, -1,
-1, 88, 89, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 101, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, 122, -1, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, -1, -1, -1, -1, 142, 72, 73, 74, 75,
76, 77, 78, 79, 80, 81, 82, 83, -1, -1,
-1, -1, 88, 89, -1, -1, -1, 93, -1, -1,
-1, -1, -1, -1, -1, 101, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 122, -1, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, 72, 73,
74, 75, 76, 77, 78, 79, 80, 81, 82, 83,
-1, -1, -1, -1, 88, 89, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 101, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 122, -1,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
72, 73, 74, 75, 76, 77, 78, 79, 80, 81,
82, 83, -1, -1, -1, -1, 88, 89, 72, 73,
74, 75, 76, 77, -1, -1, 80, 81, -1, 101,
-1, -1, -1, -1, 88, 89, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 101, -1, -1,
-1, -1, 124, 125, 126, 127, 128, 129, 130, 131,
132, 133, -1, -1, -1, -1, -1, -1, -1, -1,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133
};
/* YYSTOS[STATE-NUM] -- The symbol kind of the accessing symbol of
state STATE-NUM. */
static const yytype_int16 yystos[] =
{
0, 150, 151, 1, 3, 4, 5, 6, 7, 8,
9, 10, 11, 12, 19, 21, 22, 23, 24, 30,
31, 32, 33, 34, 35, 36, 39, 45, 46, 47,
48, 49, 50, 51, 52, 53, 54, 55, 56, 58,
59, 60, 63, 66, 67, 69, 70, 71, 84, 85,
91, 94, 95, 97, 98, 100, 104, 106, 107, 108,
110, 111, 112, 114, 134, 135, 136, 152, 153, 154,
160, 161, 163, 166, 168, 170, 171, 174, 175, 177,
178, 179, 181, 182, 191, 205, 222, 243, 244, 275,
276, 277, 281, 282, 283, 289, 290, 291, 293, 294,
295, 296, 297, 298, 334, 347, 0, 154, 21, 22,
30, 31, 32, 39, 51, 55, 69, 88, 91, 94,
134, 166, 168, 183, 184, 205, 222, 295, 298, 334,
184, 3, 4, 5, 6, 7, 8, 9, 10, 11,
12, 13, 14, 15, 16, 17, 18, 19, 20, 21,
22, 23, 24, 25, 26, 30, 31, 32, 33, 34,
35, 36, 37, 38, 39, 45, 46, 47, 48, 49,
50, 51, 52, 55, 70, 71, 72, 73, 74, 75,
76, 77, 80, 81, 86, 87, 88, 89, 100, 101,
102, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, 135, 136, 143, 144, 185, 189, 190, 297, 329,
206, 91, 163, 166, 168, 169, 182, 222, 295, 296,
298, 169, 212, 214, 69, 91, 175, 182, 222, 227,
295, 298, 33, 34, 35, 36, 48, 49, 50, 51,
55, 106, 185, 186, 187, 291, 115, 118, 119, 146,
148, 169, 285, 286, 287, 340, 344, 345, 346, 51,
69, 100, 102, 103, 135, 174, 191, 197, 200, 203,
277, 332, 333, 197, 197, 144, 194, 195, 198, 199,
347, 194, 199, 144, 341, 186, 155, 138, 191, 222,
191, 191, 191, 55, 1, 94, 157, 158, 160, 176,
177, 347, 207, 209, 192, 203, 332, 347, 191, 331,
332, 347, 91, 142, 181, 222, 295, 298, 210, 53,
54, 56, 63, 69, 107, 185, 292, 63, 64, 65,
116, 117, 278, 279, 61, 278, 62, 278, 63, 278,
63, 278, 58, 59, 170, 191, 191, 340, 346, 40,
41, 42, 43, 44, 37, 38, 51, 53, 54, 55,
56, 69, 83, 94, 100, 101, 102, 103, 128, 131,
144, 301, 302, 303, 304, 305, 308, 309, 310, 311,
313, 314, 315, 316, 318, 319, 320, 323, 324, 325,
326, 327, 347, 301, 303, 28, 242, 121, 142, 94,
100, 178, 121, 25, 72, 73, 74, 75, 76, 77,
78, 79, 80, 81, 82, 83, 88, 89, 93, 101,
122, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, 90, 105, 140, 147, 338, 90, 338, 339, 26,
138, 246, 277, 92, 92, 194, 199, 246, 163, 51,
55, 183, 58, 59, 302, 125, 299, 90, 140, 338,
221, 330, 90, 147, 337, 156, 157, 55, 301, 301,
16, 223, 344, 121, 90, 140, 338, 92, 92, 223,
169, 169, 55, 90, 140, 338, 25, 107, 142, 288,
340, 115, 287, 20, 248, 344, 57, 57, 191, 191,
191, 93, 142, 201, 202, 347, 57, 201, 202, 85,
196, 197, 203, 332, 347, 197, 163, 340, 342, 163,
345, 159, 138, 157, 90, 338, 92, 160, 176, 145,
340, 346, 342, 157, 342, 141, 202, 343, 346, 202,
343, 139, 343, 55, 178, 179, 180, 142, 90, 140,
338, 144, 239, 313, 318, 63, 278, 280, 284, 285,
63, 279, 61, 62, 63, 63, 101, 101, 154, 169,
169, 169, 169, 160, 163, 163, 57, 121, 57, 344,
317, 85, 313, 318, 121, 156, 191, 142, 328, 347,
51, 142, 328, 344, 142, 312, 191, 142, 312, 51,
142, 312, 34, 51, 121, 156, 241, 100, 170, 191,
203, 204, 176, 142, 181, 142, 161, 162, 170, 182,
191, 193, 204, 222, 298, 165, 191, 191, 191, 191,
191, 191, 191, 191, 191, 191, 191, 191, 191, 191,
164, 191, 191, 191, 191, 191, 191, 191, 191, 191,
191, 191, 191, 51, 52, 55, 189, 194, 335, 336,
196, 203, 51, 52, 55, 189, 194, 335, 51, 55,
335, 247, 245, 162, 191, 193, 162, 193, 99, 173,
219, 300, 218, 51, 55, 183, 335, 196, 335, 156,
163, 167, 15, 13, 271, 347, 121, 121, 157, 16,
51, 55, 196, 51, 55, 157, 27, 224, 344, 224,
51, 55, 196, 51, 55, 216, 188, 157, 25, 248,
191, 203, 15, 191, 191, 191, 341, 100, 191, 200,
332, 191, 333, 342, 145, 340, 202, 202, 342, 145,
186, 152, 139, 193, 342, 160, 208, 332, 178, 180,
51, 55, 196, 51, 55, 313, 211, 142, 63, 157,
285, 191, 191, 51, 69, 100, 228, 318, 342, 342,
142, 174, 191, 15, 51, 69, 305, 310, 327, 85,
311, 316, 323, 325, 318, 320, 325, 51, 318, 174,
191, 15, 79, 126, 233, 235, 347, 191, 202, 342,
180, 142, 44, 121, 44, 90, 140, 338, 34, 35,
36, 51, 55, 91, 97, 98, 100, 102, 127, 254,
255, 257, 258, 259, 260, 263, 264, 265, 267, 268,
269, 270, 276, 290, 294, 254, 341, 92, 92, 194,
199, 141, 202, 92, 92, 195, 199, 195, 199, 233,
233, 172, 344, 169, 156, 141, 15, 342, 185, 191,
204, 272, 347, 18, 226, 347, 17, 225, 226, 92,
92, 141, 92, 92, 226, 213, 215, 141, 169, 186,
139, 254, 15, 202, 223, 191, 201, 85, 332, 139,
342, 343, 141, 236, 341, 29, 113, 240, 139, 142,
315, 342, 142, 85, 44, 44, 328, 344, 142, 312,
142, 312, 142, 312, 142, 312, 312, 44, 44, 230,
232, 234, 304, 306, 307, 310, 318, 319, 321, 322,
325, 327, 156, 100, 191, 180, 160, 191, 51, 55,
196, 51, 55, 57, 55, 51, 141, 257, 261, 262,
263, 51, 139, 266, 267, 269, 51, 34, 51, 51,
257, 263, 142, 93, 126, 142, 90, 142, 57, 123,
162, 193, 170, 193, 173, 92, 162, 193, 162, 193,
173, 246, 242, 156, 157, 233, 220, 344, 15, 93,
273, 347, 157, 14, 274, 347, 169, 15, 92, 15,
157, 157, 224, 40, 41, 223, 191, 157, 342, 202,
145, 146, 156, 157, 229, 142, 100, 342, 191, 191,
318, 325, 318, 318, 191, 191, 236, 236, 91, 222,
142, 328, 328, 142, 231, 222, 142, 231, 142, 231,
15, 191, 141, 257, 141, 142, 142, 139, 142, 142,
142, 51, 259, 256, 257, 55, 268, 269, 191, 191,
162, 193, 15, 139, 157, 156, 91, 182, 222, 295,
298, 223, 157, 223, 15, 15, 217, 169, 169, 157,
226, 248, 249, 51, 237, 238, 314, 15, 139, 318,
318, 142, 315, 312, 142, 312, 312, 312, 126, 126,
55, 90, 306, 310, 142, 230, 231, 322, 325, 318,
321, 325, 318, 257, 263, 262, 269, 256, 142, 139,
15, 55, 90, 140, 338, 157, 157, 157, 223, 223,
25, 226, 250, 142, 341, 142, 318, 142, 318, 51,
55, 328, 142, 231, 142, 231, 142, 231, 142, 231,
231, 142, 142, 257, 51, 55, 196, 51, 55, 271,
225, 15, 157, 157, 254, 15, 238, 318, 312, 318,
325, 318, 318, 262, 263, 141, 250, 250, 251, 252,
253, 231, 142, 231, 231, 231, 142, 15, 15, 223,
40, 41, 318, 157, 169, 169, 231, 250, 223, 223,
157, 157, 250, 250
};
/* YYR1[RULE-NUM] -- Symbol kind of the left-hand side of rule RULE-NUM. */
static const yytype_int16 yyr1[] =
{
0, 149, 150, 151, 152, 153, 153, 153, 153, 154,
155, 154, 156, 157, 158, 158, 158, 158, 159, 160,
160, 160, 160, 160, 160, 160, 160, 160, 160, 160,
160, 160, 160, 161, 161, 161, 161, 161, 161, 161,
161, 161, 161, 161, 161, 162, 162, 162, 163, 163,
163, 163, 163, 164, 163, 165, 163, 163, 166, 167,
168, 169, 170, 170, 171, 171, 172, 173, 174, 174,
174, 174, 174, 174, 174, 174, 174, 174, 174, 175,
175, 176, 176, 177, 177, 177, 177, 177, 177, 177,
177, 177, 177, 178, 178, 179, 179, 180, 180, 181,
181, 181, 181, 181, 181, 181, 181, 182, 182, 182,
182, 182, 182, 182, 182, 182, 183, 183, 184, 184,
184, 185, 185, 185, 185, 185, 186, 186, 187, 188,
187, 189, 189, 189, 189, 189, 189, 189, 189, 189,
189, 189, 189, 189, 189, 189, 189, 189, 189, 189,
189, 189, 189, 189, 189, 189, 189, 189, 189, 189,
189, 190, 190, 190, 190, 190, 190, 190, 190, 190,
190, 190, 190, 190, 190, 190, 190, 190, 190, 190,
190, 190, 190, 190, 190, 190, 190, 190, 190, 190,
190, 190, 190, 190, 190, 190, 190, 190, 190, 190,
190, 191, 191, 191, 191, 191, 191, 191, 191, 191,
191, 191, 191, 191, 191, 191, 191, 191, 191, 191,
191, 191, 191, 191, 191, 191, 191, 191, 191, 191,
191, 191, 191, 191, 191, 191, 191, 191, 191, 191,
191, 191, 191, 191, 191, 191, 191, 191, 191, 191,
191, 191, 192, 192, 192, 192, 193, 193, 194, 194,
194, 195, 195, 196, 196, 196, 196, 196, 197, 197,
197, 197, 197, 198, 199, 200, 200, 201, 201, 202,
203, 203, 203, 203, 203, 203, 204, 204, 204, 205,
205, 205, 205, 205, 205, 205, 205, 206, 205, 207,
208, 205, 209, 205, 205, 205, 205, 205, 205, 205,
205, 205, 205, 205, 205, 205, 210, 211, 205, 205,
205, 212, 213, 205, 214, 215, 205, 205, 205, 205,
205, 205, 216, 217, 205, 218, 205, 219, 220, 205,
221, 205, 205, 205, 205, 205, 205, 205, 222, 223,
223, 223, 224, 224, 225, 225, 226, 226, 227, 227,
228, 228, 228, 228, 228, 228, 228, 228, 229, 228,
230, 230, 230, 230, 231, 231, 232, 232, 232, 232,
232, 232, 232, 232, 232, 232, 232, 232, 232, 232,
232, 233, 233, 234, 235, 235, 235, 236, 236, 237,
237, 238, 238, 239, 239, 240, 240, 241, 242, 243,
243, 243, 243, 244, 244, 244, 244, 244, 244, 244,
244, 244, 245, 246, 247, 246, 248, 249, 249, 250,
251, 250, 252, 250, 253, 250, 254, 254, 254, 254,
254, 254, 254, 254, 254, 255, 255, 256, 256, 257,
257, 258, 258, 259, 259, 259, 259, 259, 259, 259,
259, 259, 259, 259, 260, 260, 261, 261, 261, 261,
261, 261, 262, 262, 263, 263, 264, 264, 264, 265,
265, 266, 266, 266, 267, 267, 268, 268, 269, 269,
269, 270, 271, 271, 272, 272, 272, 273, 273, 274,
274, 275, 275, 275, 275, 276, 276, 277, 277, 277,
277, 278, 278, 279, 280, 279, 279, 279, 281, 281,
282, 282, 283, 284, 284, 285, 285, 286, 286, 287,
288, 287, 289, 289, 290, 290, 290, 291, 292, 292,
292, 292, 292, 292, 293, 293, 294, 294, 294, 294,
295, 295, 295, 295, 295, 296, 296, 297, 297, 297,
297, 297, 297, 297, 297, 297, 298, 298, 299, 300,
299, 301, 301, 302, 302, 302, 303, 303, 303, 303,
304, 304, 305, 305, 306, 306, 307, 307, 308, 308,
309, 309, 310, 310, 311, 311, 311, 311, 312, 312,
312, 313, 313, 313, 313, 313, 313, 313, 313, 313,
313, 313, 313, 313, 313, 313, 314, 314, 314, 314,
314, 315, 315, 316, 317, 316, 318, 318, 319, 320,
321, 322, 322, 323, 323, 324, 324, 325, 325, 326,
326, 327, 327, 327, 328, 328, 328, 329, 330, 329,
331, 331, 332, 332, 333, 333, 333, 333, 333, 333,
333, 333, 334, 334, 334, 335, 335, 335, 335, 336,
336, 336, 337, 337, 338, 338, 339, 339, 340, 340,
341, 341, 342, 343, 343, 343, 344, 344, 345, 345,
346, 346, 347
};
/* YYR2[RULE-NUM] -- Number of symbols on the right-hand side of rule RULE-NUM. */
static const yytype_int8 yyr2[] =
{
0, 2, 0, 2, 2, 1, 1, 3, 2, 1,
0, 5, 4, 2, 1, 1, 3, 2, 0, 4,
2, 3, 3, 3, 3, 3, 4, 1, 3, 3,
3, 3, 1, 3, 3, 6, 5, 5, 5, 5,
4, 6, 4, 6, 3, 1, 3, 1, 1, 3,
3, 3, 2, 0, 4, 0, 4, 1, 2, 0,
5, 1, 1, 1, 1, 4, 0, 5, 2, 3,
4, 5, 4, 5, 2, 2, 2, 2, 2, 1,
3, 1, 3, 1, 2, 3, 5, 2, 4, 2,
4, 1, 3, 1, 3, 2, 3, 1, 2, 1,
4, 3, 3, 3, 3, 2, 1, 1, 4, 3,
3, 3, 3, 2, 1, 1, 1, 1, 2, 1,
3, 1, 1, 1, 1, 1, 1, 1, 1, 0,
4, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 3, 3, 6, 5, 5, 5, 5, 4, 3,
3, 2, 2, 3, 2, 2, 3, 3, 3, 3,
3, 3, 4, 4, 2, 2, 3, 3, 3, 3,
3, 3, 3, 3, 3, 3, 3, 3, 3, 2,
2, 3, 3, 3, 3, 6, 6, 4, 6, 4,
6, 1, 1, 2, 4, 2, 1, 3, 3, 5,
3, 1, 1, 1, 2, 2, 4, 2, 1, 2,
2, 4, 1, 0, 2, 2, 1, 2, 1, 2,
1, 1, 2, 3, 3, 4, 3, 4, 2, 1,
1, 1, 1, 1, 1, 1, 1, 0, 4, 0,
0, 5, 0, 3, 3, 3, 2, 3, 3, 1,
2, 4, 3, 2, 1, 2, 0, 0, 5, 6,
6, 0, 0, 7, 0, 0, 7, 5, 4, 9,
11, 11, 0, 0, 9, 0, 6, 0, 0, 8,
0, 5, 4, 4, 1, 1, 1, 1, 1, 1,
1, 2, 1, 1, 1, 5, 1, 2, 1, 1,
1, 4, 6, 3, 5, 2, 4, 1, 0, 4,
4, 2, 2, 1, 2, 0, 6, 8, 4, 6,
4, 3, 6, 2, 4, 6, 2, 4, 2, 4,
1, 1, 1, 0, 4, 1, 4, 1, 4, 1,
3, 1, 1, 4, 1, 3, 3, 0, 5, 2,
4, 5, 5, 2, 4, 4, 3, 3, 3, 2,
1, 4, 0, 5, 0, 5, 5, 1, 1, 1,
0, 6, 0, 8, 0, 8, 1, 2, 2, 4,
1, 3, 1, 3, 1, 2, 3, 1, 3, 1,
3, 1, 3, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 2, 3, 2, 1, 3, 5, 1,
3, 5, 1, 3, 2, 1, 1, 3, 2, 3,
2, 1, 3, 1, 1, 3, 3, 2, 2, 2,
1, 1, 6, 1, 1, 1, 1, 2, 1, 2,
1, 1, 1, 1, 1, 1, 2, 1, 1, 2,
3, 1, 2, 1, 0, 4, 1, 2, 2, 3,
2, 3, 1, 1, 2, 1, 2, 1, 2, 1,
0, 4, 2, 3, 1, 4, 2, 2, 1, 1,
1, 1, 1, 2, 2, 3, 1, 1, 2, 2,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
4, 1, 1, 3, 5, 3, 1, 2, 4, 2,
2, 2, 2, 1, 2, 1, 1, 3, 1, 3,
1, 1, 2, 1, 4, 2, 2, 1, 2, 1,
0, 6, 8, 4, 6, 4, 6, 2, 4, 6,
2, 4, 2, 4, 1, 0, 1, 1, 1, 1,
1, 1, 1, 1, 0, 4, 1, 3, 2, 2,
2, 1, 3, 1, 3, 1, 1, 2, 1, 1,
1, 2, 2, 1, 2, 1, 1, 1, 0, 4,
1, 2, 1, 3, 3, 3, 2, 2, 3, 3,
2, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 0, 1,
0, 2, 2, 0, 1, 1, 1, 1, 1, 1,
1, 2, 0
};
enum { YYENOMEM = -2 };
#define yyerrok (yyerrstatus = 0)
#define yyclearin (yychar = YYEMPTY)
#define YYACCEPT goto yyacceptlab
#define YYABORT goto yyabortlab
#define YYERROR goto yyerrorlab
#define YYNOMEM goto yyexhaustedlab
#define YYRECOVERING() (!!yyerrstatus)
#define YYBACKUP(Token, Value) \
do \
if (yychar == YYEMPTY) \
{ \
yychar = (Token); \
yylval = (Value); \
YYPOPSTACK (yylen); \
yystate = *yyssp; \
goto yybackup; \
} \
else \
{ \
yyerror (&yylloc, p, YY_("syntax error: cannot back up")); \
YYERROR; \
} \
while (0)
/* Backward compatibility with an undocumented macro.
Use YYerror or YYUNDEF. */
#define YYERRCODE YYUNDEF
/* YYLLOC_DEFAULT -- Set CURRENT to span from RHS[1] to RHS[N].
If N is 0, then set CURRENT to the empty location which ends
the previous symbol: RHS[0] (always defined). */
#ifndef YYLLOC_DEFAULT
# define YYLLOC_DEFAULT(Current, Rhs, N) \
do \
if (N) \
{ \
(Current).first_line = YYRHSLOC (Rhs, 1).first_line; \
(Current).first_column = YYRHSLOC (Rhs, 1).first_column; \
(Current).last_line = YYRHSLOC (Rhs, N).last_line; \
(Current).last_column = YYRHSLOC (Rhs, N).last_column; \
} \
else \
{ \
(Current).first_line = (Current).last_line = \
YYRHSLOC (Rhs, 0).last_line; \
(Current).first_column = (Current).last_column = \
YYRHSLOC (Rhs, 0).last_column; \
} \
while (0)
#endif
#define YYRHSLOC(Rhs, K) ((Rhs)[K])
/* Enable debugging if requested. */
#if YYDEBUG
# ifndef YYFPRINTF
# include <stdio.h> /* INFRINGES ON USER NAME SPACE */
# define YYFPRINTF fprintf
# endif
# define YYDPRINTF(Args) \
do { \
if (yydebug) \
YYFPRINTF Args; \
} while (0)
/* YYLOCATION_PRINT -- Print the location on the stream.
This macro was not mandated originally: define only if we know
we won't break user code: when these are the locations we know. */
# ifndef YYLOCATION_PRINT
# if defined YY_LOCATION_PRINT
/* Temporary convenience wrapper in case some people defined the
undocumented and private YY_LOCATION_PRINT macros. */
# define YYLOCATION_PRINT(File, Loc, p) YY_LOCATION_PRINT(File, *(Loc), p)
# elif defined YYLTYPE_IS_TRIVIAL && YYLTYPE_IS_TRIVIAL
/* Print *YYLOCP on YYO. Private, do not rely on its existence. */
YY_ATTRIBUTE_UNUSED
static int
yy_location_print_ (FILE *yyo, YYLTYPE const * const yylocp)
{
int res = 0;
int end_col = 0 != yylocp->last_column ? yylocp->last_column - 1 : 0;
if (0 <= yylocp->first_line)
{
res += YYFPRINTF (yyo, "%d", yylocp->first_line);
if (0 <= yylocp->first_column)
res += YYFPRINTF (yyo, ".%d", yylocp->first_column);
}
if (0 <= yylocp->last_line)
{
if (yylocp->first_line < yylocp->last_line)
{
res += YYFPRINTF (yyo, "-%d", yylocp->last_line);
if (0 <= end_col)
res += YYFPRINTF (yyo, ".%d", end_col);
}
else if (0 <= end_col && yylocp->first_column < end_col)
res += YYFPRINTF (yyo, "-%d", end_col);
}
return res;
}
# define YYLOCATION_PRINT yy_location_print_
/* Temporary convenience wrapper in case some people defined the
undocumented and private YY_LOCATION_PRINT macros. */
# define YY_LOCATION_PRINT(File, Loc, p) YYLOCATION_PRINT(File, &(Loc), p)
# else
# define YYLOCATION_PRINT(File, Loc, p) ((void) 0)
/* Temporary convenience wrapper in case some people defined the
undocumented and private YY_LOCATION_PRINT macros. */
# define YY_LOCATION_PRINT YYLOCATION_PRINT
# endif
# endif /* !defined YYLOCATION_PRINT */
# define YY_SYMBOL_PRINT(Title, Kind, Value, Location, p) \
do { \
if (yydebug) \
{ \
YYFPRINTF (stderr, "%s ", Title); \
yy_symbol_print (stderr, \
Kind, Value, Location, p); \
YYFPRINTF (stderr, "\n"); \
} \
} while (0)
/*-----------------------------------.
| Print this symbol's value on YYO. |
`-----------------------------------*/
static void
yy_symbol_value_print (FILE *yyo,
yysymbol_kind_t yykind, YYSTYPE const * const yyvaluep, YYLTYPE const * const yylocationp, parser_state *p)
{
FILE *yyoutput = yyo;
YY_USE (yyoutput);
YY_USE (yylocationp);
YY_USE (p);
if (!yyvaluep)
return;
YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
switch (yykind)
{
default:
break;
}
YY_IGNORE_MAYBE_UNINITIALIZED_END
}
/*---------------------------.
| Print this symbol on YYO. |
`---------------------------*/
static void
yy_symbol_print (FILE *yyo,
yysymbol_kind_t yykind, YYSTYPE const * const yyvaluep, YYLTYPE const * const yylocationp, parser_state *p)
{
YYFPRINTF (yyo, "%s %s (",
yykind < YYNTOKENS ? "token" : "nterm", yysymbol_name (yykind));
YYLOCATION_PRINT (yyo, yylocationp, p);
YYFPRINTF (yyo, ": ");
yy_symbol_value_print (yyo, yykind, yyvaluep, yylocationp, p);
YYFPRINTF (yyo, ")");
}
/*------------------------------------------------------------------.
| yy_stack_print -- Print the state stack from its BOTTOM up to its |
| TOP (included). |
`------------------------------------------------------------------*/
static void
yy_stack_print (yy_state_t *yybottom, yy_state_t *yytop, parser_state *p)
{
YYFPRINTF (stderr, "Stack now");
for (; yybottom <= yytop; yybottom++)
{
int yybot = *yybottom;
YYFPRINTF (stderr, " %d", yybot);
}
YYFPRINTF (stderr, "\n");
}
# define YY_STACK_PRINT(Bottom, Top, p) \
do { \
if (yydebug) \
yy_stack_print ((Bottom), (Top), p); \
} while (0)
/*------------------------------------------------.
| Report that the YYRULE is going to be reduced. |
`------------------------------------------------*/
static void
yy_reduce_print (yy_state_t *yyssp, YYSTYPE *yyvsp, YYLTYPE *yylsp,
int yyrule, parser_state *p)
{
int yylno = yyrline[yyrule];
int yynrhs = yyr2[yyrule];
int yyi;
YYFPRINTF (stderr, "Reducing stack by rule %d (line %d):\n",
yyrule - 1, yylno);
/* The symbols being reduced. */
for (yyi = 0; yyi < yynrhs; yyi++)
{
YYFPRINTF (stderr, " $%d = ", yyi + 1);
yy_symbol_print (stderr,
YY_ACCESSING_SYMBOL (+yyssp[yyi + 1 - yynrhs]),
&yyvsp[(yyi + 1) - (yynrhs)],
&(yylsp[(yyi + 1) - (yynrhs)]), p);
YYFPRINTF (stderr, "\n");
}
}
# define YY_REDUCE_PRINT(Rule, p) \
do { \
if (yydebug) \
yy_reduce_print (yyssp, yyvsp, yylsp, Rule, p); \
} while (0)
/* Nonzero means print parse trace. It is left uninitialized so that
multiple parsers can coexist. */
#ifndef yydebug
int yydebug;
#endif
#else /* !YYDEBUG */
# define YYDPRINTF(Args) ((void) 0)
# define YY_SYMBOL_PRINT(Title, Kind, Value, Location, p)
# define YY_STACK_PRINT(Bottom, Top, p)
# define YY_REDUCE_PRINT(Rule, p)
#endif /* !YYDEBUG */
/* YYINITDEPTH -- initial size of the parser's stacks. */
#ifndef YYINITDEPTH
# define YYINITDEPTH 200
#endif
/* YYMAXDEPTH -- maximum size the stacks can grow to (effective only
if the built-in stack extension method is used).
Do not make this value too large; the results are undefined if
YYSTACK_ALLOC_MAXIMUM < YYSTACK_BYTES (YYMAXDEPTH)
evaluated with infinite-precision integer arithmetic. */
#ifndef YYMAXDEPTH
# define YYMAXDEPTH 10000
#endif
/* Context of a parse error. */
typedef struct
{
yy_state_t *yyssp;
yysymbol_kind_t yytoken;
YYLTYPE *yylloc;
} yypcontext_t;
/* Put in YYARG at most YYARGN of the expected tokens given the
current YYCTX, and return the number of tokens stored in YYARG. If
YYARG is null, return the number of expected tokens (guaranteed to
be less than YYNTOKENS). Return YYENOMEM on memory exhaustion.
Return 0 if there are more than YYARGN expected tokens, yet fill
YYARG up to YYARGN. */
static int
yypcontext_expected_tokens (const yypcontext_t *yyctx,
yysymbol_kind_t yyarg[], int yyargn)
{
/* Actual size of YYARG. */
int yycount = 0;
int yyn = yypact[+*yyctx->yyssp];
if (!yypact_value_is_default (yyn))
{
/* Start YYX at -YYN if negative to avoid negative indexes in
YYCHECK. In other words, skip the first -YYN actions for
this state because they are default actions. */
int yyxbegin = yyn < 0 ? -yyn : 0;
/* Stay within bounds of both yycheck and yytname. */
int yychecklim = YYLAST - yyn + 1;
int yyxend = yychecklim < YYNTOKENS ? yychecklim : YYNTOKENS;
int yyx;
for (yyx = yyxbegin; yyx < yyxend; ++yyx)
if (yycheck[yyx + yyn] == yyx && yyx != YYSYMBOL_YYerror
&& !yytable_value_is_error (yytable[yyx + yyn]))
{
if (!yyarg)
++yycount;
else if (yycount == yyargn)
return 0;
else
yyarg[yycount++] = YY_CAST (yysymbol_kind_t, yyx);
}
}
if (yyarg && yycount == 0 && 0 < yyargn)
yyarg[0] = YYSYMBOL_YYEMPTY;
return yycount;
}
#ifndef yystrlen
# if defined __GLIBC__ && defined _STRING_H
# define yystrlen(S) (YY_CAST (YYPTRDIFF_T, strlen (S)))
# else
/* Return the length of YYSTR. */
static YYPTRDIFF_T
yystrlen (const char *yystr)
{
YYPTRDIFF_T yylen;
for (yylen = 0; yystr[yylen]; yylen++)
continue;
return yylen;
}
# endif
#endif
#ifndef yystpcpy
# if defined __GLIBC__ && defined _STRING_H && defined _GNU_SOURCE
# define yystpcpy stpcpy
# else
/* Copy YYSRC to YYDEST, returning the address of the terminating '\0' in
YYDEST. */
static char *
yystpcpy (char *yydest, const char *yysrc)
{
char *yyd = yydest;
const char *yys = yysrc;
while ((*yyd++ = *yys++) != '\0')
continue;
return yyd - 1;
}
# endif
#endif
#ifndef yytnamerr
/* Copy to YYRES the contents of YYSTR after stripping away unnecessary
quotes and backslashes, so that it's suitable for yyerror. The
heuristic is that double-quoting is unnecessary unless the string
contains an apostrophe, a comma, or backslash (other than
backslash-backslash). YYSTR is taken from yytname. If YYRES is
null, do not copy; instead, return the length of what the result
would have been. */
static YYPTRDIFF_T
yytnamerr (char *yyres, const char *yystr)
{
if (*yystr == '"')
{
YYPTRDIFF_T yyn = 0;
char const *yyp = yystr;
for (;;)
switch (*++yyp)
{
case '\'':
case ',':
goto do_not_strip_quotes;
case '\\':
if (*++yyp != '\\')
goto do_not_strip_quotes;
else
goto append;
append:
default:
if (yyres)
yyres[yyn] = *yyp;
yyn++;
break;
case '"':
if (yyres)
yyres[yyn] = '\0';
return yyn;
}
do_not_strip_quotes: ;
}
if (yyres)
return yystpcpy (yyres, yystr) - yyres;
else
return yystrlen (yystr);
}
#endif
static int
yy_syntax_error_arguments (const yypcontext_t *yyctx,
yysymbol_kind_t yyarg[], int yyargn)
{
/* Actual size of YYARG. */
int yycount = 0;
/* There are many possibilities here to consider:
- If this state is a consistent state with a default action, then
the only way this function was invoked is if the default action
is an error action. In that case, don't check for expected
tokens because there are none.
- The only way there can be no lookahead present (in yychar) is if
this state is a consistent state with a default action. Thus,
detecting the absence of a lookahead is sufficient to determine
that there is no unexpected or expected token to report. In that
case, just report a simple "syntax error".
- Don't assume there isn't a lookahead just because this state is a
consistent state with a default action. There might have been a
previous inconsistent state, consistent state with a non-default
action, or user semantic action that manipulated yychar.
- Of course, the expected token list depends on states to have
correct lookahead information, and it depends on the parser not
to perform extra reductions after fetching a lookahead from the
scanner and before detecting a syntax error. Thus, state merging
(from LALR or IELR) and default reductions corrupt the expected
token list. However, the list is correct for canonical LR with
one exception: it will still contain any token that will not be
accepted due to an error action in a later state.
*/
if (yyctx->yytoken != YYSYMBOL_YYEMPTY)
{
int yyn;
if (yyarg)
yyarg[yycount] = yyctx->yytoken;
++yycount;
yyn = yypcontext_expected_tokens (yyctx,
yyarg ? yyarg + 1 : yyarg, yyargn - 1);
if (yyn == YYENOMEM)
return YYENOMEM;
else
yycount += yyn;
}
return yycount;
}
/* Copy into *YYMSG, which is of size *YYMSG_ALLOC, an error message
about the unexpected token YYTOKEN for the state stack whose top is
YYSSP.
Return 0 if *YYMSG was successfully written. Return -1 if *YYMSG is
not large enough to hold the message. In that case, also set
*YYMSG_ALLOC to the required number of bytes. Return YYENOMEM if the
required number of bytes is too large to store. */
static int
yysyntax_error (YYPTRDIFF_T *yymsg_alloc, char **yymsg,
const yypcontext_t *yyctx, parser_state *p)
{
enum { YYARGS_MAX = 5 };
/* Internationalized format string. */
const char *yyformat = YY_NULLPTR;
/* Arguments of yyformat: reported tokens (one for the "unexpected",
one per "expected"). */
yysymbol_kind_t yyarg[YYARGS_MAX];
/* Cumulated lengths of YYARG. */
YYPTRDIFF_T yysize = 0;
/* Actual size of YYARG. */
int yycount = yy_syntax_error_arguments (yyctx, yyarg, YYARGS_MAX);
if (yycount == YYENOMEM)
return YYENOMEM;
switch (yycount)
{
#define YYCASE_(N, S) \
case N: \
yyformat = S; \
break
default: /* Avoid compiler warnings. */
YYCASE_(0, YY_("syntax error"));
YYCASE_(1, YY_("syntax error, unexpected %s"));
YYCASE_(2, YY_("syntax error, unexpected %s, expecting %s"));
YYCASE_(3, YY_("syntax error, unexpected %s, expecting %s or %s"));
YYCASE_(4, YY_("syntax error, unexpected %s, expecting %s or %s or %s"));
YYCASE_(5, YY_("syntax error, unexpected %s, expecting %s or %s or %s or %s"));
#undef YYCASE_
}
/* Compute error message size. Don't count the "%s"s, but reserve
room for the terminator. */
yysize = yystrlen (yyformat) - 2 * yycount + 1;
{
int yyi;
for (yyi = 0; yyi < yycount; ++yyi)
{
YYPTRDIFF_T yysize1
= yysize + yytnamerr (YY_NULLPTR, yytname[yyarg[yyi]]);
if (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)
yysize = yysize1;
else
return YYENOMEM;
}
}
if (*yymsg_alloc < yysize)
{
*yymsg_alloc = 2 * yysize;
if (! (yysize <= *yymsg_alloc
&& *yymsg_alloc <= YYSTACK_ALLOC_MAXIMUM))
*yymsg_alloc = YYSTACK_ALLOC_MAXIMUM;
return -1;
}
/* Avoid sprintf, as that infringes on the user's name space.
Don't have undefined behavior even if the translation
produced a string with the wrong number of "%s"s. */
{
char *yyp = *yymsg;
int yyi = 0;
while ((*yyp = *yyformat) != '\0')
if (*yyp == '%' && yyformat[1] == 's' && yyi < yycount)
{
yyp += yytnamerr (yyp, yytname[yyarg[yyi++]]);
yyformat += 2;
}
else
{
++yyp;
++yyformat;
}
}
return 0;
}
/*-----------------------------------------------.
| Release the memory associated to this symbol. |
`-----------------------------------------------*/
static void
yydestruct (const char *yymsg,
yysymbol_kind_t yykind, YYSTYPE *yyvaluep, YYLTYPE *yylocationp, parser_state *p)
{
YY_USE (yyvaluep);
YY_USE (yylocationp);
YY_USE (p);
if (!yymsg)
yymsg = "Deleting";
YY_SYMBOL_PRINT (yymsg, yykind, yyvaluep, yylocationp, p);
YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
switch (yykind)
{
default:
break;
}
YY_IGNORE_MAYBE_UNINITIALIZED_END
}
/*----------.
| yyparse. |
`----------*/
int
yyparse (parser_state *p)
{
/* Lookahead token kind. */
int yychar;
/* The semantic value of the lookahead symbol. */
/* Default value used for initialization, for pacifying older GCCs
or non-GCC compilers. */
#ifdef __cplusplus
static const YYSTYPE yyval_default = {};
(void) yyval_default;
#else
YY_INITIAL_VALUE (static const YYSTYPE yyval_default;)
#endif
YYSTYPE yylval YY_INITIAL_VALUE (= yyval_default);
/* Location data for the lookahead symbol. */
static const YYLTYPE yyloc_default
# if defined YYLTYPE_IS_TRIVIAL && YYLTYPE_IS_TRIVIAL
= { 1, 1, 1, 1 }
# endif
;
YYLTYPE yylloc = yyloc_default;
/* Number of syntax errors so far. */
int yynerrs = 0;
YY_USE (yynerrs); /* Silence compiler warning. */
yy_state_fast_t yystate = 0;
/* Number of tokens to shift before error messages enabled. */
int yyerrstatus = 0;
/* Refer to the stacks through separate pointers, to allow yyoverflow
to reallocate them elsewhere. */
/* Their size. */
YYPTRDIFF_T yystacksize = YYINITDEPTH;
/* The state stack: array, bottom, top. */
yy_state_t yyssa[YYINITDEPTH];
yy_state_t *yyss = yyssa;
yy_state_t *yyssp = yyss;
/* The semantic value stack: array, bottom, top. */
YYSTYPE yyvsa[YYINITDEPTH];
YYSTYPE *yyvs = yyvsa;
YYSTYPE *yyvsp = yyvs;
/* The location stack: array, bottom, top. */
YYLTYPE yylsa[YYINITDEPTH];
YYLTYPE *yyls = yylsa;
YYLTYPE *yylsp = yyls;
int yyn;
/* The return value of yyparse. */
int yyresult;
/* Lookahead symbol kind. */
yysymbol_kind_t yytoken = YYSYMBOL_YYEMPTY;
/* The variables used to return semantic value and location from the
action routines. */
YYSTYPE yyval;
YYLTYPE yyloc;
/* The locations where the error started and ended. */
YYLTYPE yyerror_range[3];
/* Buffer for error messages, and its allocated size. */
char yymsgbuf[128];
char *yymsg = yymsgbuf;
YYPTRDIFF_T yymsg_alloc = sizeof yymsgbuf;
#define YYPOPSTACK(N) (yyvsp -= (N), yyssp -= (N), yylsp -= (N))
/* The number of symbols on the RHS of the reduced rule.
Keep to zero when no symbol should be popped. */
int yylen = 0;
YYDPRINTF ((stderr, "Starting parse\n"));
yychar = YYEMPTY; /* Cause a token to be read. */
#line 7216 "mrbgems/mruby-compiler/core/y.tab.c"
yylsp[0] = yylloc;
goto yysetstate;
/*------------------------------------------------------------.
| yynewstate -- push a new state, which is found in yystate. |
`------------------------------------------------------------*/
yynewstate:
/* In all cases, when you get here, the value and location stacks
have just been pushed. So pushing a state here evens the stacks. */
yyssp++;
/*--------------------------------------------------------------------.
| yysetstate -- set current state (the top of the stack) to yystate. |
`--------------------------------------------------------------------*/
yysetstate:
YYDPRINTF ((stderr, "Entering state %d\n", yystate));
YY_ASSERT (0 <= yystate && yystate < YYNSTATES);
YY_IGNORE_USELESS_CAST_BEGIN
*yyssp = YY_CAST (yy_state_t, yystate);
YY_IGNORE_USELESS_CAST_END
YY_STACK_PRINT (yyss, yyssp, p);
if (yyss + yystacksize - 1 <= yyssp)
#if !defined yyoverflow && !defined YYSTACK_RELOCATE
YYNOMEM;
#else
{
/* Get the current used size of the three stacks, in elements. */
YYPTRDIFF_T yysize = yyssp - yyss + 1;
# if defined yyoverflow
{
/* Give user a chance to reallocate the stack. Use copies of
these so that the &'s don't force the real ones into
memory. */
yy_state_t *yyss1 = yyss;
YYSTYPE *yyvs1 = yyvs;
YYLTYPE *yyls1 = yyls;
/* Each stack pointer address is followed by the size of the
data in use in that stack, in bytes. This used to be a
conditional around just the two extra args, but that might
be undefined if yyoverflow is a macro. */
yyoverflow (YY_("memory exhausted"),
&yyss1, yysize * YYSIZEOF (*yyssp),
&yyvs1, yysize * YYSIZEOF (*yyvsp),
&yyls1, yysize * YYSIZEOF (*yylsp),
&yystacksize);
yyss = yyss1;
yyvs = yyvs1;
yyls = yyls1;
}
# else /* defined YYSTACK_RELOCATE */
/* Extend the stack our own way. */
if (YYMAXDEPTH <= yystacksize)
YYNOMEM;
yystacksize *= 2;
if (YYMAXDEPTH < yystacksize)
yystacksize = YYMAXDEPTH;
{
yy_state_t *yyss1 = yyss;
union yyalloc *yyptr =
YY_CAST (union yyalloc *,
YYSTACK_ALLOC (YY_CAST (YYSIZE_T, YYSTACK_BYTES (yystacksize))));
if (! yyptr)
YYNOMEM;
YYSTACK_RELOCATE (yyss_alloc, yyss);
YYSTACK_RELOCATE (yyvs_alloc, yyvs);
YYSTACK_RELOCATE (yyls_alloc, yyls);
# undef YYSTACK_RELOCATE
if (yyss1 != yyssa)
YYSTACK_FREE (yyss1);
}
# endif
yyssp = yyss + yysize - 1;
yyvsp = yyvs + yysize - 1;
yylsp = yyls + yysize - 1;
YY_IGNORE_USELESS_CAST_BEGIN
YYDPRINTF ((stderr, "Stack size increased to %ld\n",
YY_CAST (long, yystacksize)));
YY_IGNORE_USELESS_CAST_END
if (yyss + yystacksize - 1 <= yyssp)
YYABORT;
}
#endif /* !defined yyoverflow && !defined YYSTACK_RELOCATE */
if (yystate == YYFINAL)
YYACCEPT;
goto yybackup;
/*-----------.
| yybackup. |
`-----------*/
yybackup:
/* Do appropriate processing given the current state. Read a
lookahead token if we need one and don't already have one. */
/* First try to decide what to do without reference to lookahead token. */
yyn = yypact[yystate];
if (yypact_value_is_default (yyn))
goto yydefault;
/* Not known => get a lookahead token if don't already have one. */
/* YYCHAR is either empty, or end-of-input, or a valid lookahead. */
if (yychar == YYEMPTY)
{
YYDPRINTF ((stderr, "Reading a token\n"));
yychar = yylex (&yylval, &yylloc, p);
}
if (yychar <= YYEOF)
{
yychar = YYEOF;
yytoken = YYSYMBOL_YYEOF;
YYDPRINTF ((stderr, "Now at end of input.\n"));
}
else if (yychar == YYerror)
{
/* The scanner already issued an error message, process directly
to error recovery. But do not keep the error token as
lookahead, it is too special and may lead us to an endless
loop in error recovery. */
yychar = YYUNDEF;
yytoken = YYSYMBOL_YYerror;
yyerror_range[1] = yylloc;
goto yyerrlab1;
}
else
{
yytoken = YYTRANSLATE (yychar);
YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc, p);
}
/* If the proper action on seeing token YYTOKEN is to reduce or to
detect an error, take that action. */
yyn += yytoken;
if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yytoken)
goto yydefault;
yyn = yytable[yyn];
if (yyn <= 0)
{
if (yytable_value_is_error (yyn))
goto yyerrlab;
yyn = -yyn;
goto yyreduce;
}
/* Count tokens shifted since error; after three, turn off error
status. */
if (yyerrstatus)
yyerrstatus--;
/* Shift the lookahead token. */
YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc, p);
yystate = yyn;
YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
*++yyvsp = yylval;
YY_IGNORE_MAYBE_UNINITIALIZED_END
*++yylsp = yylloc;
/* Discard the shifted token. */
yychar = YYEMPTY;
goto yynewstate;
/*-----------------------------------------------------------.
| yydefault -- do the default action for the current state. |
`-----------------------------------------------------------*/
yydefault:
yyn = yydefact[yystate];
if (yyn == 0)
goto yyerrlab;
goto yyreduce;
/*-----------------------------.
| yyreduce -- do a reduction. |
`-----------------------------*/
yyreduce:
/* yyn is the number of a rule to reduce with. */
yylen = yyr2[yyn];
/* If YYLEN is nonzero, implement the default value of the action:
'$$ = $1'.
Otherwise, the following line sets YYVAL to garbage.
This behavior is undocumented and Bison
users should not rely upon it. Assigning to YYVAL
unconditionally makes the parser a bit smaller, and it avoids a
GCC warning that YYVAL may be used uninitialized. */
yyval = yyvsp[1-yylen];
/* Default location. */
YYLLOC_DEFAULT (yyloc, (yylsp - yylen), yylen);
yyerror_range[1] = yyloc;
YY_REDUCE_PRINT (yyn, p);
switch (yyn)
{
case 2: /* $@1: %empty */
#line 2182 "mrbgems/mruby-compiler/core/parse.y"
{
p->lstate = EXPR_BEG;
if (!p->locals) p->locals = cons(0,0);
}
#line 7434 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 3: /* program: $@1 top_compstmt */
#line 2187 "mrbgems/mruby-compiler/core/parse.y"
{
p->tree = new_scope(p, (yyvsp[0].nd));
}
#line 7442 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 4: /* top_compstmt: top_stmts opt_terms */
#line 2193 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
}
#line 7450 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 5: /* top_stmts: none */
#line 2199 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_stmts(p, 0);
}
#line 7458 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 6: /* top_stmts: top_stmt */
#line 2203 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_stmts(p, (yyvsp[0].nd));
}
#line 7466 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 7: /* top_stmts: top_stmts terms top_stmt */
#line 2207 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = stmts_push(p, (yyvsp[-2].nd), newline_node((yyvsp[0].nd)));
}
#line 7474 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 8: /* top_stmts: error top_stmt */
#line 2211 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_stmts(p, 0);
}
#line 7482 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 10: /* @2: %empty */
#line 2218 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = local_switch(p);
nvars_block(p);
}
#line 7491 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 11: /* top_stmt: "'BEGIN'" @2 '{' top_compstmt '}' */
#line 2223 "mrbgems/mruby-compiler/core/parse.y"
{
yyerror(&(yylsp[-4]), p, "BEGIN not supported");
local_resume(p, (yyvsp[-3].nd));
nvars_unnest(p);
(yyval.nd) = 0;
}
#line 7502 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 12: /* bodystmt: compstmt opt_rescue opt_else opt_ensure */
#line 2235 "mrbgems/mruby-compiler/core/parse.y"
{
if ((yyvsp[-2].nd)) {
(yyval.nd) = new_rescue(p, (yyvsp[-3].nd), (yyvsp[-2].nd), (yyvsp[-1].nd));
}
else if ((yyvsp[-1].nd)) {
yywarning(p, "else without rescue is useless");
(yyval.nd) = stmts_push(p, (yyvsp[-3].nd), (yyvsp[-1].nd));
}
else {
(yyval.nd) = (yyvsp[-3].nd);
}
if ((yyvsp[0].nd)) {
if ((yyval.nd)) {
(yyval.nd) = new_ensure(p, (yyval.nd), (yyvsp[0].nd));
}
else {
(yyval.nd) = push((yyvsp[0].nd), new_nil(p));
}
}
}
#line 7527 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 13: /* compstmt: stmts opt_terms */
#line 2258 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
}
#line 7535 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 14: /* stmts: none */
#line 2264 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_stmts(p, 0);
}
#line 7543 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 15: /* stmts: stmt */
#line 2268 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_stmts(p, (yyvsp[0].nd));
}
#line 7551 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 16: /* stmts: stmts terms stmt */
#line 2272 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = stmts_push(p, (yyvsp[-2].nd), newline_node((yyvsp[0].nd)));
}
#line 7559 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 17: /* stmts: error stmt */
#line 2276 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_stmts(p, (yyvsp[0].nd));
}
#line 7567 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 18: /* $@3: %empty */
#line 2281 "mrbgems/mruby-compiler/core/parse.y"
{p->lstate = EXPR_FNAME;}
#line 7573 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 19: /* stmt: "'alias'" fsym $@3 fsym */
#line 2282 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_alias(p, (yyvsp[-2].id), (yyvsp[0].id));
}
#line 7581 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 20: /* stmt: "'undef'" undef_list */
#line 2286 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_undef(p, (yyvsp[0].nd));
}
#line 7589 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 21: /* stmt: stmt "'if' modifier" expr_value */
#line 2290 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_if(p, cond((yyvsp[0].nd)), (yyvsp[-2].nd), 0);
}
#line 7597 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 22: /* stmt: stmt "'unless' modifier" expr_value */
#line 2294 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_if(p, cond((yyvsp[0].nd)), 0, (yyvsp[-2].nd));
}
#line 7605 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 23: /* stmt: stmt "'while' modifier" expr_value */
#line 2298 "mrbgems/mruby-compiler/core/parse.y"
{
if ((yyvsp[-2].nd) && node_type_p((yyvsp[-2].nd), NODE_BEGIN)) {
(yyval.nd) = new_while_mod(p, cond((yyvsp[0].nd)), (yyvsp[-2].nd));
}
else {
(yyval.nd) = new_while(p, cond((yyvsp[0].nd)), (yyvsp[-2].nd));
}
}
#line 7618 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 24: /* stmt: stmt "'until' modifier" expr_value */
#line 2307 "mrbgems/mruby-compiler/core/parse.y"
{
if ((yyvsp[-2].nd) && node_type_p((yyvsp[-2].nd), NODE_BEGIN)) {
(yyval.nd) = new_until_mod(p, cond((yyvsp[0].nd)), (yyvsp[-2].nd));
}
else {
(yyval.nd) = new_until(p, cond((yyvsp[0].nd)), (yyvsp[-2].nd));
}
}
#line 7631 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 25: /* stmt: stmt "'rescue' modifier" stmt */
#line 2316 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_mod_rescue(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 7639 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 26: /* stmt: "'END'" '{' compstmt '}' */
#line 2320 "mrbgems/mruby-compiler/core/parse.y"
{
yyerror(&(yylsp[-3]), p, "END not supported");
(yyval.nd) = new_postexe(p, (yyvsp[-1].nd));
}
#line 7648 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 28: /* stmt: mlhs '=' command_call */
#line 2326 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_masgn(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 7656 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 29: /* stmt: lhs '=' mrhs */
#line 2330 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_asgn(p, (yyvsp[-2].nd), new_array(p, (yyvsp[0].nd)));
}
#line 7664 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 30: /* stmt: mlhs '=' arg */
#line 2334 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_masgn(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 7672 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 31: /* stmt: mlhs '=' mrhs */
#line 2338 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_masgn(p, (yyvsp[-2].nd), new_array(p, (yyvsp[0].nd)));
}
#line 7680 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 33: /* command_asgn: lhs '=' command_rhs */
#line 2345 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_asgn(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 7688 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 34: /* command_asgn: var_lhs tOP_ASGN command_rhs */
#line 2349 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_op_asgn(p, (yyvsp[-2].nd), (yyvsp[-1].id), (yyvsp[0].nd));
}
#line 7696 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 35: /* command_asgn: primary_value '[' opt_call_args ']' tOP_ASGN command_rhs */
#line 2353 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_op_asgn(p, new_call(p, (yyvsp[-5].nd), intern_op(aref), (yyvsp[-3].nd), '.'), (yyvsp[-1].id), (yyvsp[0].nd));
}
#line 7704 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 36: /* command_asgn: primary_value call_op "local variable or method" tOP_ASGN command_rhs */
#line 2357 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_op_asgn(p, new_call(p, (yyvsp[-4].nd), (yyvsp[-2].id), 0, (yyvsp[-3].num)), (yyvsp[-1].id), (yyvsp[0].nd));
}
#line 7712 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 37: /* command_asgn: primary_value call_op "constant" tOP_ASGN command_rhs */
#line 2361 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_op_asgn(p, new_call(p, (yyvsp[-4].nd), (yyvsp[-2].id), 0, (yyvsp[-3].num)), (yyvsp[-1].id), (yyvsp[0].nd));
}
#line 7720 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 38: /* command_asgn: primary_value "::" "constant" tOP_ASGN command_call */
#line 2365 "mrbgems/mruby-compiler/core/parse.y"
{
yyerror(&(yylsp[-4]), p, "constant re-assignment");
(yyval.nd) = 0;
}
#line 7729 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 39: /* command_asgn: primary_value "::" "local variable or method" tOP_ASGN command_rhs */
#line 2370 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_op_asgn(p, new_call(p, (yyvsp[-4].nd), (yyvsp[-2].id), 0, tCOLON2), (yyvsp[-1].id), (yyvsp[0].nd));
}
#line 7737 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 40: /* command_asgn: defn_head f_opt_arglist_paren '=' command */
#line 2374 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-3].nd);
endless_method_name(p, (yyvsp[-3].nd));
void_expr_error(p, (yyvsp[0].nd));
defn_setup(p, (yyval.nd), (yyvsp[-2].nd), (yyvsp[0].nd));
nvars_unnest(p);
p->in_def--;
}
#line 7750 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 41: /* command_asgn: defn_head f_opt_arglist_paren '=' command "'rescue' modifier" arg */
#line 2383 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-5].nd);
endless_method_name(p, (yyvsp[-5].nd));
void_expr_error(p, (yyvsp[-2].nd));
defn_setup(p, (yyval.nd), (yyvsp[-4].nd), new_mod_rescue(p, (yyvsp[-2].nd), (yyvsp[0].nd)));
nvars_unnest(p);
p->in_def--;
}
#line 7763 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 42: /* command_asgn: defs_head f_opt_arglist_paren '=' command */
#line 2392 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-3].nd);
void_expr_error(p, (yyvsp[0].nd));
defn_setup(p, (yyval.nd), (yyvsp[-2].nd), (yyvsp[0].nd));
nvars_unnest(p);
p->in_def--;
p->in_single--;
}
#line 7776 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 43: /* command_asgn: defs_head f_opt_arglist_paren '=' command "'rescue' modifier" arg */
#line 2401 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-5].nd);
void_expr_error(p, (yyvsp[-2].nd));
defn_setup(p, (yyval.nd), (yyvsp[-4].nd), new_mod_rescue(p, (yyvsp[-2].nd), (yyvsp[0].nd)));
nvars_unnest(p);
p->in_def--;
p->in_single--;
}
#line 7789 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 44: /* command_asgn: backref tOP_ASGN command_rhs */
#line 2410 "mrbgems/mruby-compiler/core/parse.y"
{
backref_error(p, (yyvsp[-2].nd));
(yyval.nd) = new_stmts(p, 0);
}
#line 7798 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 46: /* command_rhs: command_call "'rescue' modifier" stmt */
#line 2418 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_mod_rescue(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 7806 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 49: /* expr: expr "'and'" expr */
#line 2426 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_and(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 7814 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 50: /* expr: expr "'or'" expr */
#line 2430 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_or(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 7822 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 51: /* expr: "'not'" opt_nl expr */
#line 2434 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_uni_op(p, cond((yyvsp[0].nd)), "!");
}
#line 7830 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 52: /* expr: '!' command_call */
#line 2438 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_uni_op(p, cond((yyvsp[0].nd)), "!");
}
#line 7838 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 53: /* $@4: %empty */
#line 2441 "mrbgems/mruby-compiler/core/parse.y"
{p->in_kwarg++;}
#line 7844 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 54: /* expr: arg "=>" $@4 p_expr */
#line 2442 "mrbgems/mruby-compiler/core/parse.y"
{
/* expr => pattern (raises NoMatchingPatternError on failure) */
p->in_kwarg--;
(yyval.nd) = new_match_pat(p, (yyvsp[-3].nd), (yyvsp[0].nd), TRUE);
}
#line 7854 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 55: /* $@5: %empty */
#line 2447 "mrbgems/mruby-compiler/core/parse.y"
{p->in_kwarg++;}
#line 7860 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 56: /* expr: arg "'in'" $@5 p_expr */
#line 2448 "mrbgems/mruby-compiler/core/parse.y"
{
/* expr in pattern (returns true/false) */
p->in_kwarg--;
(yyval.nd) = new_match_pat(p, (yyvsp[-3].nd), (yyvsp[0].nd), FALSE);
}
#line 7870 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 58: /* defn_head: "'def'" fname */
#line 2457 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_def(p, (yyvsp[0].id));
p->cmdarg_stack = 0;
p->in_def++;
nvars_block(p);
}
#line 7881 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 59: /* $@6: %empty */
#line 2466 "mrbgems/mruby-compiler/core/parse.y"
{
p->lstate = EXPR_FNAME;
}
#line 7889 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 60: /* defs_head: "'def'" singleton dot_or_colon $@6 fname */
#line 2470 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_sdef(p, (yyvsp[-3].nd), (yyvsp[0].id));
p->cmdarg_stack = 0;
p->in_def++;
p->in_single++;
nvars_block(p);
p->lstate = EXPR_ENDFN; /* force for args */
}
#line 7902 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 61: /* expr_value: expr */
#line 2481 "mrbgems/mruby-compiler/core/parse.y"
{
if (!(yyvsp[0].nd)) (yyval.nd) = new_nil(p);
else {
(yyval.nd) = (yyvsp[0].nd);
}
}
#line 7913 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 65: /* block_command: block_call call_op2 operation2 command_args */
#line 2495 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-3].nd), (yyvsp[-1].id), (yyvsp[0].nd), (yyvsp[-2].num));
}
#line 7921 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 66: /* $@7: %empty */
#line 2501 "mrbgems/mruby-compiler/core/parse.y"
{
local_nest(p);
nvars_nest(p);
}
#line 7930 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 67: /* cmd_brace_block: "{" $@7 opt_block_param compstmt '}' */
#line 2508 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_block(p, (yyvsp[-2].nd), (yyvsp[-1].nd));
local_unnest(p);
nvars_unnest(p);
}
#line 7940 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 68: /* command: operation command_args */
#line 2516 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_fcall(p, (yyvsp[-1].id), (yyvsp[0].nd));
}
#line 7948 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 69: /* command: operation command_args cmd_brace_block */
#line 2520 "mrbgems/mruby-compiler/core/parse.y"
{
args_with_block(p, (yyvsp[-1].nd), (yyvsp[0].nd));
(yyval.nd) = new_fcall(p, (yyvsp[-2].id), (yyvsp[-1].nd));
}
#line 7957 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 70: /* command: primary_value call_op operation2 command_args */
#line 2525 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-3].nd), (yyvsp[-1].id), (yyvsp[0].nd), (yyvsp[-2].num));
}
#line 7965 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 71: /* command: primary_value call_op operation2 command_args cmd_brace_block */
#line 2529 "mrbgems/mruby-compiler/core/parse.y"
{
args_with_block(p, (yyvsp[-1].nd), (yyvsp[0].nd));
(yyval.nd) = new_call(p, (yyvsp[-4].nd), (yyvsp[-2].id), (yyvsp[-1].nd), (yyvsp[-3].num));
}
#line 7974 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 72: /* command: primary_value "::" operation2 command_args */
#line 2534 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-3].nd), (yyvsp[-1].id), (yyvsp[0].nd), tCOLON2);
}
#line 7982 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 73: /* command: primary_value "::" operation2 command_args cmd_brace_block */
#line 2538 "mrbgems/mruby-compiler/core/parse.y"
{
args_with_block(p, (yyvsp[-1].nd), (yyvsp[0].nd));
(yyval.nd) = new_call(p, (yyvsp[-4].nd), (yyvsp[-2].id), (yyvsp[-1].nd), tCOLON2);
}
#line 7991 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 74: /* command: "'super'" command_args */
#line 2543 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_super(p, (yyvsp[0].nd));
}
#line 7999 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 75: /* command: "'yield'" command_args */
#line 2547 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_yield(p, (yyvsp[0].nd));
}
#line 8007 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 76: /* command: "'return'" call_args */
#line 2551 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_return(p, ret_args(p, (yyvsp[0].nd)));
}
#line 8015 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 77: /* command: "'break'" call_args */
#line 2555 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_break(p, ret_args(p, (yyvsp[0].nd)));
}
#line 8023 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 78: /* command: "'next'" call_args */
#line 2559 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_next(p, ret_args(p, (yyvsp[0].nd)));
}
#line 8031 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 79: /* mlhs: mlhs_basic */
#line 2565 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[0].nd);
}
#line 8039 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 80: /* mlhs: tLPAREN mlhs_inner rparen */
#line 2569 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
}
#line 8047 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 82: /* mlhs_inner: tLPAREN mlhs_inner rparen */
#line 2576 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
}
#line 8055 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 83: /* mlhs_basic: mlhs_list */
#line 2582 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 8063 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 84: /* mlhs_basic: mlhs_list mlhs_item */
#line 2586 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1(push((yyvsp[-1].nd),(yyvsp[0].nd)));
}
#line 8071 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 85: /* mlhs_basic: mlhs_list "*" mlhs_node */
#line 2590 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list2((yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 8079 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 86: /* mlhs_basic: mlhs_list "*" mlhs_node ',' mlhs_post */
#line 2594 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list3((yyvsp[-4].nd), (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 8087 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 87: /* mlhs_basic: mlhs_list "*" */
#line 2598 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list2((yyvsp[-1].nd), new_nil(p));
}
#line 8095 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 88: /* mlhs_basic: mlhs_list "*" ',' mlhs_post */
#line 2602 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list3((yyvsp[-3].nd), new_nil(p), (yyvsp[0].nd));
}
#line 8103 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 89: /* mlhs_basic: "*" mlhs_node */
#line 2606 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list2(0, (yyvsp[0].nd));
}
#line 8111 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 90: /* mlhs_basic: "*" mlhs_node ',' mlhs_post */
#line 2610 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list3(0, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 8119 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 91: /* mlhs_basic: "*" */
#line 2614 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list2(0, new_nil(p));
}
#line 8127 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 92: /* mlhs_basic: "*" ',' mlhs_post */
#line 2618 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list3(0, new_nil(p), (yyvsp[0].nd));
}
#line 8135 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 94: /* mlhs_item: tLPAREN mlhs_inner rparen */
#line 2625 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_masgn(p, (yyvsp[-1].nd), NULL);
}
#line 8143 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 95: /* mlhs_list: mlhs_item ',' */
#line 2631 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1((yyvsp[-1].nd));
}
#line 8151 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 96: /* mlhs_list: mlhs_list mlhs_item ',' */
#line 2635 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-2].nd), (yyvsp[-1].nd));
}
#line 8159 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 97: /* mlhs_post: mlhs_item */
#line 2641 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 8167 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 98: /* mlhs_post: mlhs_list mlhs_item */
#line 2645 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 8175 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 99: /* mlhs_node: variable */
#line 2651 "mrbgems/mruby-compiler/core/parse.y"
{
assignable(p, (yyvsp[0].nd));
}
#line 8183 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 100: /* mlhs_node: primary_value '[' opt_call_args ']' */
#line 2655 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-3].nd), intern_op(aref), (yyvsp[-1].nd), '.');
}
#line 8191 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 101: /* mlhs_node: primary_value call_op "local variable or method" */
#line 2659 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-2].nd), (yyvsp[0].id), 0, (yyvsp[-1].num));
}
#line 8199 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 102: /* mlhs_node: primary_value "::" "local variable or method" */
#line 2663 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-2].nd), (yyvsp[0].id), 0, tCOLON2);
}
#line 8207 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 103: /* mlhs_node: primary_value call_op "constant" */
#line 2667 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-2].nd), (yyvsp[0].id), 0, (yyvsp[-1].num));
}
#line 8215 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 104: /* mlhs_node: primary_value "::" "constant" */
#line 2671 "mrbgems/mruby-compiler/core/parse.y"
{
if (p->in_def || p->in_single)
yyerror(&(yylsp[-2]), p, "dynamic constant assignment");
(yyval.nd) = new_colon2(p, (yyvsp[-2].nd), (yyvsp[0].id));
}
#line 8225 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 105: /* mlhs_node: tCOLON3 "constant" */
#line 2677 "mrbgems/mruby-compiler/core/parse.y"
{
if (p->in_def || p->in_single)
yyerror(&(yylsp[-1]), p, "dynamic constant assignment");
(yyval.nd) = new_colon3(p, (yyvsp[0].id));
}
#line 8235 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 106: /* mlhs_node: backref */
#line 2683 "mrbgems/mruby-compiler/core/parse.y"
{
backref_error(p, (yyvsp[0].nd));
(yyval.nd) = 0;
}
#line 8244 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 107: /* lhs: variable */
#line 2690 "mrbgems/mruby-compiler/core/parse.y"
{
assignable(p, (yyvsp[0].nd));
}
#line 8252 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 108: /* lhs: primary_value '[' opt_call_args ']' */
#line 2694 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-3].nd), intern_op(aref), (yyvsp[-1].nd), '.');
}
#line 8260 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 109: /* lhs: primary_value call_op "local variable or method" */
#line 2698 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-2].nd), (yyvsp[0].id), 0, (yyvsp[-1].num));
}
#line 8268 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 110: /* lhs: primary_value "::" "local variable or method" */
#line 2702 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-2].nd), (yyvsp[0].id), 0, tCOLON2);
}
#line 8276 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 111: /* lhs: primary_value call_op "constant" */
#line 2706 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-2].nd), (yyvsp[0].id), 0, (yyvsp[-1].num));
}
#line 8284 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 112: /* lhs: primary_value "::" "constant" */
#line 2710 "mrbgems/mruby-compiler/core/parse.y"
{
if (p->in_def || p->in_single)
yyerror(&(yylsp[-2]), p, "dynamic constant assignment");
(yyval.nd) = new_colon2(p, (yyvsp[-2].nd), (yyvsp[0].id));
}
#line 8294 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 113: /* lhs: tCOLON3 "constant" */
#line 2716 "mrbgems/mruby-compiler/core/parse.y"
{
if (p->in_def || p->in_single)
yyerror(&(yylsp[-1]), p, "dynamic constant assignment");
(yyval.nd) = new_colon3(p, (yyvsp[0].id));
}
#line 8304 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 114: /* lhs: backref */
#line 2722 "mrbgems/mruby-compiler/core/parse.y"
{
backref_error(p, (yyvsp[0].nd));
(yyval.nd) = 0;
}
#line 8313 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 115: /* lhs: "numbered parameter" */
#line 2727 "mrbgems/mruby-compiler/core/parse.y"
{
yyerror(&(yylsp[0]), p, "can't assign to numbered parameter");
}
#line 8321 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 116: /* cname: "local variable or method" */
#line 2733 "mrbgems/mruby-compiler/core/parse.y"
{
yyerror(&(yylsp[0]), p, "class/module name must be CONSTANT");
}
#line 8329 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 118: /* cpath: tCOLON3 cname */
#line 2740 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = cons(int_to_node(1), sym_to_node((yyvsp[0].id)));
}
#line 8337 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 119: /* cpath: cname */
#line 2744 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = cons(int_to_node(0), sym_to_node((yyvsp[0].id)));
}
#line 8345 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 120: /* cpath: primary_value "::" cname */
#line 2748 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[-2].nd));
(yyval.nd) = cons((yyvsp[-2].nd), sym_to_node((yyvsp[0].id)));
}
#line 8354 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 124: /* fname: op */
#line 2758 "mrbgems/mruby-compiler/core/parse.y"
{
p->lstate = EXPR_ENDFN;
(yyval.id) = (yyvsp[0].id);
}
#line 8363 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 125: /* fname: reswords */
#line 2763 "mrbgems/mruby-compiler/core/parse.y"
{
p->lstate = EXPR_ENDFN;
(yyval.id) = (yyvsp[0].id);
}
#line 8372 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 128: /* undef_list: fsym */
#line 2774 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = cons(sym_to_node((yyvsp[0].id)), 0);
}
#line 8380 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 129: /* $@8: %empty */
#line 2777 "mrbgems/mruby-compiler/core/parse.y"
{p->lstate = EXPR_FNAME;}
#line 8386 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 130: /* undef_list: undef_list ',' $@8 fsym */
#line 2778 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-3].nd), sym_to_node((yyvsp[0].id)));
}
#line 8394 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 131: /* op: '|' */
#line 2783 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(or); }
#line 8400 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 132: /* op: '^' */
#line 2784 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(xor); }
#line 8406 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 133: /* op: '&' */
#line 2785 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(and); }
#line 8412 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 134: /* op: "<=>" */
#line 2786 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(cmp); }
#line 8418 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 135: /* op: "==" */
#line 2787 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(eq); }
#line 8424 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 136: /* op: "===" */
#line 2788 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(eqq); }
#line 8430 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 137: /* op: "=~" */
#line 2789 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(match); }
#line 8436 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 138: /* op: "!~" */
#line 2790 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(nmatch); }
#line 8442 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 139: /* op: '>' */
#line 2791 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(gt); }
#line 8448 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 140: /* op: ">=" */
#line 2792 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(ge); }
#line 8454 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 141: /* op: '<' */
#line 2793 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(lt); }
#line 8460 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 142: /* op: "<=" */
#line 2794 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(le); }
#line 8466 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 143: /* op: "!=" */
#line 2795 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(neq); }
#line 8472 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 144: /* op: "<<" */
#line 2796 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(lshift); }
#line 8478 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 145: /* op: ">>" */
#line 2797 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(rshift); }
#line 8484 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 146: /* op: '+' */
#line 2798 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(add); }
#line 8490 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 147: /* op: '-' */
#line 2799 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(sub); }
#line 8496 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 148: /* op: '*' */
#line 2800 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(mul); }
#line 8502 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 149: /* op: "*" */
#line 2801 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(mul); }
#line 8508 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 150: /* op: '/' */
#line 2802 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(div); }
#line 8514 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 151: /* op: '%' */
#line 2803 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(mod); }
#line 8520 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 152: /* op: tPOW */
#line 2804 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(pow); }
#line 8526 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 153: /* op: "**" */
#line 2805 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(pow); }
#line 8532 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 154: /* op: '!' */
#line 2806 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(not); }
#line 8538 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 155: /* op: '~' */
#line 2807 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(neg); }
#line 8544 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 156: /* op: "unary plus" */
#line 2808 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(plus); }
#line 8550 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 157: /* op: "unary minus" */
#line 2809 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(minus); }
#line 8556 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 158: /* op: tAREF */
#line 2810 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(aref); }
#line 8562 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 159: /* op: tASET */
#line 2811 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(aset); }
#line 8568 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 160: /* op: '`' */
#line 2812 "mrbgems/mruby-compiler/core/parse.y"
{ (yyval.id) = intern_op(tick); }
#line 8574 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 201: /* arg: lhs '=' arg_rhs */
#line 2830 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_asgn(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 8582 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 202: /* arg: var_lhs tOP_ASGN arg_rhs */
#line 2834 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_op_asgn(p, (yyvsp[-2].nd), (yyvsp[-1].id), (yyvsp[0].nd));
}
#line 8590 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 203: /* arg: primary_value '[' opt_call_args ']' tOP_ASGN arg_rhs */
#line 2838 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_op_asgn(p, new_call(p, (yyvsp[-5].nd), intern_op(aref), (yyvsp[-3].nd), '.'), (yyvsp[-1].id), (yyvsp[0].nd));
}
#line 8598 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 204: /* arg: primary_value call_op "local variable or method" tOP_ASGN arg_rhs */
#line 2842 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_op_asgn(p, new_call(p, (yyvsp[-4].nd), (yyvsp[-2].id), 0, (yyvsp[-3].num)), (yyvsp[-1].id), (yyvsp[0].nd));
}
#line 8606 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 205: /* arg: primary_value call_op "constant" tOP_ASGN arg_rhs */
#line 2846 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_op_asgn(p, new_call(p, (yyvsp[-4].nd), (yyvsp[-2].id), 0, (yyvsp[-3].num)), (yyvsp[-1].id), (yyvsp[0].nd));
}
#line 8614 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 206: /* arg: primary_value "::" "local variable or method" tOP_ASGN arg_rhs */
#line 2850 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_op_asgn(p, new_call(p, (yyvsp[-4].nd), (yyvsp[-2].id), 0, tCOLON2), (yyvsp[-1].id), (yyvsp[0].nd));
}
#line 8622 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 207: /* arg: primary_value "::" "constant" tOP_ASGN arg_rhs */
#line 2854 "mrbgems/mruby-compiler/core/parse.y"
{
yyerror(&(yylsp[-4]), p, "constant re-assignment");
(yyval.nd) = new_stmts(p, 0);
}
#line 8631 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 208: /* arg: tCOLON3 "constant" tOP_ASGN arg_rhs */
#line 2859 "mrbgems/mruby-compiler/core/parse.y"
{
yyerror(&(yylsp[-3]), p, "constant re-assignment");
(yyval.nd) = new_stmts(p, 0);
}
#line 8640 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 209: /* arg: backref tOP_ASGN arg_rhs */
#line 2864 "mrbgems/mruby-compiler/core/parse.y"
{
backref_error(p, (yyvsp[-2].nd));
(yyval.nd) = new_stmts(p, 0);
}
#line 8649 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 210: /* arg: arg ".." arg */
#line 2869 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_dot2(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 8657 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 211: /* arg: arg ".." */
#line 2873 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_dot2(p, (yyvsp[-1].nd), new_nil(p));
}
#line 8665 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 212: /* arg: tBDOT2 arg */
#line 2877 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_dot2(p, new_nil(p), (yyvsp[0].nd));
}
#line 8673 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 213: /* arg: arg "..." arg */
#line 2881 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_dot3(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 8681 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 214: /* arg: arg "..." */
#line 2885 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_dot3(p, (yyvsp[-1].nd), new_nil(p));
}
#line 8689 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 215: /* arg: tBDOT3 arg */
#line 2889 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_dot3(p, new_nil(p), (yyvsp[0].nd));
}
#line 8697 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 216: /* arg: arg '+' arg */
#line 2893 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "+", (yyvsp[0].nd));
}
#line 8705 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 217: /* arg: arg '-' arg */
#line 2897 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "-", (yyvsp[0].nd));
}
#line 8713 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 218: /* arg: arg '*' arg */
#line 2901 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "*", (yyvsp[0].nd));
}
#line 8721 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 219: /* arg: arg '/' arg */
#line 2905 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "/", (yyvsp[0].nd));
}
#line 8729 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 220: /* arg: arg '%' arg */
#line 2909 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "%", (yyvsp[0].nd));
}
#line 8737 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 221: /* arg: arg tPOW arg */
#line 2913 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "**", (yyvsp[0].nd));
}
#line 8745 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 222: /* arg: tUMINUS_NUM "integer literal" tPOW arg */
#line 2917 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_negate(p, call_bin_op(p, (yyvsp[-2].nd), "**", (yyvsp[0].nd)));
}
#line 8753 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 223: /* arg: tUMINUS_NUM "float literal" tPOW arg */
#line 2921 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_negate(p, call_bin_op(p, (yyvsp[-2].nd), "**", (yyvsp[0].nd)));
}
#line 8761 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 224: /* arg: "unary plus" arg */
#line 2925 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_uni_op(p, (yyvsp[0].nd), "+@");
}
#line 8769 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 225: /* arg: "unary minus" arg */
#line 2929 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_negate(p, (yyvsp[0].nd));
}
#line 8777 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 226: /* arg: arg '|' arg */
#line 2933 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "|", (yyvsp[0].nd));
}
#line 8785 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 227: /* arg: arg '^' arg */
#line 2937 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "^", (yyvsp[0].nd));
}
#line 8793 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 228: /* arg: arg '&' arg */
#line 2941 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "&", (yyvsp[0].nd));
}
#line 8801 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 229: /* arg: arg "<=>" arg */
#line 2945 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "<=>", (yyvsp[0].nd));
}
#line 8809 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 230: /* arg: arg '>' arg */
#line 2949 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), ">", (yyvsp[0].nd));
}
#line 8817 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 231: /* arg: arg ">=" arg */
#line 2953 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), ">=", (yyvsp[0].nd));
}
#line 8825 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 232: /* arg: arg '<' arg */
#line 2957 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "<", (yyvsp[0].nd));
}
#line 8833 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 233: /* arg: arg "<=" arg */
#line 2961 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "<=", (yyvsp[0].nd));
}
#line 8841 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 234: /* arg: arg "==" arg */
#line 2965 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "==", (yyvsp[0].nd));
}
#line 8849 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 235: /* arg: arg "===" arg */
#line 2969 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "===", (yyvsp[0].nd));
}
#line 8857 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 236: /* arg: arg "!=" arg */
#line 2973 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "!=", (yyvsp[0].nd));
}
#line 8865 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 237: /* arg: arg "=~" arg */
#line 2977 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "=~", (yyvsp[0].nd));
}
#line 8873 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 238: /* arg: arg "!~" arg */
#line 2981 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "!~", (yyvsp[0].nd));
}
#line 8881 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 239: /* arg: '!' arg */
#line 2985 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_uni_op(p, cond((yyvsp[0].nd)), "!");
}
#line 8889 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 240: /* arg: '~' arg */
#line 2989 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_uni_op(p, cond((yyvsp[0].nd)), "~");
}
#line 8897 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 241: /* arg: arg "<<" arg */
#line 2993 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), "<<", (yyvsp[0].nd));
}
#line 8905 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 242: /* arg: arg ">>" arg */
#line 2997 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_bin_op(p, (yyvsp[-2].nd), ">>", (yyvsp[0].nd));
}
#line 8913 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 243: /* arg: arg "&&" arg */
#line 3001 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_and(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 8921 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 244: /* arg: arg "||" arg */
#line 3005 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_or(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 8929 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 245: /* arg: arg '?' arg opt_nl ':' arg */
#line 3009 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_if(p, cond((yyvsp[-5].nd)), (yyvsp[-3].nd), (yyvsp[0].nd));
}
#line 8937 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 246: /* arg: arg '?' arg opt_nl "label" arg */
#line 3013 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_if(p, cond((yyvsp[-5].nd)), (yyvsp[-3].nd), (yyvsp[0].nd));
}
#line 8945 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 247: /* arg: defn_head f_opt_arglist_paren '=' arg */
#line 3017 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-3].nd);
endless_method_name(p, (yyvsp[-3].nd));
void_expr_error(p, (yyvsp[0].nd));
defn_setup(p, (yyval.nd), (yyvsp[-2].nd), (yyvsp[0].nd));
nvars_unnest(p);
p->in_def--;
}
#line 8958 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 248: /* arg: defn_head f_opt_arglist_paren '=' arg "'rescue' modifier" arg */
#line 3026 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-5].nd);
endless_method_name(p, (yyvsp[-5].nd));
void_expr_error(p, (yyvsp[-2].nd));
defn_setup(p, (yyval.nd), (yyvsp[-4].nd), new_mod_rescue(p, (yyvsp[-2].nd), (yyvsp[0].nd)));
nvars_unnest(p);
p->in_def--;
}
#line 8971 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 249: /* arg: defs_head f_opt_arglist_paren '=' arg */
#line 3035 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-3].nd);
void_expr_error(p, (yyvsp[0].nd));
defn_setup(p, (yyval.nd), (yyvsp[-2].nd), (yyvsp[0].nd));
nvars_unnest(p);
p->in_def--;
p->in_single--;
}
#line 8984 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 250: /* arg: defs_head f_opt_arglist_paren '=' arg "'rescue' modifier" arg */
#line 3044 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-5].nd);
void_expr_error(p, (yyvsp[-2].nd));
defn_setup(p, (yyval.nd), (yyvsp[-4].nd), new_mod_rescue(p, (yyvsp[-2].nd), (yyvsp[0].nd)));
nvars_unnest(p);
p->in_def--;
p->in_single--;
}
#line 8997 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 251: /* arg: primary */
#line 3053 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[0].nd);
}
#line 9005 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 253: /* aref_args: args trailer */
#line 3060 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
}
#line 9013 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 254: /* aref_args: args comma assocs trailer */
#line 3064 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-3].nd), new_hash(p, (yyvsp[-1].nd)));
}
#line 9021 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 255: /* aref_args: assocs trailer */
#line 3068 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = cons(new_hash(p, (yyvsp[-1].nd)), 0);
}
#line 9029 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 256: /* arg_rhs: arg */
#line 3074 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[0].nd);
}
#line 9037 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 257: /* arg_rhs: arg "'rescue' modifier" arg */
#line 3078 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[-2].nd));
(yyval.nd) = new_mod_rescue(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 9046 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 258: /* paren_args: '(' opt_call_args ')' */
#line 3085 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
}
#line 9054 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 259: /* paren_args: '(' args comma tBDOT3 rparen */
#line 3089 "mrbgems/mruby-compiler/core/parse.y"
{
mrb_sym r = intern_op(mul);
mrb_sym k = intern_op(pow);
mrb_sym b = intern_op(and);
(yyval.nd) = new_callargs(p, push((yyvsp[-3].nd), new_splat(p, new_lvar(p, r))),
list1(cons(new_kw_rest_args(p, 0), new_lvar(p, k))),
new_block_arg(p, new_lvar(p, b)));
}
#line 9067 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 260: /* paren_args: '(' tBDOT3 rparen */
#line 3098 "mrbgems/mruby-compiler/core/parse.y"
{
mrb_sym r = intern_op(mul);
mrb_sym k = intern_op(pow);
mrb_sym b = intern_op(and);
if (local_var_p(p, r) && local_var_p(p, k) && local_var_p(p, b)) {
(yyval.nd) = new_callargs(p, list1(new_splat(p, new_lvar(p, r))),
list1(cons(new_kw_rest_args(p, 0), new_lvar(p, k))),
new_block_arg(p, new_lvar(p, b)));
}
else {
yyerror(&(yylsp[-2]), p, "unexpected argument forwarding ...");
(yyval.nd) = 0;
}
}
#line 9086 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 265: /* opt_call_args: args comma */
#line 3121 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_callargs(p,(yyvsp[-1].nd),0,0);
}
#line 9094 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 266: /* opt_call_args: args comma assocs comma */
#line 3125 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_callargs(p,(yyvsp[-3].nd),(yyvsp[-1].nd),0);
}
#line 9102 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 267: /* opt_call_args: assocs comma */
#line 3129 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_callargs(p,0,(yyvsp[-1].nd),0);
}
#line 9110 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 268: /* call_args: command */
#line 3135 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[0].nd));
(yyval.nd) = new_callargs(p, list1((yyvsp[0].nd)), 0, 0);
}
#line 9119 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 269: /* call_args: args opt_block_arg */
#line 3140 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_callargs(p, (yyvsp[-1].nd), 0, (yyvsp[0].nd));
}
#line 9127 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 270: /* call_args: assocs opt_block_arg */
#line 3144 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_callargs(p, 0, (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 9135 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 271: /* call_args: args comma assocs opt_block_arg */
#line 3148 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_callargs(p, (yyvsp[-3].nd), (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 9143 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 272: /* call_args: block_arg */
#line 3152 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_callargs(p, 0, 0, (yyvsp[0].nd));
}
#line 9151 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 273: /* @9: %empty */
#line 3157 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.stack) = p->cmdarg_stack;
CMDARG_PUSH(1);
}
#line 9160 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 274: /* command_args: @9 call_args */
#line 3162 "mrbgems/mruby-compiler/core/parse.y"
{
p->cmdarg_stack = (yyvsp[-1].stack);
(yyval.nd) = (yyvsp[0].nd);
}
#line 9169 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 275: /* block_arg: "&" arg */
#line 3169 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_block_arg(p, (yyvsp[0].nd));
}
#line 9177 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 276: /* block_arg: "&" */
#line 3173 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_block_arg(p, 0);
}
#line 9185 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 277: /* opt_block_arg: comma block_arg */
#line 3179 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[0].nd);
}
#line 9193 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 278: /* opt_block_arg: none */
#line 3183 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = 0;
}
#line 9201 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 280: /* args: arg */
#line 3192 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[0].nd));
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 9210 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 281: /* args: "*" */
#line 3197 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1(new_splat(p, new_lvar(p, intern_op(mul))));
}
#line 9218 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 282: /* args: "*" arg */
#line 3201 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1(new_splat(p, (yyvsp[0].nd)));
}
#line 9226 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 283: /* args: args comma arg */
#line 3205 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[0].nd));
(yyval.nd) = push((yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 9235 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 284: /* args: args comma "*" */
#line 3210 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-2].nd), new_splat(p, new_lvar(p, intern_op(mul))));
}
#line 9243 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 285: /* args: args comma "*" arg */
#line 3214 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-3].nd), new_splat(p, (yyvsp[0].nd)));
}
#line 9251 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 286: /* mrhs: args comma arg */
#line 3220 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[0].nd));
(yyval.nd) = push((yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 9260 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 287: /* mrhs: args comma "*" arg */
#line 3225 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-3].nd), new_splat(p, (yyvsp[0].nd)));
}
#line 9268 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 288: /* mrhs: "*" arg */
#line 3229 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1(new_splat(p, (yyvsp[0].nd)));
}
#line 9276 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 290: /* primary: string */
#line 3236 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_str(p, (yyvsp[0].nd));
}
#line 9284 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 291: /* primary: xstring */
#line 3240 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_xstr(p, (yyvsp[0].nd));
}
#line 9292 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 296: /* primary: "method" */
#line 3248 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_fcall(p, (yyvsp[0].id), 0);
}
#line 9300 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 297: /* @10: %empty */
#line 3252 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.stack) = p->cmdarg_stack;
p->cmdarg_stack = 0;
}
#line 9309 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 298: /* primary: "'begin'" @10 bodystmt "'end'" */
#line 3258 "mrbgems/mruby-compiler/core/parse.y"
{
p->cmdarg_stack = (yyvsp[-2].stack);
(yyval.nd) = new_begin(p, (yyvsp[-1].nd));
}
#line 9318 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 299: /* @11: %empty */
#line 3263 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.stack) = p->cmdarg_stack;
p->cmdarg_stack = 0;
}
#line 9327 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 300: /* $@12: %empty */
#line 3267 "mrbgems/mruby-compiler/core/parse.y"
{p->lstate = EXPR_ENDARG;}
#line 9333 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 301: /* primary: "(" @11 compstmt $@12 rparen */
#line 3268 "mrbgems/mruby-compiler/core/parse.y"
{
p->cmdarg_stack = (yyvsp[-3].stack);
(yyval.nd) = (yyvsp[-2].nd);
}
#line 9342 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 302: /* $@13: %empty */
#line 3272 "mrbgems/mruby-compiler/core/parse.y"
{p->lstate = EXPR_ENDARG;}
#line 9348 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 303: /* primary: "(" $@13 rparen */
#line 3273 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_nil(p);
}
#line 9356 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 304: /* primary: tLPAREN compstmt ')' */
#line 3277 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
}
#line 9364 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 305: /* primary: primary_value "::" "constant" */
#line 3281 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_colon2(p, (yyvsp[-2].nd), (yyvsp[0].id));
}
#line 9372 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 306: /* primary: tCOLON3 "constant" */
#line 3285 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_colon3(p, (yyvsp[0].id));
}
#line 9380 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 307: /* primary: "[" aref_args ']' */
#line 3289 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_array(p, (yyvsp[-1].nd));
}
#line 9388 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 308: /* primary: tLBRACE assoc_list '}' */
#line 3293 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_hash(p, (yyvsp[-1].nd));
}
#line 9396 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 309: /* primary: "'return'" */
#line 3297 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_return(p, 0);
}
#line 9404 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 310: /* primary: "'yield'" opt_paren_args */
#line 3301 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_yield(p, (yyvsp[0].nd));
}
#line 9412 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 311: /* primary: "'not'" '(' expr rparen */
#line 3305 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_uni_op(p, cond((yyvsp[-1].nd)), "!");
}
#line 9420 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 312: /* primary: "'not'" '(' rparen */
#line 3309 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = call_uni_op(p, new_nil(p), "!");
}
#line 9428 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 313: /* primary: operation brace_block */
#line 3313 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_fcall(p, (yyvsp[-1].id), new_callargs(p, 0, 0, (yyvsp[0].nd)));
}
#line 9436 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 315: /* primary: method_call brace_block */
#line 3318 "mrbgems/mruby-compiler/core/parse.y"
{
call_with_block(p, (yyvsp[-1].nd), (yyvsp[0].nd));
(yyval.nd) = (yyvsp[-1].nd);
}
#line 9445 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 316: /* @14: %empty */
#line 3323 "mrbgems/mruby-compiler/core/parse.y"
{
local_nest(p);
nvars_nest(p);
(yyval.num) = p->lpar_beg;
p->lpar_beg = ++p->paren_nest;
}
#line 9456 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 317: /* @15: %empty */
#line 3330 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.stack) = p->cmdarg_stack;
p->cmdarg_stack = 0;
}
#line 9465 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 318: /* primary: "->" @14 f_larglist @15 lambda_body */
#line 3335 "mrbgems/mruby-compiler/core/parse.y"
{
p->lpar_beg = (yyvsp[-3].num);
(yyval.nd) = new_lambda(p, (yyvsp[-2].nd), (yyvsp[0].nd));
local_unnest(p);
nvars_unnest(p);
p->cmdarg_stack = (yyvsp[-1].stack);
CMDARG_LEXPOP();
}
#line 9478 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 319: /* primary: "'if'" expr_value then compstmt if_tail "'end'" */
#line 3347 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_if(p, cond((yyvsp[-4].nd)), (yyvsp[-2].nd), (yyvsp[-1].nd));
SET_LINENO((yyval.nd), (yyvsp[-5].num));
}
#line 9487 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 320: /* primary: "'unless'" expr_value then compstmt opt_else "'end'" */
#line 3355 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_if(p, cond((yyvsp[-4].nd)), (yyvsp[-1].nd), (yyvsp[-2].nd));
SET_LINENO((yyval.nd), (yyvsp[-5].num));
}
#line 9496 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 321: /* $@16: %empty */
#line 3359 "mrbgems/mruby-compiler/core/parse.y"
{COND_PUSH(1);}
#line 9502 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 322: /* $@17: %empty */
#line 3359 "mrbgems/mruby-compiler/core/parse.y"
{COND_POP();}
#line 9508 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 323: /* primary: "'while'" $@16 expr_value do $@17 compstmt "'end'" */
#line 3362 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_while(p, cond((yyvsp[-4].nd)), (yyvsp[-1].nd));
SET_LINENO((yyval.nd), (yyvsp[-6].num));
}
#line 9517 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 324: /* $@18: %empty */
#line 3366 "mrbgems/mruby-compiler/core/parse.y"
{COND_PUSH(1);}
#line 9523 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 325: /* $@19: %empty */
#line 3366 "mrbgems/mruby-compiler/core/parse.y"
{COND_POP();}
#line 9529 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 326: /* primary: "'until'" $@18 expr_value do $@19 compstmt "'end'" */
#line 3369 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_until(p, cond((yyvsp[-4].nd)), (yyvsp[-1].nd));
SET_LINENO((yyval.nd), (yyvsp[-6].num));
}
#line 9538 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 327: /* primary: "'case'" expr_value opt_terms case_body "'end'" */
#line 3376 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_case(p, (yyvsp[-3].nd), (yyvsp[-1].nd));
}
#line 9546 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 328: /* primary: "'case'" opt_terms case_body "'end'" */
#line 3380 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_case(p, 0, (yyvsp[-1].nd));
}
#line 9554 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 329: /* primary: "'case'" expr_value opt_terms "'in'" p_expr then compstmt in_clauses "'end'" */
#line 3388 "mrbgems/mruby-compiler/core/parse.y"
{
node *in_clause = new_in(p, (yyvsp[-4].nd), NULL, (yyvsp[-2].nd), FALSE);
(yyval.nd) = new_case_match(p, (yyvsp[-7].nd), cons(in_clause, (yyvsp[-1].nd)));
}
#line 9563 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 330: /* primary: "'case'" expr_value opt_terms "'in'" p_expr "'if' modifier" expr_value then compstmt in_clauses "'end'" */
#line 3397 "mrbgems/mruby-compiler/core/parse.y"
{
node *in_clause = new_in(p, (yyvsp[-6].nd), (yyvsp[-4].nd), (yyvsp[-2].nd), FALSE);
(yyval.nd) = new_case_match(p, (yyvsp[-9].nd), cons(in_clause, (yyvsp[-1].nd)));
}
#line 9572 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 331: /* primary: "'case'" expr_value opt_terms "'in'" p_expr "'unless' modifier" expr_value then compstmt in_clauses "'end'" */
#line 3406 "mrbgems/mruby-compiler/core/parse.y"
{
node *in_clause = new_in(p, (yyvsp[-6].nd), (yyvsp[-4].nd), (yyvsp[-2].nd), TRUE);
(yyval.nd) = new_case_match(p, (yyvsp[-9].nd), cons(in_clause, (yyvsp[-1].nd)));
}
#line 9581 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 332: /* $@20: %empty */
#line 3411 "mrbgems/mruby-compiler/core/parse.y"
{COND_PUSH(1);}
#line 9587 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 333: /* $@21: %empty */
#line 3413 "mrbgems/mruby-compiler/core/parse.y"
{COND_POP();}
#line 9593 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 334: /* primary: "'for'" for_var "'in'" $@20 expr_value do $@21 compstmt "'end'" */
#line 3416 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_for(p, (yyvsp[-7].nd), (yyvsp[-4].nd), (yyvsp[-1].nd));
SET_LINENO((yyval.nd), (yyvsp[-8].num));
}
#line 9602 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 335: /* @22: %empty */
#line 3422 "mrbgems/mruby-compiler/core/parse.y"
{
if (p->in_def || p->in_single)
yyerror(&(yylsp[-2]), p, "class definition in method body");
(yyval.nd) = local_switch(p);
nvars_block(p);
}
#line 9613 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 336: /* primary: "'class'" cpath superclass @22 bodystmt "'end'" */
#line 3430 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_class(p, (yyvsp[-4].nd), (yyvsp[-3].nd), (yyvsp[-1].nd));
SET_LINENO((yyval.nd), (yyvsp[-5].num));
local_resume(p, (yyvsp[-2].nd));
nvars_unnest(p);
}
#line 9624 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 337: /* @23: %empty */
#line 3438 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.num) = p->in_def;
p->in_def = 0;
}
#line 9633 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 338: /* @24: %empty */
#line 3443 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = cons(local_switch(p), int_to_node(p->in_single));
nvars_block(p);
p->in_single = 0;
}
#line 9643 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 339: /* primary: "'class'" "<<" expr @23 term @24 bodystmt "'end'" */
#line 3450 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_sclass(p, (yyvsp[-5].nd), (yyvsp[-1].nd));
SET_LINENO((yyval.nd), (yyvsp[-7].num));
local_resume(p, (yyvsp[-2].nd)->car);
nvars_unnest(p);
p->in_def = (yyvsp[-4].num);
p->in_single = node_to_int((yyvsp[-2].nd)->cdr);
}
#line 9656 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 340: /* @25: %empty */
#line 3460 "mrbgems/mruby-compiler/core/parse.y"
{
if (p->in_def || p->in_single)
yyerror(&(yylsp[-1]), p, "module definition in method body");
(yyval.nd) = local_switch(p);
nvars_block(p);
}
#line 9667 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 341: /* primary: "'module'" cpath @25 bodystmt "'end'" */
#line 3468 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_module(p, (yyvsp[-3].nd), (yyvsp[-1].nd));
SET_LINENO((yyval.nd), (yyvsp[-4].num));
local_resume(p, (yyvsp[-2].nd));
nvars_unnest(p);
}
#line 9678 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 342: /* primary: defn_head f_arglist bodystmt "'end'" */
#line 3478 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-3].nd);
defn_setup(p, (yyval.nd), (yyvsp[-2].nd), (yyvsp[-1].nd));
nvars_unnest(p);
p->in_def--;
}
#line 9689 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 343: /* primary: defs_head f_arglist bodystmt "'end'" */
#line 3488 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-3].nd);
defn_setup(p, (yyval.nd), (yyvsp[-2].nd), (yyvsp[-1].nd));
nvars_unnest(p);
p->in_def--;
p->in_single--;
}
#line 9701 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 344: /* primary: "'break'" */
#line 3496 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_break(p, 0);
}
#line 9709 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 345: /* primary: "'next'" */
#line 3500 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_next(p, 0);
}
#line 9717 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 346: /* primary: "'redo'" */
#line 3504 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_redo(p);
}
#line 9725 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 347: /* primary: "'retry'" */
#line 3508 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_retry(p);
}
#line 9733 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 348: /* primary_value: primary */
#line 3514 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[0].nd);
if (!(yyval.nd)) (yyval.nd) = new_nil(p);
}
#line 9742 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 355: /* if_tail: "'elsif'" expr_value then compstmt if_tail */
#line 3533 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_if(p, cond((yyvsp[-3].nd)), (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 9750 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 357: /* opt_else: "'else'" compstmt */
#line 3540 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[0].nd);
}
#line 9758 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 358: /* for_var: lhs */
#line 3546 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1(list1((yyvsp[0].nd)));
}
#line 9766 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 360: /* f_margs: f_arg */
#line 3553 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list3((yyvsp[0].nd),0,0);
}
#line 9774 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 361: /* f_margs: f_arg ',' "*" f_norm_arg */
#line 3557 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list3((yyvsp[-3].nd), new_lvar(p, (yyvsp[0].id)), 0);
}
#line 9782 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 362: /* f_margs: f_arg ',' "*" f_norm_arg ',' f_arg */
#line 3561 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list3((yyvsp[-5].nd), new_lvar(p, (yyvsp[-2].id)), (yyvsp[0].nd));
}
#line 9790 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 363: /* f_margs: f_arg ',' "*" */
#line 3565 "mrbgems/mruby-compiler/core/parse.y"
{
local_add_f(p, intern_op(mul));
(yyval.nd) = list3((yyvsp[-2].nd), int_to_node(-1), 0);
}
#line 9799 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 364: /* f_margs: f_arg ',' "*" ',' f_arg */
#line 3570 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list3((yyvsp[-4].nd), int_to_node(-1), (yyvsp[0].nd));
}
#line 9807 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 365: /* f_margs: "*" f_norm_arg */
#line 3574 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list3(0, new_lvar(p, (yyvsp[0].id)), 0);
}
#line 9815 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 366: /* f_margs: "*" f_norm_arg ',' f_arg */
#line 3578 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list3(0, new_lvar(p, (yyvsp[-2].id)), (yyvsp[0].nd));
}
#line 9823 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 367: /* f_margs: "*" */
#line 3582 "mrbgems/mruby-compiler/core/parse.y"
{
local_add_f(p, intern_op(mul));
(yyval.nd) = list3(0, int_to_node(-1), 0);
}
#line 9832 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 368: /* $@26: %empty */
#line 3587 "mrbgems/mruby-compiler/core/parse.y"
{
local_add_f(p, intern_op(mul));
}
#line 9840 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 369: /* f_margs: "*" ',' $@26 f_arg */
#line 3591 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list3(0, int_to_node(-1), (yyvsp[0].nd));
}
#line 9848 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 370: /* block_args_tail: f_block_kwarg ',' f_kwrest opt_f_block_arg */
#line 3597 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_tail(p, (yyvsp[-3].nd), (yyvsp[-1].id), (yyvsp[0].id));
}
#line 9856 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 371: /* block_args_tail: f_block_kwarg opt_f_block_arg */
#line 3601 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_tail(p, (yyvsp[-1].nd), 0, (yyvsp[0].id));
}
#line 9864 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 372: /* block_args_tail: f_kwrest opt_f_block_arg */
#line 3605 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_tail(p, 0, (yyvsp[-1].id), (yyvsp[0].id));
}
#line 9872 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 373: /* block_args_tail: f_block_arg */
#line 3609 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_tail(p, 0, 0, (yyvsp[0].id));
}
#line 9880 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 374: /* opt_block_args_tail: ',' block_args_tail */
#line 3615 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[0].nd);
}
#line 9888 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 375: /* opt_block_args_tail: %empty */
#line 3619 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_tail(p, 0, 0, 0);
}
#line 9896 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 376: /* block_param: f_arg ',' f_block_optarg ',' f_rest_arg opt_block_args_tail */
#line 3625 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-5].nd), (yyvsp[-3].nd), (yyvsp[-1].id), 0, (yyvsp[0].nd));
}
#line 9904 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 377: /* block_param: f_arg ',' f_block_optarg ',' f_rest_arg ',' f_arg opt_block_args_tail */
#line 3629 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-7].nd), (yyvsp[-5].nd), (yyvsp[-3].id), (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 9912 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 378: /* block_param: f_arg ',' f_block_optarg opt_block_args_tail */
#line 3633 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-3].nd), (yyvsp[-1].nd), 0, 0, (yyvsp[0].nd));
}
#line 9920 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 379: /* block_param: f_arg ',' f_block_optarg ',' f_arg opt_block_args_tail */
#line 3637 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-5].nd), (yyvsp[-3].nd), 0, (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 9928 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 380: /* block_param: f_arg ',' f_rest_arg opt_block_args_tail */
#line 3641 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-3].nd), 0, (yyvsp[-1].id), 0, (yyvsp[0].nd));
}
#line 9936 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 381: /* block_param: f_arg ',' opt_block_args_tail */
#line 3645 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-2].nd), 0, 0, 0, (yyvsp[0].nd));
}
#line 9944 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 382: /* block_param: f_arg ',' f_rest_arg ',' f_arg opt_block_args_tail */
#line 3649 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-5].nd), 0, (yyvsp[-3].id), (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 9952 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 383: /* block_param: f_arg opt_block_args_tail */
#line 3653 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-1].nd), 0, 0, 0, (yyvsp[0].nd));
}
#line 9960 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 384: /* block_param: f_block_optarg ',' f_rest_arg opt_block_args_tail */
#line 3657 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, 0, (yyvsp[-3].nd), (yyvsp[-1].id), 0, (yyvsp[0].nd));
}
#line 9968 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 385: /* block_param: f_block_optarg ',' f_rest_arg ',' f_arg opt_block_args_tail */
#line 3661 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, 0, (yyvsp[-5].nd), (yyvsp[-3].id), (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 9976 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 386: /* block_param: f_block_optarg opt_block_args_tail */
#line 3665 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, 0, (yyvsp[-1].nd), 0, 0, (yyvsp[0].nd));
}
#line 9984 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 387: /* block_param: f_block_optarg ',' f_arg opt_block_args_tail */
#line 3669 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, 0, (yyvsp[-3].nd), 0, (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 9992 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 388: /* block_param: f_rest_arg opt_block_args_tail */
#line 3673 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, 0, 0, (yyvsp[-1].id), 0, (yyvsp[0].nd));
}
#line 10000 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 389: /* block_param: f_rest_arg ',' f_arg opt_block_args_tail */
#line 3677 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, 0, 0, (yyvsp[-3].id), (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 10008 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 390: /* block_param: block_args_tail */
#line 3681 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, 0, 0, 0, 0, (yyvsp[0].nd));
}
#line 10016 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 391: /* opt_block_param: none */
#line 3687 "mrbgems/mruby-compiler/core/parse.y"
{
local_add_blk(p);
(yyval.nd) = 0;
}
#line 10025 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 392: /* opt_block_param: block_param_def */
#line 3692 "mrbgems/mruby-compiler/core/parse.y"
{
p->cmd_start = TRUE;
(yyval.nd) = (yyvsp[0].nd);
}
#line 10034 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 393: /* $@27: %empty */
#line 3698 "mrbgems/mruby-compiler/core/parse.y"
{local_add_blk(p);}
#line 10040 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 394: /* block_param_def: '|' $@27 opt_bv_decl '|' */
#line 3699 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = 0;
}
#line 10048 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 395: /* block_param_def: "||" */
#line 3703 "mrbgems/mruby-compiler/core/parse.y"
{
local_add_blk(p);
(yyval.nd) = 0;
}
#line 10057 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 396: /* block_param_def: '|' block_param opt_bv_decl '|' */
#line 3708 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-2].nd);
}
#line 10065 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 397: /* opt_bv_decl: opt_nl */
#line 3714 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = 0;
}
#line 10073 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 398: /* opt_bv_decl: opt_nl ';' bv_decls opt_nl */
#line 3718 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = 0;
}
#line 10081 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 401: /* bvar: "local variable or method" */
#line 3728 "mrbgems/mruby-compiler/core/parse.y"
{
local_add_f(p, (yyvsp[0].id));
new_bv(p, (yyvsp[0].id));
}
#line 10090 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 403: /* f_larglist: '(' f_args opt_bv_decl ')' */
#line 3736 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-2].nd);
}
#line 10098 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 404: /* f_larglist: f_args */
#line 3740 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[0].nd);
}
#line 10106 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 405: /* lambda_body: tLAMBEG compstmt '}' */
#line 3746 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
}
#line 10114 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 406: /* lambda_body: "'do' for lambda" bodystmt "'end'" */
#line 3750 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
}
#line 10122 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 407: /* @28: %empty */
#line 3756 "mrbgems/mruby-compiler/core/parse.y"
{
local_nest(p);
nvars_nest(p);
(yyval.num) = p->lineno;
}
#line 10132 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 408: /* do_block: "'do' for block" @28 opt_block_param bodystmt "'end'" */
#line 3764 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_block(p,(yyvsp[-2].nd),(yyvsp[-1].nd));
SET_LINENO((yyval.nd), (yyvsp[-3].num));
local_unnest(p);
nvars_unnest(p);
}
#line 10143 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 409: /* block_call: command do_block */
#line 3773 "mrbgems/mruby-compiler/core/parse.y"
{
call_with_block(p, (yyvsp[-1].nd), (yyvsp[0].nd));
(yyval.nd) = (yyvsp[-1].nd);
}
#line 10152 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 410: /* block_call: block_call call_op2 operation2 opt_paren_args */
#line 3778 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-3].nd), (yyvsp[-1].id), (yyvsp[0].nd), (yyvsp[-2].num));
}
#line 10160 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 411: /* block_call: block_call call_op2 operation2 opt_paren_args brace_block */
#line 3782 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-4].nd), (yyvsp[-2].id), (yyvsp[-1].nd), (yyvsp[-3].num));
call_with_block(p, (yyval.nd), (yyvsp[0].nd));
}
#line 10169 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 412: /* block_call: block_call call_op2 operation2 command_args do_block */
#line 3787 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-4].nd), (yyvsp[-2].id), (yyvsp[-1].nd), (yyvsp[-3].num));
call_with_block(p, (yyval.nd), (yyvsp[0].nd));
}
#line 10178 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 413: /* method_call: operation paren_args */
#line 3794 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_fcall(p, (yyvsp[-1].id), (yyvsp[0].nd));
}
#line 10186 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 414: /* method_call: primary_value call_op operation2 opt_paren_args */
#line 3798 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-3].nd), (yyvsp[-1].id), (yyvsp[0].nd), (yyvsp[-2].num));
}
#line 10194 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 415: /* method_call: primary_value "::" operation2 paren_args */
#line 3802 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-3].nd), (yyvsp[-1].id), (yyvsp[0].nd), tCOLON2);
}
#line 10202 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 416: /* method_call: primary_value "::" operation3 */
#line 3806 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-2].nd), (yyvsp[0].id), 0, tCOLON2);
}
#line 10210 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 417: /* method_call: primary_value call_op paren_args */
#line 3810 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-2].nd), MRB_SYM(call), (yyvsp[0].nd), (yyvsp[-1].num));
}
#line 10218 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 418: /* method_call: primary_value "::" paren_args */
#line 3814 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-2].nd), MRB_SYM(call), (yyvsp[0].nd), tCOLON2);
}
#line 10226 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 419: /* method_call: "'super'" paren_args */
#line 3818 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_super(p, (yyvsp[0].nd));
}
#line 10234 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 420: /* method_call: "'super'" */
#line 3822 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_zsuper(p);
}
#line 10242 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 421: /* method_call: primary_value '[' opt_call_args ']' */
#line 3826 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_call(p, (yyvsp[-3].nd), intern_op(aref), (yyvsp[-1].nd), '.');
}
#line 10250 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 422: /* @29: %empty */
#line 3832 "mrbgems/mruby-compiler/core/parse.y"
{
local_nest(p);
nvars_nest(p);
(yyval.num) = p->lineno;
}
#line 10260 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 423: /* brace_block: '{' @29 opt_block_param compstmt '}' */
#line 3839 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_block(p,(yyvsp[-2].nd),(yyvsp[-1].nd));
SET_LINENO((yyval.nd), (yyvsp[-3].num));
local_unnest(p);
nvars_unnest(p);
}
#line 10271 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 424: /* @30: %empty */
#line 3846 "mrbgems/mruby-compiler/core/parse.y"
{
local_nest(p);
nvars_nest(p);
(yyval.num) = p->lineno;
}
#line 10281 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 425: /* brace_block: "'do'" @30 opt_block_param bodystmt "'end'" */
#line 3853 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_block(p,(yyvsp[-2].nd),(yyvsp[-1].nd));
SET_LINENO((yyval.nd), (yyvsp[-3].num));
local_unnest(p);
nvars_unnest(p);
}
#line 10292 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 426: /* case_body: "'when'" args then compstmt cases */
#line 3864 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = cons(cons((yyvsp[-3].nd), (yyvsp[-1].nd)), (yyvsp[0].nd));
}
#line 10300 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 427: /* cases: opt_else */
#line 3870 "mrbgems/mruby-compiler/core/parse.y"
{
if ((yyvsp[0].nd)) {
(yyval.nd) = cons(cons(0, (yyvsp[0].nd)), 0);
}
else {
(yyval.nd) = 0;
}
}
#line 10313 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 429: /* in_clauses: opt_else */
#line 3884 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[0].nd) ? list1(new_in(p, NULL, NULL, (yyvsp[0].nd), FALSE)) : 0;
}
#line 10321 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 430: /* $@31: %empty */
#line 3887 "mrbgems/mruby-compiler/core/parse.y"
{p->in_kwarg--;}
#line 10327 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 431: /* in_clauses: "'in'" p_expr $@31 then compstmt in_clauses */
#line 3888 "mrbgems/mruby-compiler/core/parse.y"
{
node *in_clause = new_in(p, (yyvsp[-4].nd), NULL, (yyvsp[-1].nd), FALSE);
(yyval.nd) = cons(in_clause, (yyvsp[0].nd));
}
#line 10336 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 432: /* $@32: %empty */
#line 3892 "mrbgems/mruby-compiler/core/parse.y"
{p->in_kwarg--;}
#line 10342 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 433: /* in_clauses: "'in'" p_expr $@32 "'if' modifier" expr_value then compstmt in_clauses */
#line 3893 "mrbgems/mruby-compiler/core/parse.y"
{
node *in_clause = new_in(p, (yyvsp[-6].nd), (yyvsp[-3].nd), (yyvsp[-1].nd), FALSE);
(yyval.nd) = cons(in_clause, (yyvsp[0].nd));
}
#line 10351 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 434: /* $@33: %empty */
#line 3897 "mrbgems/mruby-compiler/core/parse.y"
{p->in_kwarg--;}
#line 10357 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 435: /* in_clauses: "'in'" p_expr $@33 "'unless' modifier" expr_value then compstmt in_clauses */
#line 3898 "mrbgems/mruby-compiler/core/parse.y"
{
node *in_clause = new_in(p, (yyvsp[-6].nd), (yyvsp[-3].nd), (yyvsp[-1].nd), TRUE);
(yyval.nd) = cons(in_clause, (yyvsp[0].nd));
}
#line 10366 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 437: /* p_expr: p_args_head p_as */
#line 3909 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_array(p, push((yyvsp[-1].nd), (yyvsp[0].nd)), 0, 0);
}
#line 10374 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 438: /* p_expr: p_args_head p_rest */
#line 3913 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_array(p, (yyvsp[-1].nd), (yyvsp[0].nd), 0);
}
#line 10382 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 439: /* p_expr: p_args_head p_rest ',' p_args_post */
#line 3917 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_array(p, (yyvsp[-3].nd), (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 10390 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 440: /* p_expr: p_rest */
#line 3921 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_array(p, 0, (yyvsp[0].nd), 0);
}
#line 10398 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 441: /* p_expr: p_rest ',' p_args_post */
#line 3925 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_array(p, 0, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 10406 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 442: /* p_expr: p_hash_elems */
#line 3929 "mrbgems/mruby-compiler/core/parse.y"
{
/* Brace-less hash pattern: in a:, b: x */
(yyval.nd) = new_pat_hash(p, (yyvsp[0].nd), 0);
}
#line 10415 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 443: /* p_expr: p_hash_elems ',' p_kwrest */
#line 3934 "mrbgems/mruby-compiler/core/parse.y"
{
/* Brace-less hash pattern with kwrest: in a:, **rest */
(yyval.nd) = new_pat_hash(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 10424 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 444: /* p_expr: p_kwrest */
#line 3939 "mrbgems/mruby-compiler/core/parse.y"
{
/* Brace-less kwrest only: in **rest */
(yyval.nd) = new_pat_hash(p, 0, (yyvsp[0].nd));
}
#line 10433 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 445: /* p_args_head: p_as ',' */
#line 3947 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1((yyvsp[-1].nd));
}
#line 10441 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 446: /* p_args_head: p_args_head p_as ',' */
#line 3951 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-2].nd), (yyvsp[-1].nd));
}
#line 10449 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 447: /* p_args_post: p_as */
#line 3958 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 10457 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 448: /* p_args_post: p_args_post ',' p_as */
#line 3962 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 10465 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 450: /* p_as: p_alt "=>" "local variable or method" */
#line 3969 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_as(p, (yyvsp[-2].nd), (yyvsp[0].id));
}
#line 10473 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 452: /* p_alt: p_alt '|' p_value */
#line 3976 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_alt(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 10481 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 454: /* p_value: numeric */
#line 3983 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_value(p, (yyvsp[0].nd));
}
#line 10489 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 455: /* p_value: symbol */
#line 3987 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_value(p, (yyvsp[0].nd));
}
#line 10497 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 456: /* p_value: string */
#line 3991 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_value(p, new_str(p, (yyvsp[0].nd)));
}
#line 10505 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 457: /* p_value: "'nil'" */
#line 3995 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_value(p, new_nil(p));
}
#line 10513 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 458: /* p_value: "'true'" */
#line 3999 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_value(p, new_true(p));
}
#line 10521 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 459: /* p_value: "'false'" */
#line 4003 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_value(p, new_false(p));
}
#line 10529 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 460: /* p_value: p_const */
#line 4007 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_value(p, (yyvsp[0].nd));
}
#line 10537 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 463: /* p_value: '^' "local variable or method" */
#line 4013 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_pin(p, (yyvsp[0].id));
}
#line 10545 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 464: /* p_array: "[" p_array_body ']' */
#line 4020 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
}
#line 10553 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 465: /* p_array: "[" ']' */
#line 4024 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_array(p, 0, 0, 0);
}
#line 10561 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 466: /* p_array_body: p_array_elems */
#line 4031 "mrbgems/mruby-compiler/core/parse.y"
{
/* Just pre elements, no rest */
(yyval.nd) = new_pat_array(p, (yyvsp[0].nd), 0, 0);
}
#line 10570 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 467: /* p_array_body: p_array_elems ',' p_rest */
#line 4036 "mrbgems/mruby-compiler/core/parse.y"
{
/* Pre elements + rest, no post */
(yyval.nd) = new_pat_array(p, (yyvsp[-2].nd), (yyvsp[0].nd), 0);
}
#line 10579 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 468: /* p_array_body: p_array_elems ',' p_rest ',' p_array_elems */
#line 4041 "mrbgems/mruby-compiler/core/parse.y"
{
/* Pre + rest + post */
(yyval.nd) = new_pat_array(p, (yyvsp[-4].nd), (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 10588 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 469: /* p_array_body: p_rest */
#line 4046 "mrbgems/mruby-compiler/core/parse.y"
{
/* Just rest, no pre or post */
(yyval.nd) = new_pat_array(p, 0, (yyvsp[0].nd), 0);
}
#line 10597 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 470: /* p_array_body: p_rest ',' p_array_elems */
#line 4051 "mrbgems/mruby-compiler/core/parse.y"
{
/* Rest + post, no pre */
(yyval.nd) = new_pat_array(p, 0, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 10606 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 471: /* p_array_body: p_rest ',' p_array_elems ',' p_rest */
#line 4056 "mrbgems/mruby-compiler/core/parse.y"
{
/* Find pattern: [*pre, elems, *post] */
(yyval.nd) = new_pat_find(p, (yyvsp[-4].nd), (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 10615 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 472: /* p_array_elems: p_as */
#line 4064 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 10623 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 473: /* p_array_elems: p_array_elems ',' p_as */
#line 4068 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 10631 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 474: /* p_rest: "*" "local variable or method" */
#line 4075 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_var(p, (yyvsp[0].id));
}
#line 10639 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 475: /* p_rest: "*" */
#line 4079 "mrbgems/mruby-compiler/core/parse.y"
{
/* Anonymous rest pattern */
(yyval.nd) = (node*)-1;
}
#line 10648 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 476: /* p_const: "constant" */
#line 4087 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_const(p, (yyvsp[0].id));
}
#line 10656 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 477: /* p_const: p_const "::" "constant" */
#line 4091 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_colon2(p, (yyvsp[-2].nd), (yyvsp[0].id));
}
#line 10664 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 478: /* p_const: tCOLON3 "constant" */
#line 4095 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_colon3(p, (yyvsp[0].id));
}
#line 10672 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 479: /* p_hash: tLBRACE p_hash_body '}' */
#line 4102 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
}
#line 10680 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 480: /* p_hash: tLBRACE '}' */
#line 4106 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_hash(p, 0, 0);
}
#line 10688 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 481: /* p_hash_body: p_hash_elems */
#line 4113 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_hash(p, (yyvsp[0].nd), 0);
}
#line 10696 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 482: /* p_hash_body: p_hash_elems ',' p_kwrest */
#line 4117 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_hash(p, (yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 10704 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 483: /* p_hash_body: p_kwrest */
#line 4121 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_hash(p, 0, (yyvsp[0].nd));
}
#line 10712 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 484: /* p_hash_elems: p_hash_elem */
#line 4128 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 10720 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 485: /* p_hash_elems: p_hash_elems ',' p_hash_elem */
#line 4132 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 10728 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 486: /* p_hash_elem: "local variable or method" "label" p_as */
#line 4141 "mrbgems/mruby-compiler/core/parse.y"
{
/* {key: pattern} */
(yyval.nd) = cons(new_sym(p, (yyvsp[-2].id)), (yyvsp[0].nd));
}
#line 10737 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 487: /* p_hash_elem: "local variable or method" "label" */
#line 4146 "mrbgems/mruby-compiler/core/parse.y"
{
/* {key:} shorthand - binds to variable with same name */
(yyval.nd) = cons(new_sym(p, (yyvsp[-1].id)), new_pat_var(p, (yyvsp[-1].id)));
}
#line 10746 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 488: /* p_kwrest: "**" "local variable or method" */
#line 4154 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_var(p, (yyvsp[0].id));
}
#line 10754 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 489: /* p_kwrest: "**" "'nil'" */
#line 4158 "mrbgems/mruby-compiler/core/parse.y"
{
/* **nil - exact match, no extra keys allowed */
(yyval.nd) = (node*)-1;
}
#line 10763 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 490: /* p_kwrest: "**" */
#line 4163 "mrbgems/mruby-compiler/core/parse.y"
{
/* ** - anonymous rest, discards extra keys */
(yyval.nd) = (node*)-2;
}
#line 10772 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 491: /* p_var: "local variable or method" */
#line 4170 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_pat_var(p, (yyvsp[0].id));
}
#line 10780 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 492: /* opt_rescue: "'rescue'" exc_list exc_var then compstmt opt_rescue */
#line 4178 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1(list3((yyvsp[-4].nd), (yyvsp[-3].nd), (yyvsp[-1].nd)));
if ((yyvsp[0].nd)) (yyval.nd) = append((yyval.nd), (yyvsp[0].nd));
}
#line 10789 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 494: /* exc_list: arg */
#line 4186 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 10797 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 497: /* exc_var: "=>" lhs */
#line 4194 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[0].nd);
}
#line 10805 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 499: /* opt_ensure: "'ensure'" compstmt */
#line 4201 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[0].nd);
}
#line 10813 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 506: /* string: string string_fragment */
#line 4215 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = append((yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 10821 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 507: /* string_fragment: "character literal" */
#line 4221 "mrbgems/mruby-compiler/core/parse.y"
{
/* tCHAR is (len . str), wrap as cons list */
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 10830 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 508: /* string_fragment: tSTRING */
#line 4226 "mrbgems/mruby-compiler/core/parse.y"
{
/* tSTRING is (len . str), wrap as cons list */
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 10839 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 509: /* string_fragment: "string literal" tSTRING */
#line 4231 "mrbgems/mruby-compiler/core/parse.y"
{
/* $2 is (len . str), wrap as cons list */
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 10848 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 510: /* string_fragment: "string literal" string_rep tSTRING */
#line 4236 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 10856 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 512: /* string_rep: string_rep string_interp */
#line 4243 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = append((yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 10864 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 513: /* string_interp: tSTRING_MID */
#line 4249 "mrbgems/mruby-compiler/core/parse.y"
{
/* $1 is already in (len . str) format */
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 10873 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 514: /* @34: %empty */
#line 4254 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push_strterm(p);
}
#line 10881 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 515: /* string_interp: tSTRING_PART @34 compstmt '}' */
#line 4259 "mrbgems/mruby-compiler/core/parse.y"
{
pop_strterm(p,(yyvsp[-2].nd));
/* $1 is already in (len . str) format, create (-1 . node) for expression */
node *expr_elem = cons(int_to_node(-1), (yyvsp[-1].nd));
(yyval.nd) = list2((yyvsp[-3].nd), expr_elem);
}
#line 10892 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 516: /* string_interp: tLITERAL_DELIM */
#line 4266 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1(new_literal_delim(p));
}
#line 10900 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 517: /* string_interp: tHD_LITERAL_DELIM heredoc_bodies */
#line 4270 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1(new_literal_delim(p));
}
#line 10908 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 518: /* xstring: tXSTRING_BEG tXSTRING */
#line 4276 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = cons((yyvsp[0].nd), (node*)NULL);
}
#line 10916 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 519: /* xstring: tXSTRING_BEG string_rep tXSTRING */
#line 4280 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 10924 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 520: /* regexp: tREGEXP_BEG tREGEXP */
#line 4286 "mrbgems/mruby-compiler/core/parse.y"
{
node *data = (yyvsp[0].nd); /* ((len . pattern) . (flags . encoding)) */
const char *flags = (const char*)data->cdr->car;
const char *encoding = (const char*)data->cdr->cdr;
/* Use data->car directly as pattern_list: (len . pattern) */
node *pattern_list = cons(data->car, (node*)NULL);
(yyval.nd) = new_regx(p, pattern_list, flags, encoding);
}
#line 10937 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 521: /* regexp: tREGEXP_BEG string_rep tREGEXP */
#line 4295 "mrbgems/mruby-compiler/core/parse.y"
{
node *data = (yyvsp[0].nd); /* ((len . pattern) . (flags . encoding)) */
const char *flags = (const char*)data->cdr->car;
const char *encoding = (const char*)data->cdr->cdr;
/* Append the pattern from $3->car to the string list $2 */
node *complete_list = push((yyvsp[-1].nd), data->car);
(yyval.nd) = new_regx(p, complete_list, flags, encoding);
}
#line 10950 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 525: /* heredoc_body: tHEREDOC_END */
#line 4313 "mrbgems/mruby-compiler/core/parse.y"
{
parser_heredoc_info *info = parsing_heredoc_info(p);
info->doc = push(info->doc, new_str_empty(p));
heredoc_end(p);
}
#line 10960 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 526: /* heredoc_body: heredoc_string_rep tHEREDOC_END */
#line 4319 "mrbgems/mruby-compiler/core/parse.y"
{
heredoc_end(p);
}
#line 10968 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 529: /* heredoc_string_interp: tHD_STRING_MID */
#line 4329 "mrbgems/mruby-compiler/core/parse.y"
{
parser_heredoc_info *info = parsing_heredoc_info(p);
info->doc = push(info->doc, (yyvsp[0].nd));
heredoc_treat_nextline(p);
}
#line 10978 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 530: /* @35: %empty */
#line 4335 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push_strterm(p);
}
#line 10986 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 531: /* heredoc_string_interp: tHD_STRING_PART @35 compstmt '}' */
#line 4340 "mrbgems/mruby-compiler/core/parse.y"
{
pop_strterm(p, (yyvsp[-2].nd));
parser_heredoc_info *info = parsing_heredoc_info(p);
/* $1 is already in (len . str) format, create (-1 . node) for expression */
node *expr_elem = cons(int_to_node(-1), (yyvsp[-1].nd));
info->doc = push(push(info->doc, (yyvsp[-3].nd)), expr_elem);
}
#line 10998 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 532: /* words: tWORDS_BEG tSTRING */
#line 4350 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_words(p, list1((yyvsp[0].nd)));
}
#line 11006 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 533: /* words: tWORDS_BEG string_rep tSTRING */
#line 4354 "mrbgems/mruby-compiler/core/parse.y"
{
node *n = (yyvsp[-1].nd);
n = push(n, (yyvsp[0].nd));
(yyval.nd) = new_words(p, n);
}
#line 11016 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 534: /* symbol: basic_symbol */
#line 4362 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_sym(p, (yyvsp[0].id));
}
#line 11024 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 535: /* symbol: "symbol" "string literal" string_rep tSTRING */
#line 4366 "mrbgems/mruby-compiler/core/parse.y"
{
node *n = (yyvsp[-1].nd);
p->lstate = EXPR_ENDARG;
if (node_to_int((yyvsp[0].nd)->car) > 0) {
n = push(n, (yyvsp[0].nd));
}
else {
cons_free((yyvsp[0].nd));
}
(yyval.nd) = new_dsym(p, n);
}
#line 11040 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 536: /* symbol: "symbol" "numbered parameter" */
#line 4378 "mrbgems/mruby-compiler/core/parse.y"
{
mrb_sym sym = intern_numparam((yyvsp[0].num));
(yyval.nd) = new_sym(p, sym);
}
#line 11049 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 537: /* basic_symbol: "symbol" sym */
#line 4385 "mrbgems/mruby-compiler/core/parse.y"
{
p->lstate = EXPR_END;
(yyval.id) = (yyvsp[0].id);
}
#line 11058 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 542: /* sym: tSTRING */
#line 4396 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.id) = new_strsym(p, (yyvsp[0].nd));
}
#line 11066 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 543: /* sym: "string literal" tSTRING */
#line 4400 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.id) = new_strsym(p, (yyvsp[0].nd));
}
#line 11074 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 544: /* symbols: tSYMBOLS_BEG tSTRING */
#line 4406 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_symbols(p, list1((yyvsp[0].nd)));
}
#line 11082 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 545: /* symbols: tSYMBOLS_BEG string_rep tSTRING */
#line 4410 "mrbgems/mruby-compiler/core/parse.y"
{
node *n = (yyvsp[-1].nd);
n = push(n, (yyvsp[0].nd));
(yyval.nd) = new_symbols(p, n);
}
#line 11092 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 548: /* numeric: tUMINUS_NUM "integer literal" */
#line 4420 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_negate(p, (yyvsp[0].nd));
}
#line 11100 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 549: /* numeric: tUMINUS_NUM "float literal" */
#line 4424 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_negate(p, (yyvsp[0].nd));
}
#line 11108 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 550: /* variable: "local variable or method" */
#line 4430 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_lvar(p, (yyvsp[0].id));
}
#line 11116 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 551: /* variable: "instance variable" */
#line 4434 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_ivar(p, (yyvsp[0].id));
}
#line 11124 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 552: /* variable: "global variable" */
#line 4438 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_gvar(p, (yyvsp[0].id));
}
#line 11132 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 553: /* variable: "class variable" */
#line 4442 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_cvar(p, (yyvsp[0].id));
}
#line 11140 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 554: /* variable: "constant" */
#line 4446 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_const(p, (yyvsp[0].id));
}
#line 11148 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 555: /* var_lhs: variable */
#line 4452 "mrbgems/mruby-compiler/core/parse.y"
{
assignable(p, (yyvsp[0].nd));
}
#line 11156 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 556: /* var_lhs: "numbered parameter" */
#line 4456 "mrbgems/mruby-compiler/core/parse.y"
{
yyerror(&(yylsp[0]), p, "can't assign to numbered parameter");
}
#line 11164 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 557: /* var_ref: variable */
#line 4462 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = var_reference(p, (yyvsp[0].nd));
}
#line 11172 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 558: /* var_ref: "numbered parameter" */
#line 4466 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_nvar(p, (yyvsp[0].num));
}
#line 11180 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 559: /* var_ref: "'nil'" */
#line 4470 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_nil(p);
}
#line 11188 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 560: /* var_ref: "'self'" */
#line 4474 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_self(p);
}
#line 11196 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 561: /* var_ref: "'true'" */
#line 4478 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_true(p);
}
#line 11204 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 562: /* var_ref: "'false'" */
#line 4482 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_false(p);
}
#line 11212 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 563: /* var_ref: "'__FILE__'" */
#line 4486 "mrbgems/mruby-compiler/core/parse.y"
{
const char *fn = mrb_sym_name_len(p->mrb, p->filename_sym, NULL);
if (!fn) {
fn = "(null)";
}
(yyval.nd) = new_str(p, cons(cons(int_to_node(strlen(fn)), (node*)fn), (node*)NULL));
}
#line 11224 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 564: /* var_ref: "'__LINE__'" */
#line 4494 "mrbgems/mruby-compiler/core/parse.y"
{
char buf[16];
dump_int(p->lineno, buf);
(yyval.nd) = new_int(p, buf, 10, 0);
}
#line 11235 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 565: /* var_ref: "'__ENCODING__'" */
#line 4501 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_fcall(p, MRB_SYM(__ENCODING__), 0);
}
#line 11243 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 568: /* superclass: %empty */
#line 4511 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = 0;
}
#line 11251 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 569: /* $@36: %empty */
#line 4515 "mrbgems/mruby-compiler/core/parse.y"
{
p->lstate = EXPR_BEG;
p->cmd_start = TRUE;
}
#line 11260 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 570: /* superclass: '<' $@36 expr_value term */
#line 4520 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
}
#line 11268 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 573: /* f_arglist_paren: '(' f_args rparen */
#line 4536 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
p->lstate = EXPR_BEG;
p->cmd_start = TRUE;
}
#line 11278 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 574: /* f_arglist_paren: '(' f_arg ',' tBDOT3 rparen */
#line 4542 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_dots(p, (yyvsp[-3].nd));
}
#line 11286 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 575: /* f_arglist_paren: '(' tBDOT3 rparen */
#line 4546 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_dots(p, 0);
}
#line 11294 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 577: /* f_arglist: f_args term */
#line 4553 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
}
#line 11302 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 578: /* f_arglist: f_arg ',' tBDOT3 term */
#line 4557 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_dots(p, (yyvsp[-3].nd));
}
#line 11310 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 579: /* f_arglist: "..." term */
#line 4561 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_dots(p, 0);
}
#line 11318 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 580: /* f_label: "local variable or method" "label" */
#line 4567 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.id) = (yyvsp[-1].id);
local_nest(p);
p->lstate = EXPR_MID; /* make newlines significant after label */
}
#line 11328 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 581: /* f_label: "numbered parameter" "label" */
#line 4573 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.id) = intern_numparam((yyvsp[-1].num));
local_nest(p);
p->lstate = EXPR_MID; /* make newlines significant after label */
}
#line 11338 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 582: /* f_kw: f_label arg */
#line 4581 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[0].nd));
(yyval.nd) = new_kw_arg(p, (yyvsp[-1].id), cons((yyvsp[0].nd), locals_node(p)));
local_unnest(p);
}
#line 11348 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 583: /* f_kw: f_label */
#line 4587 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_kw_arg(p, (yyvsp[0].id), 0);
local_unnest(p);
}
#line 11357 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 584: /* f_block_kw: f_label primary_value */
#line 4594 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[0].nd));
(yyval.nd) = new_kw_arg(p, (yyvsp[-1].id), cons((yyvsp[0].nd), locals_node(p)));
local_unnest(p);
}
#line 11367 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 585: /* f_block_kw: f_label */
#line 4600 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_kw_arg(p, (yyvsp[0].id), 0);
local_unnest(p);
}
#line 11376 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 586: /* f_block_kwarg: f_block_kw */
#line 4607 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 11384 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 587: /* f_block_kwarg: f_block_kwarg ',' f_block_kw */
#line 4611 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 11392 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 588: /* f_kwarg: f_kw */
#line 4617 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 11400 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 589: /* f_kwarg: f_kwarg ',' f_kw */
#line 4621 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 11408 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 592: /* f_kwrest: kwrest_mark "local variable or method" */
#line 4631 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.id) = (yyvsp[0].id);
}
#line 11416 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 593: /* f_kwrest: kwrest_mark */
#line 4635 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.id) = intern_op(pow);
}
#line 11424 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 594: /* args_tail: f_kwarg ',' f_kwrest opt_f_block_arg */
#line 4641 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_tail(p, (yyvsp[-3].nd), (yyvsp[-1].id), (yyvsp[0].id));
}
#line 11432 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 595: /* args_tail: f_kwarg opt_f_block_arg */
#line 4645 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_tail(p, (yyvsp[-1].nd), 0, (yyvsp[0].id));
}
#line 11440 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 596: /* args_tail: f_kwrest opt_f_block_arg */
#line 4649 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_tail(p, 0, (yyvsp[-1].id), (yyvsp[0].id));
}
#line 11448 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 597: /* args_tail: f_block_arg */
#line 4653 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_tail(p, 0, 0, (yyvsp[0].id));
}
#line 11456 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 598: /* opt_args_tail: ',' args_tail */
#line 4659 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[0].nd);
}
#line 11464 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 599: /* opt_args_tail: ',' */
#line 4663 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_tail(p, 0, 0, 0);
}
#line 11472 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 600: /* opt_args_tail: %empty */
#line 4667 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args_tail(p, 0, 0, 0);
}
#line 11480 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 601: /* f_args: f_arg ',' f_optarg ',' f_rest_arg opt_args_tail */
#line 4673 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-5].nd), (yyvsp[-3].nd), (yyvsp[-1].id), 0, (yyvsp[0].nd));
}
#line 11488 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 602: /* f_args: f_arg ',' f_optarg ',' f_rest_arg ',' f_arg opt_args_tail */
#line 4677 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-7].nd), (yyvsp[-5].nd), (yyvsp[-3].id), (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 11496 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 603: /* f_args: f_arg ',' f_optarg opt_args_tail */
#line 4681 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-3].nd), (yyvsp[-1].nd), 0, 0, (yyvsp[0].nd));
}
#line 11504 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 604: /* f_args: f_arg ',' f_optarg ',' f_arg opt_args_tail */
#line 4685 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-5].nd), (yyvsp[-3].nd), 0, (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 11512 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 605: /* f_args: f_arg ',' f_rest_arg opt_args_tail */
#line 4689 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-3].nd), 0, (yyvsp[-1].id), 0, (yyvsp[0].nd));
}
#line 11520 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 606: /* f_args: f_arg ',' f_rest_arg ',' f_arg opt_args_tail */
#line 4693 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-5].nd), 0, (yyvsp[-3].id), (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 11528 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 607: /* f_args: f_arg opt_args_tail */
#line 4697 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, (yyvsp[-1].nd), 0, 0, 0, (yyvsp[0].nd));
}
#line 11536 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 608: /* f_args: f_optarg ',' f_rest_arg opt_args_tail */
#line 4701 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, 0, (yyvsp[-3].nd), (yyvsp[-1].id), 0, (yyvsp[0].nd));
}
#line 11544 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 609: /* f_args: f_optarg ',' f_rest_arg ',' f_arg opt_args_tail */
#line 4705 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, 0, (yyvsp[-5].nd), (yyvsp[-3].id), (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 11552 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 610: /* f_args: f_optarg opt_args_tail */
#line 4709 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, 0, (yyvsp[-1].nd), 0, 0, (yyvsp[0].nd));
}
#line 11560 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 611: /* f_args: f_optarg ',' f_arg opt_args_tail */
#line 4713 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, 0, (yyvsp[-3].nd), 0, (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 11568 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 612: /* f_args: f_rest_arg opt_args_tail */
#line 4717 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, 0, 0, (yyvsp[-1].id), 0, (yyvsp[0].nd));
}
#line 11576 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 613: /* f_args: f_rest_arg ',' f_arg opt_args_tail */
#line 4721 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, 0, 0, (yyvsp[-3].id), (yyvsp[-1].nd), (yyvsp[0].nd));
}
#line 11584 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 614: /* f_args: args_tail */
#line 4725 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_args(p, 0, 0, 0, 0, (yyvsp[0].nd));
}
#line 11592 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 615: /* f_args: %empty */
#line 4729 "mrbgems/mruby-compiler/core/parse.y"
{
local_add_f(p, 0);
(yyval.nd) = new_args(p, 0, 0, 0, 0, 0);
}
#line 11601 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 616: /* f_bad_arg: "constant" */
#line 4736 "mrbgems/mruby-compiler/core/parse.y"
{
yyerror(&(yylsp[0]), p, "formal argument cannot be a constant");
(yyval.nd) = 0;
}
#line 11610 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 617: /* f_bad_arg: "instance variable" */
#line 4741 "mrbgems/mruby-compiler/core/parse.y"
{
yyerror(&(yylsp[0]), p, "formal argument cannot be an instance variable");
(yyval.nd) = 0;
}
#line 11619 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 618: /* f_bad_arg: "global variable" */
#line 4746 "mrbgems/mruby-compiler/core/parse.y"
{
yyerror(&(yylsp[0]), p, "formal argument cannot be a global variable");
(yyval.nd) = 0;
}
#line 11628 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 619: /* f_bad_arg: "class variable" */
#line 4751 "mrbgems/mruby-compiler/core/parse.y"
{
yyerror(&(yylsp[0]), p, "formal argument cannot be a class variable");
(yyval.nd) = 0;
}
#line 11637 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 620: /* f_bad_arg: "numbered parameter" */
#line 4756 "mrbgems/mruby-compiler/core/parse.y"
{
yyerror(&(yylsp[0]), p, "formal argument cannot be a numbered parameter");
(yyval.nd) = 0;
}
#line 11646 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 621: /* f_norm_arg: f_bad_arg */
#line 4763 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.id) = 0;
}
#line 11654 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 622: /* f_norm_arg: "local variable or method" */
#line 4767 "mrbgems/mruby-compiler/core/parse.y"
{
local_add_f(p, (yyvsp[0].id));
(yyval.id) = (yyvsp[0].id);
}
#line 11663 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 623: /* f_arg_item: f_norm_arg */
#line 4774 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_lvar(p, (yyvsp[0].id));
}
#line 11671 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 624: /* @37: %empty */
#line 4778 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = local_switch(p);
}
#line 11679 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 625: /* f_arg_item: tLPAREN @37 f_margs rparen */
#line 4782 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = new_marg(p, (yyvsp[-1].nd));
local_resume(p, (yyvsp[-2].nd));
local_add_f(p, 0);
}
#line 11689 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 626: /* f_arg: f_arg_item */
#line 4790 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 11697 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 627: /* f_arg: f_arg ',' f_arg_item */
#line 4794 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 11705 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 628: /* f_opt_asgn: "local variable or method" '=' */
#line 4800 "mrbgems/mruby-compiler/core/parse.y"
{
local_add_f(p, (yyvsp[-1].id));
local_nest(p);
(yyval.id) = (yyvsp[-1].id);
}
#line 11715 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 629: /* f_opt: f_opt_asgn arg */
#line 4808 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[0].nd));
(yyval.nd) = cons(sym_to_node((yyvsp[-1].id)), cons((yyvsp[0].nd), locals_node(p)));
local_unnest(p);
}
#line 11725 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 630: /* f_block_opt: f_opt_asgn primary_value */
#line 4816 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[0].nd));
(yyval.nd) = cons(sym_to_node((yyvsp[-1].id)), cons((yyvsp[0].nd), locals_node(p)));
local_unnest(p);
}
#line 11735 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 631: /* f_block_optarg: f_block_opt */
#line 4824 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 11743 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 632: /* f_block_optarg: f_block_optarg ',' f_block_opt */
#line 4828 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 11751 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 633: /* f_optarg: f_opt */
#line 4834 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 11759 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 634: /* f_optarg: f_optarg ',' f_opt */
#line 4838 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 11767 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 637: /* f_rest_arg: restarg_mark "local variable or method" */
#line 4848 "mrbgems/mruby-compiler/core/parse.y"
{
local_add_f(p, (yyvsp[0].id));
(yyval.id) = (yyvsp[0].id);
}
#line 11776 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 638: /* f_rest_arg: restarg_mark */
#line 4853 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.id) = intern_op(mul);
local_add_f(p, (yyval.id));
}
#line 11785 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 641: /* f_block_arg: blkarg_mark "local variable or method" */
#line 4864 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.id) = (yyvsp[0].id);
}
#line 11793 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 642: /* f_block_arg: blkarg_mark "'nil'" */
#line 4868 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.id) = MRB_SYM(nil);
}
#line 11801 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 643: /* f_block_arg: blkarg_mark */
#line 4872 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.id) = intern_op(and);
}
#line 11809 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 644: /* opt_f_block_arg: ',' f_block_arg */
#line 4878 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.id) = (yyvsp[0].id);
}
#line 11817 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 645: /* opt_f_block_arg: ',' */
#line 4882 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.id) = 0;
}
#line 11825 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 646: /* opt_f_block_arg: none */
#line 4886 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.id) = 0;
}
#line 11833 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 647: /* singleton: var_ref */
#line 4892 "mrbgems/mruby-compiler/core/parse.y"
{
prohibit_literals(p, (yyvsp[0].nd));
(yyval.nd) = (yyvsp[0].nd);
if (!(yyval.nd)) (yyval.nd) = new_nil(p);
}
#line 11843 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 648: /* $@38: %empty */
#line 4897 "mrbgems/mruby-compiler/core/parse.y"
{p->lstate = EXPR_BEG;}
#line 11849 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 649: /* singleton: '(' $@38 expr rparen */
#line 4898 "mrbgems/mruby-compiler/core/parse.y"
{
prohibit_literals(p, (yyvsp[-1].nd));
(yyval.nd) = (yyvsp[-1].nd);
}
#line 11858 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 651: /* assoc_list: assocs trailer */
#line 4906 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = (yyvsp[-1].nd);
}
#line 11866 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 652: /* assocs: assoc */
#line 4912 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = list1((yyvsp[0].nd));
}
#line 11874 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 653: /* assocs: assocs comma assoc */
#line 4916 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = push((yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 11882 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 654: /* assoc: arg "=>" arg */
#line 4922 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[-2].nd));
void_expr_error(p, (yyvsp[0].nd));
(yyval.nd) = cons((yyvsp[-2].nd), (yyvsp[0].nd));
}
#line 11892 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 655: /* assoc: "local variable or method" "label" arg */
#line 4928 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[0].nd));
(yyval.nd) = cons(new_sym(p, (yyvsp[-2].id)), (yyvsp[0].nd));
}
#line 11901 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 656: /* assoc: "local variable or method" "label" */
#line 4933 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = cons(new_sym(p, (yyvsp[-1].id)), label_reference(p, (yyvsp[-1].id)));
}
#line 11909 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 657: /* assoc: "numbered parameter" "label" */
#line 4937 "mrbgems/mruby-compiler/core/parse.y"
{
mrb_sym sym = intern_numparam((yyvsp[-1].num));
(yyval.nd) = cons(new_sym(p, sym), label_reference(p, sym));
}
#line 11918 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 658: /* assoc: "numbered parameter" "label" arg */
#line 4942 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[0].nd));
(yyval.nd) = cons(new_sym(p, intern_numparam((yyvsp[-2].num))), (yyvsp[0].nd));
}
#line 11927 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 659: /* assoc: string_fragment "label" arg */
#line 4947 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[0].nd));
if ((yyvsp[-2].nd)->cdr) {
/* Multiple fragments - create dynamic symbol */
(yyval.nd) = cons(new_dsym(p, (yyvsp[-2].nd)), (yyvsp[0].nd));
}
else if (node_to_int((yyvsp[-2].nd)->car->car) < 0) {
/* Single fragment but it's an expression (-1 . node) - create dynamic symbol */
(yyval.nd) = cons(new_dsym(p, (yyvsp[-2].nd)), (yyvsp[0].nd));
}
else {
/* Single string fragment - create simple symbol */
(yyval.nd) = cons(new_sym(p, new_strsym(p, (yyvsp[-2].nd)->car)), (yyvsp[0].nd));
}
}
#line 11947 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 660: /* assoc: "**" arg */
#line 4963 "mrbgems/mruby-compiler/core/parse.y"
{
void_expr_error(p, (yyvsp[0].nd));
(yyval.nd) = cons(new_kw_rest_args(p, 0), (yyvsp[0].nd));
}
#line 11956 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 661: /* assoc: "**" */
#line 4968 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = cons(new_kw_rest_args(p, 0), new_lvar(p, intern_op(pow)));
}
#line 11964 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 674: /* call_op: '.' */
#line 4994 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.num) = '.';
}
#line 11972 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 675: /* call_op: "&." */
#line 4998 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.num) = 0;
}
#line 11980 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 677: /* call_op2: "::" */
#line 5005 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.num) = tCOLON2;
}
#line 11988 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 686: /* term: ';' */
#line 5026 "mrbgems/mruby-compiler/core/parse.y"
{yyerrok;}
#line 11994 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 688: /* nl: '\n' */
#line 5031 "mrbgems/mruby-compiler/core/parse.y"
{
p->lineno += (yyvsp[0].num);
p->column = 0;
}
#line 12003 "mrbgems/mruby-compiler/core/y.tab.c"
break;
case 692: /* none: %empty */
#line 5043 "mrbgems/mruby-compiler/core/parse.y"
{
(yyval.nd) = 0;
}
#line 12011 "mrbgems/mruby-compiler/core/y.tab.c"
break;
#line 12015 "mrbgems/mruby-compiler/core/y.tab.c"
default: break;
}
/* User semantic actions sometimes alter yychar, and that requires
that yytoken be updated with the new translation. We take the
approach of translating immediately before every use of yytoken.
One alternative is translating here after every semantic action,
but that translation would be missed if the semantic action invokes
YYABORT, YYACCEPT, or YYERROR immediately after altering yychar or
if it invokes YYBACKUP. In the case of YYABORT or YYACCEPT, an
incorrect destructor might then be invoked immediately. In the
case of YYERROR or YYBACKUP, subsequent parser actions might lead
to an incorrect destructor call or verbose syntax error message
before the lookahead is translated. */
YY_SYMBOL_PRINT ("-> $$ =", YY_CAST (yysymbol_kind_t, yyr1[yyn]), &yyval, &yyloc, p);
YYPOPSTACK (yylen);
yylen = 0;
*++yyvsp = yyval;
*++yylsp = yyloc;
/* Now 'shift' the result of the reduction. Determine what state
that goes to, based on the state we popped back to and the rule
number reduced by. */
{
const int yylhs = yyr1[yyn] - YYNTOKENS;
const int yyi = yypgoto[yylhs] + *yyssp;
yystate = (0 <= yyi && yyi <= YYLAST && yycheck[yyi] == *yyssp
? yytable[yyi]
: yydefgoto[yylhs]);
}
goto yynewstate;
/*--------------------------------------.
| yyerrlab -- here on detecting error. |
`--------------------------------------*/
yyerrlab:
/* Make sure we have latest lookahead translation. See comments at
user semantic actions for why this is necessary. */
yytoken = yychar == YYEMPTY ? YYSYMBOL_YYEMPTY : YYTRANSLATE (yychar);
/* If not already recovering from an error, report this error. */
if (!yyerrstatus)
{
++yynerrs;
{
yypcontext_t yyctx
= {yyssp, yytoken, &yylloc};
char const *yymsgp = YY_("syntax error");
int yysyntax_error_status;
yysyntax_error_status = yysyntax_error (&yymsg_alloc, &yymsg, &yyctx, p);
if (yysyntax_error_status == 0)
yymsgp = yymsg;
else if (yysyntax_error_status == -1)
{
if (yymsg != yymsgbuf)
YYSTACK_FREE (yymsg);
yymsg = YY_CAST (char *,
YYSTACK_ALLOC (YY_CAST (YYSIZE_T, yymsg_alloc)));
if (yymsg)
{
yysyntax_error_status
= yysyntax_error (&yymsg_alloc, &yymsg, &yyctx, p);
yymsgp = yymsg;
}
else
{
yymsg = yymsgbuf;
yymsg_alloc = sizeof yymsgbuf;
yysyntax_error_status = YYENOMEM;
}
}
yyerror (&yylloc, p, yymsgp);
if (yysyntax_error_status == YYENOMEM)
YYNOMEM;
}
}
yyerror_range[1] = yylloc;
if (yyerrstatus == 3)
{
/* If just tried and failed to reuse lookahead token after an
error, discard it. */
if (yychar <= YYEOF)
{
/* Return failure if at end of input. */
if (yychar == YYEOF)
YYABORT;
}
else
{
yydestruct ("Error: discarding",
yytoken, &yylval, &yylloc, p);
yychar = YYEMPTY;
}
}
/* Else will try to reuse lookahead token after shifting the error
token. */
goto yyerrlab1;
/*---------------------------------------------------.
| yyerrorlab -- error raised explicitly by YYERROR. |
`---------------------------------------------------*/
yyerrorlab:
/* Pacify compilers when the user code never invokes YYERROR and the
label yyerrorlab therefore never appears in user code. */
if (0)
YYERROR;
++yynerrs;
/* Do not reclaim the symbols of the rule whose action triggered
this YYERROR. */
YYPOPSTACK (yylen);
yylen = 0;
YY_STACK_PRINT (yyss, yyssp, p);
yystate = *yyssp;
goto yyerrlab1;
/*-------------------------------------------------------------.
| yyerrlab1 -- common code for both syntax error and YYERROR. |
`-------------------------------------------------------------*/
yyerrlab1:
yyerrstatus = 3; /* Each real token shifted decrements this. */
/* Pop stack until we find a state that shifts the error token. */
for (;;)
{
yyn = yypact[yystate];
if (!yypact_value_is_default (yyn))
{
yyn += YYSYMBOL_YYerror;
if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYSYMBOL_YYerror)
{
yyn = yytable[yyn];
if (0 < yyn)
break;
}
}
/* Pop the current state because it cannot handle the error token. */
if (yyssp == yyss)
YYABORT;
yyerror_range[1] = *yylsp;
yydestruct ("Error: popping",
YY_ACCESSING_SYMBOL (yystate), yyvsp, yylsp, p);
YYPOPSTACK (1);
yystate = *yyssp;
YY_STACK_PRINT (yyss, yyssp, p);
}
YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
*++yyvsp = yylval;
YY_IGNORE_MAYBE_UNINITIALIZED_END
yyerror_range[2] = yylloc;
++yylsp;
YYLLOC_DEFAULT (*yylsp, yyerror_range, 2);
/* Shift the error token. */
YY_SYMBOL_PRINT ("Shifting", YY_ACCESSING_SYMBOL (yyn), yyvsp, yylsp, p);
yystate = yyn;
goto yynewstate;
/*-------------------------------------.
| yyacceptlab -- YYACCEPT comes here. |
`-------------------------------------*/
yyacceptlab:
yyresult = 0;
goto yyreturnlab;
/*-----------------------------------.
| yyabortlab -- YYABORT comes here. |
`-----------------------------------*/
yyabortlab:
yyresult = 1;
goto yyreturnlab;
/*-----------------------------------------------------------.
| yyexhaustedlab -- YYNOMEM (memory exhaustion) comes here. |
`-----------------------------------------------------------*/
yyexhaustedlab:
yyerror (&yylloc, p, YY_("memory exhausted"));
yyresult = 2;
goto yyreturnlab;
/*----------------------------------------------------------.
| yyreturnlab -- parsing is finished, clean up and return. |
`----------------------------------------------------------*/
yyreturnlab:
if (yychar != YYEMPTY)
{
/* Make sure we have latest lookahead translation. See comments at
user semantic actions for why this is necessary. */
yytoken = YYTRANSLATE (yychar);
yydestruct ("Cleanup: discarding lookahead",
yytoken, &yylval, &yylloc, p);
}
/* Do not reclaim the symbols of the rule whose action triggered
this YYABORT or YYACCEPT. */
YYPOPSTACK (yylen);
YY_STACK_PRINT (yyss, yyssp, p);
while (yyssp != yyss)
{
yydestruct ("Cleanup: popping",
YY_ACCESSING_SYMBOL (+*yyssp), yyvsp, yylsp, p);
YYPOPSTACK (1);
}
#ifndef yyoverflow
if (yyss != yyssa)
YYSTACK_FREE (yyss);
#endif
if (yymsg != yymsgbuf)
YYSTACK_FREE (yymsg);
return yyresult;
}
#line 5047 "mrbgems/mruby-compiler/core/parse.y"
#define pylval (*((YYSTYPE*)(p->ylval)))
static void
yyerror(void *lp, parser_state *p, const char *s)
{
char* c;
size_t n;
if (! p->capture_errors) {
#ifndef MRB_NO_STDIO
if (p->filename_sym) {
const char *filename = mrb_sym_name_len(p->mrb, p->filename_sym, NULL);
fprintf(stderr, "%s:%d:%d: %s\n", filename, p->lineno, p->column, s);
}
else {
fprintf(stderr, "line %d:%d: %s\n", p->lineno, p->column, s);
}
#endif
}
else if (p->nerr < sizeof(p->error_buffer) / sizeof(p->error_buffer[0])) {
n = strlen(s);
c = (char*)parser_palloc(p, n + 1);
memcpy(c, s, n + 1);
p->error_buffer[p->nerr].message = c;
p->error_buffer[p->nerr].lineno = p->lineno;
p->error_buffer[p->nerr].column = p->column;
}
p->nerr++;
}
static void
yyerror_c(parser_state *p, const char *msg, char c)
{
char buf[256];
strncpy(buf, msg, sizeof(buf) - 2);
buf[sizeof(buf) - 2] = '\0';
strncat(buf, &c, 1);
yyerror(NULL, p, buf);
}
static void
yywarning(parser_state *p, const char *s)
{
char* c;
size_t n;
if (! p->capture_errors) {
#ifndef MRB_NO_STDIO
if (p->filename_sym) {
const char *filename = mrb_sym_name_len(p->mrb, p->filename_sym, NULL);
fprintf(stderr, "%s:%d:%d: warning: %s\n", filename, p->lineno, p->column, s);
}
else {
fprintf(stderr, "line %d:%d: warning: %s\n", p->lineno, p->column, s);
}
#endif
}
else if (p->nwarn < sizeof(p->warn_buffer) / sizeof(p->warn_buffer[0])) {
n = strlen(s);
c = (char*)parser_palloc(p, n + 1);
memcpy(c, s, n + 1);
p->warn_buffer[p->nwarn].message = c;
p->warn_buffer[p->nwarn].lineno = p->lineno;
p->warn_buffer[p->nwarn].column = p->column;
}
p->nwarn++;
}
static void
yywarning_s(parser_state *p, const char *msg, const char *s)
{
char buf[256];
strncpy(buf, msg, sizeof(buf) - 1);
buf[sizeof(buf) - 1] = '\0';
strncat(buf, ": ", sizeof(buf) - strlen(buf) - 1);
strncat(buf, s, sizeof(buf) - strlen(buf) - 1);
yywarning(p, buf);
}
static void
backref_error(parser_state *p, node *n)
{
int c;
c = node_to_int(n->car);
if (c == NODE_NTH_REF) {
yyerror_c(p, "can't set variable $", (char)node_to_int(n->cdr)+'0');
}
else if (c == NODE_BACK_REF) {
yyerror_c(p, "can't set variable $", (char)node_to_int(n->cdr));
}
else {
yyerror(NULL, p, "Internal error in backref_error()");
}
}
static void
void_expr_error(parser_state *p, node *n)
{
if (n == NULL) return;
/* Check if this is a variable-sized node first */
struct mrb_ast_var_header *header = (struct mrb_ast_var_header*)n;
if (header) {
/* Handle variable-sized nodes */
switch ((enum node_type)header->node_type) {
case NODE_BREAK:
case NODE_RETURN:
case NODE_NEXT:
case NODE_REDO:
case NODE_RETRY:
yyerror(NULL, p, "void value expression");
return;
case NODE_AND:
case NODE_OR:
{
struct mrb_ast_and_node *and_n = (struct mrb_ast_and_node*)n;
void_expr_error(p, (node*)and_n->left);
void_expr_error(p, (node*)and_n->right);
}
return;
case NODE_STMTS:
{
struct mrb_ast_stmts_node *stmts = (struct mrb_ast_stmts_node*)n;
node *last = stmts->stmts;
if (last) {
/* Find the last statement in the cons list */
while (last->cdr) {
last = last->cdr;
}
void_expr_error(p, last->car);
}
}
return;
case NODE_BEGIN:
{
struct mrb_ast_begin_node *begin_n = (struct mrb_ast_begin_node*)n;
if (begin_n->body) {
void_expr_error(p, (node*)begin_n->body);
}
}
return;
default:
/* Other variable-sized nodes are OK */
return;
}
}
/* Should not reach here - all nodes should be variable-sized now */
}
static void pushback(parser_state *p, int c);
static mrb_bool peeks(parser_state *p, const char *s);
static mrb_bool skips(parser_state *p, const char *s);
static inline int
nextc0(parser_state *p)
{
if (p->s && p->s < p->send) {
return (unsigned char)*p->s++;
}
else {
#ifndef MRB_NO_STDIO
int c;
if (p->f) {
c = fgetc(p->f);
if (!feof(p->f)) return c;
}
#endif
return -1;
}
}
static inline int
nextc(parser_state *p)
{
int c;
if (p->pb) {
node *tmp;
c = node_to_int(p->pb->car);
tmp = p->pb;
p->pb = p->pb->cdr;
cons_free(tmp);
}
else {
c = nextc0(p);
if (c < 0) goto eof;
}
if (c >= 0) {
p->column++;
}
if (c == '\r') {
const int lf = nextc0(p);
if (lf == '\n') {
return '\n';
}
if (lf > 0) pushback(p, lf);
}
return c;
eof:
if (!p->cxt) return -1;
else {
if (p->cxt->partial_hook(p) < 0)
return -1; /* end of program(s) */
return -2; /* end of a file in the program files */
}
}
static void
pushback(parser_state *p, int c)
{
if (c >= 0) {
p->column--;
}
p->pb = cons(int_to_node(c), p->pb);
}
static void
skip(parser_state *p, char term)
{
int c;
for (;;) {
c = nextc(p);
if (c < 0) break;
if (c == term) break;
}
}
static int
peekc_n(parser_state *p, int n)
{
node *list = 0;
int c0;
do {
c0 = nextc(p);
if (c0 == -1) return c0; /* do not skip partial EOF */
if (c0 >= 0) --p->column;
list = push(list, int_to_node(c0));
} while(n--);
if (p->pb) {
p->pb = append(list, p->pb);
}
else {
p->pb = list;
}
return c0;
}
static mrb_bool
peek_n(parser_state *p, int c, int n)
{
return peekc_n(p, n) == c && c >= 0;
}
#define peek(p,c) peek_n((p), (c), 0)
static mrb_bool
peeks(parser_state *p, const char *s)
{
size_t len = strlen(s);
#ifndef MRB_NO_STDIO
if (p->f) {
int n = 0;
while (*s) {
if (!peek_n(p, *s++, n++)) return FALSE;
}
return TRUE;
}
else
#endif
if (p->s && p->s + len <= p->send) {
if (memcmp(p->s, s, len) == 0) return TRUE;
}
return FALSE;
}
static mrb_bool
skips(parser_state *p, const char *s)
{
int c;
for (;;) {
/* skip until first char */
for (;;) {
c = nextc(p);
if (c < 0) return FALSE;
if (c == '\n') {
p->lineno++;
p->column = 0;
}
if (c == *s) break;
}
s++;
if (peeks(p, s)) {
size_t len = strlen(s);
while (len--) {
if (nextc(p) == '\n') {
p->lineno++;
p->column = 0;
}
}
return TRUE;
}
else {
s--;
}
}
return FALSE;
}
static int
newtok(parser_state *p)
{
if (p->tokbuf != p->buf) {
mrbc_free(p->tokbuf);
p->tokbuf = p->buf;
p->tsiz = MRB_PARSER_TOKBUF_SIZE;
}
p->tidx = 0;
return p->column - 1;
}
static void
tokadd(parser_state *p, int32_t c)
{
char utf8[4];
int i, len;
/* mrb_assert(-0x10FFFF <= c && c <= 0xFF); */
if (c >= 0) {
/* Single byte from source or non-Unicode escape */
utf8[0] = (char)c;
len = 1;
}
else {
/* Unicode character (negative c indicates codepoint) */
len = (int)mrb_utf8_to_buf(utf8, (uint32_t)(-c));
}
if (p->tidx+len >= p->tsiz) {
if (p->tsiz >= MRB_PARSER_TOKBUF_MAX) {
p->tidx += len;
return;
}
p->tsiz *= 2;
if (p->tokbuf == p->buf) {
p->tokbuf = (char*)mrbc_malloc(p->tsiz);
memcpy(p->tokbuf, p->buf, MRB_PARSER_TOKBUF_SIZE);
}
else {
p->tokbuf = (char*)mrbc_realloc(p->tokbuf, p->tsiz);
}
}
for (i = 0; i < len; i++) {
p->tokbuf[p->tidx++] = utf8[i];
}
}
static int
toklast(parser_state *p)
{
return p->tokbuf[p->tidx-1];
}
static void
tokfix(parser_state *p)
{
if (p->tidx >= MRB_PARSER_TOKBUF_MAX) {
p->tidx = MRB_PARSER_TOKBUF_MAX-1;
yyerror(NULL, p, "string too long (truncated)");
}
p->tokbuf[p->tidx] = '\0';
}
static const char*
tok(parser_state *p)
{
return p->tokbuf;
}
static int
toklen(parser_state *p)
{
return p->tidx;
}
#define IS_ARG() (p->lstate == EXPR_ARG || p->lstate == EXPR_CMDARG)
#define IS_END() (p->lstate == EXPR_END || p->lstate == EXPR_ENDARG || p->lstate == EXPR_ENDFN)
#define IS_BEG() (p->lstate == EXPR_BEG || p->lstate == EXPR_MID || p->lstate == EXPR_VALUE || p->lstate == EXPR_CLASS)
#define IS_SPCARG(c) (IS_ARG() && space_seen && !ISSPACE(c))
#define IS_LABEL_POSSIBLE() ((p->lstate == EXPR_BEG && !cmd_state) || IS_ARG() || p->lstate == EXPR_VALUE)
#define IS_LABEL_SUFFIX(n) (peek_n(p, ':',(n)) && !peek_n(p, ':', (n)+1))
static int32_t
scan_oct(const int *start, int len, int *retlen)
{
const int *s = start;
int32_t retval = 0;
/* mrb_assert(len <= 3) */
while (len-- && *s >= '0' && *s <= '7') {
retval <<= 3;
retval |= *s++ - '0';
}
*retlen = (int)(s - start);
return retval;
}
static int32_t
scan_hex(parser_state *p, const int *start, int len, int *retlen)
{
static const char hexdigit[] = "0123456789abcdef0123456789ABCDEF";
const int *s = start;
uint32_t retval = 0;
char *tmp;
/* mrb_assert(len <= 8) */
while (len-- && *s && (tmp = (char*)strchr(hexdigit, *s))) {
retval <<= 4;
retval |= (tmp - hexdigit) & 15;
s++;
}
*retlen = (int)(s - start);
return (int32_t)retval;
}
static int32_t
read_escape_unicode(parser_state *p, int limit)
{
int buf[9];
int i;
int32_t hex;
/* Look for opening brace */
i = 0;
buf[0] = nextc(p);
if (buf[0] < 0) {
eof:
yyerror(NULL, p, "invalid escape character syntax");
return -1;
}
if (ISXDIGIT(buf[0])) {
/* \uxxxx form */
for (i=1; i<limit; i++) {
buf[i] = nextc(p);
if (buf[i] < 0) goto eof;
if (!ISXDIGIT(buf[i])) {
pushback(p, buf[i]);
break;
}
}
}
else {
pushback(p, buf[0]);
}
hex = scan_hex(p, buf, i, &i);
if (i == 0 || hex > 0x10FFFF || (hex & 0xFFFFF800) == 0xD800) {
yyerror(NULL, p, "invalid Unicode code point");
return -1;
}
return hex;
}
/* Return negative to indicate Unicode code point */
static int32_t
read_escape(parser_state *p)
{
int32_t c;
switch (c = nextc(p)) {
case '\\':/* Backslash */
return c;
case 'n':/* newline */
return '\n';
case 't':/* horizontal tab */
return '\t';
case 'r':/* carriage-return */
return '\r';
case 'f':/* form-feed */
return '\f';
case 'v':/* vertical tab */
return '\13';
case 'a':/* alarm(bell) */
return '\007';
case 'e':/* escape */
return 033;
case '0': case '1': case '2': case '3': /* octal constant */
case '4': case '5': case '6': case '7':
{
int buf[3];
int i;
buf[0] = c;
for (i=1; i<3; i++) {
buf[i] = nextc(p);
if (buf[i] < 0) goto eof;
if (buf[i] < '0' || '7' < buf[i]) {
pushback(p, buf[i]);
break;
}
}
c = scan_oct(buf, i, &i);
}
return c;
case 'x': /* hex constant */
{
int buf[2];
int i;
for (i=0; i<2; i++) {
buf[i] = nextc(p);
if (buf[i] < 0) goto eof;
if (!ISXDIGIT(buf[i])) {
pushback(p, buf[i]);
break;
}
}
if (i == 0) {
yyerror(NULL, p, "invalid hex escape");
return -1;
}
return scan_hex(p, buf, i, &i);
}
case 'u': /* Unicode */
if (peek(p, '{')) {
/* \u{xxxxxxxx} form */
nextc(p);
c = read_escape_unicode(p, 8);
if (c < 0) return 0;
if (nextc(p) != '}') goto eof;
}
else {
c = read_escape_unicode(p, 4);
if (c < 0) return 0;
}
return -c;
case 'b':/* backspace */
return '\010';
case 's':/* space */
return ' ';
case 'M':
if ((c = nextc(p)) != '-') {
yyerror(NULL, p, "Invalid escape character syntax");
pushback(p, c);
return '\0';
}
if ((c = nextc(p)) == '\\') {
return read_escape(p) | 0x80;
}
else if (c < 0) goto eof;
else {
return ((c & 0xff) | 0x80);
}
case 'C':
if ((c = nextc(p)) != '-') {
yyerror(NULL, p, "Invalid escape character syntax");
pushback(p, c);
return '\0';
}
case 'c':
if ((c = nextc(p))== '\\') {
c = read_escape(p);
}
else if (c == '?')
return 0177;
else if (c < 0) goto eof;
return c & 0x9f;
eof:
case -1:
case -2: /* end of a file */
yyerror(NULL, p, "Invalid escape character syntax");
return '\0';
default:
return c;
}
}
static void
heredoc_count_indent(parser_heredoc_info *hinfo, const char *str, size_t len, size_t spaces, size_t *offset)
{
size_t indent = 0;
*offset = 0;
for (size_t i = 0; i < len; i++) {
size_t size;
if (str[i] == '\n')
break;
else if (str[i] == '\t')
size = 8;
else if (ISSPACE(str[i]))
size = 1;
else
break;
size_t nindent = indent + size;
if (nindent > spaces || nindent > hinfo->indent)
break;
indent = nindent;
*offset += 1;
}
}
static void
heredoc_remove_indent(parser_state *p, parser_heredoc_info *hinfo)
{
if (!hinfo->remove_indent || hinfo->indent == 0)
return;
node *indented, *n, *pair, *escaped, *nspaces;
const char *str;
size_t len, spaces, offset, start, end;
indented = hinfo->indented;
while (indented) {
n = indented->car;
pair = n->car;
len = (size_t)pair->car;
str = (char*)pair->cdr;
escaped = n->cdr->car;
nspaces = n->cdr->cdr;
if (escaped) {
char *newstr = strndup(str, len);
size_t newlen = 0;
start = 0;
while (start < len) {
end = escaped ? (size_t)escaped->car : len;
if (end > len) end = len;
spaces = (size_t)nspaces->car;
size_t esclen = end - start;
heredoc_count_indent(hinfo, str + start, esclen, spaces, &offset);
esclen -= offset;
memcpy(newstr + newlen, str + start + offset, esclen);
newlen += esclen;
start = end;
if (escaped)
escaped = escaped->cdr;
nspaces = nspaces->cdr;
}
if (newlen < len)
newstr[newlen] = '\0';
pair->car = (node*)newlen;
pair->cdr = (node*)newstr;
}
else {
spaces = (size_t)nspaces->car;
heredoc_count_indent(hinfo, str, len, spaces, &offset);
pair->car = (node*)(len - offset);
pair->cdr = (node*)(str + offset);
}
indented = indented->cdr;
}
}
static void
heredoc_push_indented(parser_state *p, parser_heredoc_info *hinfo, node *pair, node *escaped, node *nspaces, mrb_bool empty_line)
{
hinfo->indented = push(hinfo->indented, cons(pair, cons(escaped, nspaces)));
while (nspaces) {
size_t tspaces = (size_t)nspaces->car;
if ((hinfo->indent == ~0U || tspaces < hinfo->indent) && !empty_line)
hinfo->indent = tspaces;
nspaces = nspaces->cdr;
}
}
static int
parse_string(parser_state *p)
{
int c;
string_type type = (string_type)p->lex_strterm->type;
int nest_level = p->lex_strterm->level;
int beg = p->lex_strterm->paren;
int end = p->lex_strterm->term;
parser_heredoc_info *hinfo = (type & STR_FUNC_HEREDOC) ? parsing_heredoc_info(p) : NULL;
mrb_bool unindent = hinfo && hinfo->remove_indent;
mrb_bool head = hinfo && hinfo->line_head;
mrb_bool empty = TRUE;
size_t spaces = 0;
size_t pos = -1;
node *escaped = NULL;
node *nspaces = NULL;
if (beg == 0) beg = -3; /* should never happen */
if (end == 0) end = -3;
newtok(p);
while ((c = nextc(p)) != end || nest_level != 0) {
pos++;
if (hinfo && (c == '\n' || c < 0)) {
mrb_bool line_head;
tokadd(p, '\n');
tokfix(p);
p->lineno++;
p->column = 0;
line_head = hinfo->line_head;
hinfo->line_head = TRUE;
if (line_head) {
/* check whether end of heredoc */
const char *s = tok(p);
int len = toklen(p);
if (hinfo->allow_indent) {
while (ISSPACE(*s) && len > 0) {
s++;
len--;
}
}
if (hinfo->term_len > 0 && len-1 == hinfo->term_len && strncmp(s, hinfo->term, len-1) == 0) {
heredoc_remove_indent(p, hinfo);
return tHEREDOC_END;
}
}
if (c < 0) {
char buf[256];
const char s1[] = "can't find heredoc delimiter \"";
const char s2[] = "\" anywhere before EOF";
if (sizeof(s1)+sizeof(s2)+strlen(hinfo->term)+1 >= sizeof(buf)) {
yyerror(NULL, p, "can't find heredoc delimiter anywhere before EOF");
}
else {
strcpy(buf, s1);
strcat(buf, hinfo->term);
strcat(buf, s2);
yyerror(NULL, p, buf);
}
return 0;
}
pylval.nd = new_str_tok(p);
if (unindent && head) {
nspaces = push(nspaces, int_to_node(spaces));
heredoc_push_indented(p, hinfo, pylval.nd, escaped, nspaces, empty && line_head);
}
return tHD_STRING_MID;
}
if (unindent && empty) {
if (c == '\t')
spaces += 8;
else if (ISSPACE(c))
spaces++;
else
empty = FALSE;
}
if (c < 0) {
yyerror(NULL, p, "unterminated string meets end of file");
return 0;
}
else if (c == beg) {
nest_level++;
p->lex_strterm->level = nest_level;
}
else if (c == end) {
nest_level--;
p->lex_strterm->level = nest_level;
}
else if (c == '\\') {
c = nextc(p);
if (type & STR_FUNC_EXPAND) {
if (c == end || c == beg) {
tokadd(p, c);
}
else if (c == '\n') {
p->lineno++;
p->column = 0;
if (unindent) {
nspaces = push(nspaces, int_to_node(spaces));
escaped = push(escaped, int_to_node(pos));
pos--;
empty = TRUE;
spaces = 0;
}
if (type & STR_FUNC_ARRAY) {
tokadd(p, '\n');
}
}
else if (type & STR_FUNC_REGEXP) {
tokadd(p, '\\');
tokadd(p, c);
}
else if (c == 'u' && peek(p, '{')) {
/* \u{xxxx xxxx xxxx} form */
nextc(p);
while (1) {
do c = nextc(p); while (ISSPACE(c));
if (c == '}') break;
pushback(p, c);
c = read_escape_unicode(p, 8);
if (c < 0) break;
tokadd(p, -c);
}
if (hinfo)
hinfo->line_head = FALSE;
}
else {
pushback(p, c);
tokadd(p, read_escape(p));
if (hinfo)
hinfo->line_head = FALSE;
}
}
else {
if (c != beg && c != end) {
if (c == '\n') {
p->lineno++;
p->column = 0;
}
if (!(c == '\\' || ((type & STR_FUNC_ARRAY) && ISSPACE(c)))) {
tokadd(p, '\\');
}
}
tokadd(p, c);
}
continue;
}
else if ((c == '#') && (type & STR_FUNC_EXPAND)) {
c = nextc(p);
if (c == '{') {
tokfix(p);
p->lstate = EXPR_BEG;
p->cmd_start = TRUE;
pylval.nd = new_str_tok(p);
if (hinfo) {
if (unindent && head) {
nspaces = push(nspaces, int_to_node(spaces));
heredoc_push_indented(p, hinfo, pylval.nd, escaped, nspaces, FALSE);
}
hinfo->line_head = FALSE;
return tHD_STRING_PART;
}
return tSTRING_PART;
}
tokadd(p, '#');
pushback(p, c);
continue;
}
if ((type & STR_FUNC_ARRAY) && ISSPACE(c)) {
if (toklen(p) == 0) {
do {
if (c == '\n') {
p->lineno++;
p->column = 0;
heredoc_treat_nextline(p);
if (p->parsing_heredoc != NULL) {
return tHD_LITERAL_DELIM;
}
}
c = nextc(p);
} while (ISSPACE(c));
pushback(p, c);
return tLITERAL_DELIM;
}
else {
pushback(p, c);
tokfix(p);
pylval.nd = new_str_tok(p);
return tSTRING_MID;
}
}
if (c == '\n') {
p->lineno++;
p->column = 0;
}
tokadd(p, c);
}
tokfix(p);
p->lstate = EXPR_END;
end_strterm(p);
if (type & STR_FUNC_XQUOTE) {
pylval.nd = new_str_tok(p);
return tXSTRING;
}
if (type & STR_FUNC_REGEXP) {
int f = 0;
int re_opt;
int pattern_len = toklen(p);
char *s = strndup(tok(p), pattern_len);
char flags[3];
char *flag = flags;
char enc = '\0';
char *encp;
char *dup;
newtok(p);
while (re_opt = nextc(p), re_opt >= 0 && ISALPHA(re_opt)) {
switch (re_opt) {
case 'i': f |= 1; break;
case 'x': f |= 2; break;
case 'm': f |= 4; break;
case 'u': f |= 16; break;
case 'n': f |= 32; break;
case 'o': break;
default: tokadd(p, re_opt); break;
}
}
pushback(p, re_opt);
if (toklen(p)) {
char msg[128];
strcpy(msg, "unknown regexp option");
tokfix(p);
if (toklen(p) > 1) {
strcat(msg, "s");
}
strcat(msg, " - ");
strncat(msg, tok(p), sizeof(msg) - strlen(msg) - 1);
yyerror(NULL, p, msg);
}
if (f != 0) {
if (f & 1) *flag++ = 'i';
if (f & 2) *flag++ = 'x';
if (f & 4) *flag++ = 'm';
if (f & 16) enc = 'u';
if (f & 32) enc = 'n';
}
if (flag > flags) {
dup = strndup(flags, (size_t)(flag - flags));
}
else {
dup = NULL;
}
if (enc) {
encp = strndup(&enc, 1);
}
else {
encp = NULL;
}
pylval.nd = cons(cons(int_to_node(pattern_len), (node*)s), cons((node*)dup, (node*)encp));
return tREGEXP;
}
pylval.nd = new_str_tok(p);
return tSTRING;
}
static int
number_literal_suffix(parser_state *p)
{
int c, result = 0;
node *list = 0;
int column = p->column;
int mask = NUM_SUFFIX_R|NUM_SUFFIX_I;
while ((c = nextc(p)) != -1) {
list = push(list, int_to_node(c));
if ((mask & NUM_SUFFIX_I) && c == 'i') {
result |= (mask & NUM_SUFFIX_I);
mask &= ~NUM_SUFFIX_I;
/* r after i, rational of complex is disallowed */
mask &= ~NUM_SUFFIX_R;
continue;
}
if ((mask & NUM_SUFFIX_R) && c == 'r') {
result |= (mask & NUM_SUFFIX_R);
mask &= ~NUM_SUFFIX_R;
continue;
}
if (!ISASCII(c) || ISALPHA(c) || c == '_') {
p->column = column;
if (p->pb) {
p->pb = append(list, p->pb);
}
else {
p->pb = list;
}
return 0;
}
pushback(p, c);
break;
}
return result;
}
static int
heredoc_identifier(parser_state *p)
{
int c;
int type = str_heredoc;
mrb_bool indent = FALSE;
mrb_bool squiggly = FALSE;
mrb_bool quote = FALSE;
node *newnode;
parser_heredoc_info *info;
c = nextc(p);
if (ISSPACE(c) || c == '=') {
pushback(p, c);
return 0;
}
if (c == '-' || c == '~') {
if (c == '-')
indent = TRUE;
if (c == '~')
squiggly = TRUE;
c = nextc(p);
}
if (c == '\'' || c == '"') {
int term = c;
if (c == '\'')
quote = TRUE;
newtok(p);
while ((c = nextc(p)) >= 0 && c != term) {
if (c == '\n') {
c = -1;
break;
}
tokadd(p, c);
}
if (c < 0) {
yyerror(NULL, p, "unterminated here document identifier");
return 0;
}
}
else {
if (c < 0) {
return 0; /* missing here document identifier */
}
if (! identchar(c)) {
pushback(p, c);
if (indent) pushback(p, '-');
if (squiggly) pushback(p, '~');
return 0;
}
newtok(p);
do {
tokadd(p, c);
} while ((c = nextc(p)) >= 0 && identchar(c));
pushback(p, c);
}
tokfix(p);
newnode = new_heredoc(p, &info);
info->term = strndup(tok(p), toklen(p));
info->term_len = toklen(p);
if (! quote)
type |= STR_FUNC_EXPAND;
info->type = (string_type)type;
info->allow_indent = indent || squiggly;
info->remove_indent = squiggly;
info->indent = ~0U;
info->indented = NULL;
info->line_head = TRUE;
info->doc = NULL;
p->heredocs_from_nextline = push(p->heredocs_from_nextline, newnode);
p->lstate = EXPR_END;
pylval.nd = newnode;
return tHEREDOC_BEG;
}
static int
arg_ambiguous(parser_state *p)
{
yywarning(p, "ambiguous first argument; put parentheses or even spaces");
return 1;
}
#include "lex.def"
static int
parser_yylex(parser_state *p)
{
int32_t c;
int nlines = 1;
int space_seen = 0;
int cmd_state;
enum mrb_lex_state_enum last_state;
int token_column;
/* Early termination if too many errors - prevents DoS from malformed input */
if (p->nerr > 10) {
return 0; /* EOF */
}
if (p->lex_strterm) {
if (is_strterm_type(p, STR_FUNC_HEREDOC)) {
if (p->parsing_heredoc != NULL)
return parse_string(p);
}
else
return parse_string(p);
}
cmd_state = p->cmd_start;
p->cmd_start = FALSE;
retry:
last_state = p->lstate;
switch (c = nextc(p)) {
case '\004': /* ^D */
case '\032': /* ^Z */
case '\0': /* NUL */
case -1: /* end of script. */
if (p->heredocs_from_nextline)
goto maybe_heredoc;
return 0;
/* white spaces */
case ' ': case '\t': case '\f': case '\r':
case '\13': /* '\v' */
space_seen = 1;
goto retry;
case '#': /* it's a comment */
skip(p, '\n');
/* fall through */
case -2: /* end of a file */
case '\n':
maybe_heredoc:
heredoc_treat_nextline(p);
p->column = 0;
switch (p->lstate) {
case EXPR_BEG:
case EXPR_FNAME:
case EXPR_DOT:
case EXPR_CLASS:
case EXPR_VALUE:
p->lineno++;
if (p->parsing_heredoc != NULL) {
if (p->lex_strterm) {
return parse_string(p);
}
}
goto retry;
default:
break;
}
if (p->parsing_heredoc != NULL) {
pylval.num = nlines;
return '\n';
}
while ((c = nextc(p))) {
switch (c) {
case ' ': case '\t': case '\f': case '\r':
case '\13': /* '\v' */
space_seen = 1;
break;
case '#': /* comment as a whitespace */
skip(p, '\n');
nlines++;
break;
case '.':
if (!peek(p, '.')) {
pushback(p, '.');
p->lineno+=nlines; nlines=1;
goto retry;
}
pushback(p, c);
goto normal_newline;
case '&':
if (peek(p, '.')) {
pushback(p, '&');
p->lineno+=nlines; nlines=1;
goto retry;
}
pushback(p, c);
goto normal_newline;
case -1: /* EOF */
case -2: /* end of a file */
goto normal_newline;
default:
pushback(p, c);
goto normal_newline;
}
}
normal_newline:
p->cmd_start = TRUE;
p->lstate = EXPR_BEG;
pylval.num = nlines;
return '\n';
case '*':
if ((c = nextc(p)) == '*') {
if ((c = nextc(p)) == '=') {
pylval.id = intern_op(pow);
p->lstate = EXPR_BEG;
return tOP_ASGN;
}
pushback(p, c);
if (IS_SPCARG(c)) {
yywarning(p, "'**' interpreted as argument prefix");
c = tDSTAR;
}
else if (IS_BEG()) {
c = tDSTAR;
}
else {
c = tPOW; /* "**", "argument prefix" */
}
}
else {
if (c == '=') {
pylval.id = intern_op(mul);
p->lstate = EXPR_BEG;
return tOP_ASGN;
}
pushback(p, c);
if (IS_SPCARG(c)) {
yywarning(p, "'*' interpreted as argument prefix");
c = tSTAR;
}
else if (IS_BEG()) {
c = tSTAR;
}
else {
c = '*';
}
}
if (p->lstate == EXPR_FNAME || p->lstate == EXPR_DOT) {
p->lstate = EXPR_ARG;
}
else {
p->lstate = EXPR_BEG;
}
return c;
case '!':
c = nextc(p);
if (p->lstate == EXPR_FNAME || p->lstate == EXPR_DOT) {
p->lstate = EXPR_ARG;
if (c == '@') {
return '!';
}
}
else {
p->lstate = EXPR_BEG;
}
if (c == '=') {
return tNEQ;
}
if (c == '~') {
return tNMATCH;
}
pushback(p, c);
return '!';
case '=':
if (p->column == 1) {
static const char begin[] = "begin";
static const char end[] = "\n=end";
if (peeks(p, begin)) {
c = peekc_n(p, sizeof(begin)-1);
if (c < 0 || ISSPACE(c)) {
do {
if (!skips(p, end)) {
yyerror(NULL, p, "embedded document meets end of file");
return 0;
}
c = nextc(p);
} while (!(c < 0 || ISSPACE(c)));
if (c != '\n') skip(p, '\n');
p->lineno+=nlines; nlines=1;
p->column = 0;
goto retry;
}
}
}
if (p->lstate == EXPR_FNAME || p->lstate == EXPR_DOT) {
p->lstate = EXPR_ARG;
}
else {
p->lstate = EXPR_BEG;
}
if ((c = nextc(p)) == '=') {
if ((c = nextc(p)) == '=') {
return tEQQ;
}
pushback(p, c);
return tEQ;
}
if (c == '~') {
return tMATCH;
}
else if (c == '>') {
return tASSOC;
}
pushback(p, c);
return '=';
case '<':
c = nextc(p);
if (c == '<' &&
p->lstate != EXPR_DOT &&
p->lstate != EXPR_CLASS &&
!IS_END() &&
(!IS_ARG() || space_seen)) {
int token = heredoc_identifier(p);
if (token)
return token;
}
if (p->lstate == EXPR_FNAME || p->lstate == EXPR_DOT) {
p->lstate = EXPR_ARG;
}
else {
p->lstate = EXPR_BEG;
if (p->lstate == EXPR_CLASS) {
p->cmd_start = TRUE;
}
}
if (c == '=') {
if ((c = nextc(p)) == '>') {
return tCMP;
}
pushback(p, c);
return tLEQ;
}
if (c == '<') {
if ((c = nextc(p)) == '=') {
pylval.id = intern_op(lshift);
p->lstate = EXPR_BEG;
return tOP_ASGN;
}
pushback(p, c);
return tLSHFT;
}
pushback(p, c);
return '<';
case '>':
if (p->lstate == EXPR_FNAME || p->lstate == EXPR_DOT) {
p->lstate = EXPR_ARG;
}
else {
p->lstate = EXPR_BEG;
}
if ((c = nextc(p)) == '=') {
return tGEQ;
}
if (c == '>') {
if ((c = nextc(p)) == '=') {
pylval.id = intern_op(rshift);
p->lstate = EXPR_BEG;
return tOP_ASGN;
}
pushback(p, c);
return tRSHFT;
}
pushback(p, c);
return '>';
case '"':
p->lex_strterm = new_strterm(p, str_dquote, '"', 0);
return tSTRING_BEG;
case '\'':
p->lex_strterm = new_strterm(p, str_squote, '\'', 0);
return parse_string(p);
case '`':
if (p->lstate == EXPR_FNAME) {
p->lstate = EXPR_ENDFN;
return '`';
}
if (p->lstate == EXPR_DOT) {
if (cmd_state)
p->lstate = EXPR_CMDARG;
else
p->lstate = EXPR_ARG;
return '`';
}
p->lex_strterm = new_strterm(p, str_xquote, '`', 0);
return tXSTRING_BEG;
case '?':
if (IS_END()) {
p->lstate = EXPR_VALUE;
return '?';
}
c = nextc(p);
if (c < 0) {
yyerror(NULL, p, "incomplete character syntax");
return 0;
}
if (ISSPACE(c)) {
if (!IS_ARG()) {
int c2;
switch (c) {
case ' ':
c2 = 's';
break;
case '\n':
c2 = 'n';
break;
case '\t':
c2 = 't';
break;
case '\v':
c2 = 'v';
break;
case '\r':
c2 = 'r';
break;
case '\f':
c2 = 'f';
break;
default:
c2 = 0;
break;
}
if (c2) {
char buf[256];
char cc[] = { (char)c2, '\0' };
strcpy(buf, "invalid character syntax; use ?\\");
strncat(buf, cc, 2);
yyerror(NULL, p, buf);
}
}
ternary:
pushback(p, c);
p->lstate = EXPR_VALUE;
return '?';
}
newtok(p);
/* need support UTF-8 if configured */
if ((ISALNUM(c) || c == '_')) {
int c2 = nextc(p);
pushback(p, c2);
if ((ISALNUM(c2) || c2 == '_')) {
goto ternary;
}
}
if (c == '\\') {
c = read_escape(p);
tokadd(p, c);
}
else {
tokadd(p, c);
}
tokfix(p);
pylval.nd = new_str_tok(p);
p->lstate = EXPR_END;
return tCHAR;
case '&':
if ((c = nextc(p)) == '&') {
p->lstate = EXPR_BEG;
if ((c = nextc(p)) == '=') {
pylval.id = intern_op(andand);
p->lstate = EXPR_BEG;
return tOP_ASGN;
}
pushback(p, c);
return tANDOP;
}
else if (c == '.') {
p->lstate = EXPR_DOT;
return tANDDOT;
}
else if (c == '=') {
pylval.id = intern_op(and);
p->lstate = EXPR_BEG;
return tOP_ASGN;
}
pushback(p, c);
if (IS_SPCARG(c)) {
yywarning(p, "'&' interpreted as argument prefix");
c = tAMPER;
}
else if (IS_BEG()) {
c = tAMPER;
}
else {
c = '&';
}
if (p->lstate == EXPR_FNAME || p->lstate == EXPR_DOT) {
p->lstate = EXPR_ARG;
}
else {
p->lstate = EXPR_BEG;
}
return c;
case '|':
if ((c = nextc(p)) == '|') {
p->lstate = EXPR_BEG;
if ((c = nextc(p)) == '=') {
pylval.id = intern_op(oror);
p->lstate = EXPR_BEG;
return tOP_ASGN;
}
pushback(p, c);
return tOROP;
}
if (c == '=') {
pylval.id = intern_op(or);
p->lstate = EXPR_BEG;
return tOP_ASGN;
}
if (p->lstate == EXPR_FNAME || p->lstate == EXPR_DOT) {
p->lstate = EXPR_ARG;
}
else {
p->lstate = EXPR_BEG;
}
pushback(p, c);
return '|';
case '+':
c = nextc(p);
if (p->lstate == EXPR_FNAME || p->lstate == EXPR_DOT) {
p->lstate = EXPR_ARG;
if (c == '@') {
return tUPLUS;
}
pushback(p, c);
return '+';
}
if (c == '=') {
pylval.id = intern_op(add);
p->lstate = EXPR_BEG;
return tOP_ASGN;
}
if (IS_BEG() || (IS_SPCARG(c) && arg_ambiguous(p))) {
p->lstate = EXPR_BEG;
pushback(p, c);
if (c >= 0 && ISDIGIT(c)) {
c = '+';
goto start_num;
}
return tUPLUS;
}
p->lstate = EXPR_BEG;
pushback(p, c);
return '+';
case '-':
c = nextc(p);
if (p->lstate == EXPR_FNAME || p->lstate == EXPR_DOT) {
p->lstate = EXPR_ARG;
if (c == '@') {
return tUMINUS;
}
pushback(p, c);
return '-';
}
if (c == '=') {
pylval.id = intern_op(sub);
p->lstate = EXPR_BEG;
return tOP_ASGN;
}
if (c == '>') {
p->lstate = EXPR_ENDFN;
return tLAMBDA;
}
if (IS_BEG() || (IS_SPCARG(c) && arg_ambiguous(p))) {
p->lstate = EXPR_BEG;
pushback(p, c);
if (c >= 0 && ISDIGIT(c)) {
return tUMINUS_NUM;
}
return tUMINUS;
}
p->lstate = EXPR_BEG;
pushback(p, c);
return '-';
case '.':
{
int is_beg = IS_BEG();
p->lstate = EXPR_MID;
if ((c = nextc(p)) == '.') {
if ((c = nextc(p)) == '.') {
return is_beg ? tBDOT3 : tDOT3;
}
pushback(p, c);
return is_beg ? tBDOT2 : tDOT2;
}
pushback(p, c);
p->lstate = EXPR_BEG;
if (c >= 0 && ISDIGIT(c)) {
yyerror(NULL, p, "no .<digit> floating literal anymore; put 0 before dot");
}
p->lstate = EXPR_DOT;
return '.';
}
start_num:
case '0': case '1': case '2': case '3': case '4':
case '5': case '6': case '7': case '8': case '9':
{
int is_float, seen_point, seen_e, nondigit;
int suffix = 0;
is_float = seen_point = seen_e = nondigit = 0;
p->lstate = EXPR_END;
newtok(p);
if (c == '-') {
tokadd(p, c);
c = nextc(p);
}
else if (c == '+') {
c = nextc(p);
}
if (c == '0') {
#define no_digits() do {yyerror(NULL, p,"numeric literal without digits"); return 0;} while (0)
int start = toklen(p);
c = nextc(p);
if (c == 'x' || c == 'X') {
/* hexadecimal */
c = nextc(p);
if (c >= 0 && ISXDIGIT(c)) {
do {
if (c == '_') {
if (nondigit) break;
nondigit = c;
continue;
}
if (!ISXDIGIT(c)) break;
nondigit = 0;
tokadd(p, tolower(c));
} while ((c = nextc(p)) >= 0);
}
pushback(p, c);
tokfix(p);
if (toklen(p) == start) {
no_digits();
}
else if (nondigit) goto trailing_uc;
suffix = number_literal_suffix(p);
pylval.nd = new_int(p, tok(p), 16, suffix);
return tINTEGER;
}
if (c == 'b' || c == 'B') {
/* binary */
c = nextc(p);
if (c == '0' || c == '1') {
do {
if (c == '_') {
if (nondigit) break;
nondigit = c;
continue;
}
if (c != '0' && c != '1') break;
nondigit = 0;
tokadd(p, c);
} while ((c = nextc(p)) >= 0);
}
pushback(p, c);
tokfix(p);
if (toklen(p) == start) {
no_digits();
}
else if (nondigit) goto trailing_uc;
suffix = number_literal_suffix(p);
pylval.nd = new_int(p, tok(p), 2, suffix);
return tINTEGER;
}
if (c == 'd' || c == 'D') {
/* decimal */
c = nextc(p);
if (c >= 0 && ISDIGIT(c)) {
do {
if (c == '_') {
if (nondigit) break;
nondigit = c;
continue;
}
if (!ISDIGIT(c)) break;
nondigit = 0;
tokadd(p, c);
} while ((c = nextc(p)) >= 0);
}
pushback(p, c);
tokfix(p);
if (toklen(p) == start) {
no_digits();
}
else if (nondigit) goto trailing_uc;
suffix = number_literal_suffix(p);
pylval.nd = new_int(p, tok(p), 10, suffix);
return tINTEGER;
}
if (c == '_') {
/* 0_0 */
goto octal_number;
}
if (c == 'o' || c == 'O') {
/* prefixed octal */
c = nextc(p);
if (c < 0 || c == '_' || !ISDIGIT(c)) {
no_digits();
}
}
if (c >= '0' && c <= '7') {
/* octal */
octal_number:
do {
if (c == '_') {
if (nondigit) break;
nondigit = c;
continue;
}
if (c < '0' || c > '9') break;
if (c > '7') goto invalid_octal;
nondigit = 0;
tokadd(p, c);
} while ((c = nextc(p)) >= 0);
if (toklen(p) > start) {
pushback(p, c);
tokfix(p);
if (nondigit) goto trailing_uc;
suffix = number_literal_suffix(p);
pylval.nd = new_int(p, tok(p), 8, suffix);
return tINTEGER;
}
if (nondigit) {
pushback(p, c);
goto trailing_uc;
}
}
if (c > '7' && c <= '9') {
invalid_octal:
yyerror(NULL, p, "Invalid octal digit");
}
else if (c == '.' || c == 'e' || c == 'E') {
tokadd(p, '0');
}
else {
pushback(p, c);
suffix = number_literal_suffix(p);
pylval.nd = new_int(p, "0", 10, suffix);
return tINTEGER;
}
}
for (;;) {
switch (c) {
case '0': case '1': case '2': case '3': case '4':
case '5': case '6': case '7': case '8': case '9':
nondigit = 0;
tokadd(p, c);
break;
case '.':
if (nondigit) goto trailing_uc;
if (seen_point || seen_e) {
goto decode_num;
}
else {
int c0 = nextc(p);
if (c0 < 0 || !ISDIGIT(c0)) {
pushback(p, c0);
goto decode_num;
}
c = c0;
}
tokadd(p, '.');
tokadd(p, c);
is_float++;
seen_point++;
nondigit = 0;
break;
case 'e':
case 'E':
if (nondigit) {
pushback(p, c);
c = nondigit;
goto decode_num;
}
if (seen_e) {
goto decode_num;
}
tokadd(p, c);
seen_e++;
is_float++;
nondigit = c;
c = nextc(p);
if (c != '-' && c != '+') continue;
tokadd(p, c);
nondigit = c;
break;
case '_': /* '_' in number just ignored */
if (nondigit) goto decode_num;
nondigit = c;
break;
default:
goto decode_num;
}
c = nextc(p);
}
decode_num:
pushback(p, c);
if (nondigit) {
trailing_uc:
yyerror_c(p, "trailing non digit in number: ", (char)nondigit);
}
tokfix(p);
if (is_float) {
#ifdef MRB_NO_FLOAT
yywarning_s(p, "floating-point numbers are not supported", tok(p));
pylval.nd = new_int(p, "0", 10, 0);
return tINTEGER;
#else
double d;
if (!mrb_read_float(tok(p), NULL, &d)) {
yywarning_s(p, "corrupted float value", tok(p));
}
suffix = number_literal_suffix(p);
if (seen_e && (suffix & NUM_SUFFIX_R)) {
pushback(p, 'r');
suffix &= ~NUM_SUFFIX_R;
}
pylval.nd = new_float(p, tok(p), suffix);
return tFLOAT;
#endif
}
suffix = number_literal_suffix(p);
pylval.nd = new_int(p, tok(p), 10, suffix);
return tINTEGER;
}
case ')':
case ']':
p->paren_nest--;
/* fall through */
case '}':
COND_LEXPOP();
CMDARG_LEXPOP();
if (c == ')')
p->lstate = EXPR_ENDFN;
else
p->lstate = EXPR_END;
return c;
case ':':
c = nextc(p);
if (c == ':') {
if (IS_BEG() || p->lstate == EXPR_CLASS || IS_SPCARG(-1)) {
p->lstate = EXPR_BEG;
return tCOLON3;
}
p->lstate = EXPR_DOT;
return tCOLON2;
}
if (!space_seen && IS_END()) {
pushback(p, c);
/* In pattern matching context, use EXPR_ARG so newlines are significant */
p->lstate = p->in_kwarg ? EXPR_ARG : EXPR_BEG;
return tLABEL_TAG;
}
if (IS_END() || ISSPACE(c) || c == '#') {
pushback(p, c);
p->lstate = EXPR_BEG;
return ':';
}
pushback(p, c);
p->lstate = EXPR_FNAME;
return tSYMBEG;
case '/':
if (IS_BEG()) {
p->lex_strterm = new_strterm(p, str_regexp, '/', 0);
return tREGEXP_BEG;
}
if ((c = nextc(p)) == '=') {
pylval.id = intern_op(div);
p->lstate = EXPR_BEG;
return tOP_ASGN;
}
pushback(p, c);
if (IS_SPCARG(c)) {
p->lex_strterm = new_strterm(p, str_regexp, '/', 0);
return tREGEXP_BEG;
}
if (p->lstate == EXPR_FNAME || p->lstate == EXPR_DOT) {
p->lstate = EXPR_ARG;
}
else {
p->lstate = EXPR_BEG;
}
return '/';
case '^':
if ((c = nextc(p)) == '=') {
pylval.id = intern_op(xor);
p->lstate = EXPR_BEG;
return tOP_ASGN;
}
if (p->lstate == EXPR_FNAME || p->lstate == EXPR_DOT) {
p->lstate = EXPR_ARG;
}
else {
p->lstate = EXPR_BEG;
}
pushback(p, c);
return '^';
case ';':
p->lstate = EXPR_BEG;
return ';';
case ',':
p->lstate = EXPR_BEG;
return ',';
case '~':
if (p->lstate == EXPR_FNAME || p->lstate == EXPR_DOT) {
if ((c = nextc(p)) != '@') {
pushback(p, c);
}
p->lstate = EXPR_ARG;
}
else {
p->lstate = EXPR_BEG;
}
return '~';
case '(':
if (IS_BEG()) {
c = tLPAREN;
}
else if (IS_SPCARG(-1)) {
c = tLPAREN_ARG;
}
else if (p->lstate == EXPR_END && space_seen) {
c = tLPAREN_ARG;
}
p->paren_nest++;
COND_PUSH(0);
CMDARG_PUSH(0);
p->lstate = EXPR_BEG;
return c;
case '[':
p->paren_nest++;
if (p->lstate == EXPR_FNAME || p->lstate == EXPR_DOT) {
p->lstate = EXPR_ARG;
p->paren_nest--;
if ((c = nextc(p)) == ']') {
if ((c = nextc(p)) == '=') {
return tASET;
}
pushback(p, c);
return tAREF;
}
pushback(p, c);
return '[';
}
else if (IS_BEG()) {
c = tLBRACK;
}
else if (IS_ARG() && space_seen) {
c = tLBRACK;
}
p->lstate = EXPR_BEG;
COND_PUSH(0);
CMDARG_PUSH(0);
return c;
case '{':
if (p->lpar_beg && p->lpar_beg == p->paren_nest) {
p->lstate = EXPR_BEG;
p->lpar_beg = 0;
p->paren_nest--;
COND_PUSH(0);
CMDARG_PUSH(0);
return tLAMBEG;
}
if (IS_ARG() || p->lstate == EXPR_END || p->lstate == EXPR_ENDFN)
c = '{'; /* block (primary) */
else if (p->lstate == EXPR_ENDARG)
c = tLBRACE_ARG; /* block (expr) */
else
c = tLBRACE; /* hash */
COND_PUSH(0);
CMDARG_PUSH(0);
p->lstate = EXPR_BEG;
return c;
case '\\':
c = nextc(p);
if (c == '\n') {
p->lineno+=nlines; nlines=1;
p->column = 0;
space_seen = 1;
goto retry; /* skip \\n */
}
pushback(p, c);
return '\\';
case '%':
if (IS_BEG()) {
int term;
int paren;
c = nextc(p);
quotation:
if (c < 0 || !ISALNUM(c)) {
term = c;
c = 'Q';
}
else {
term = nextc(p);
if (ISALNUM(term)) {
yyerror(NULL, p, "unknown type of %string");
return 0;
}
}
if (c < 0 || term < 0) {
yyerror(NULL, p, "unterminated quoted string meets end of file");
return 0;
}
paren = term;
if (term == '(') term = ')';
else if (term == '[') term = ']';
else if (term == '{') term = '}';
else if (term == '<') term = '>';
else paren = 0;
switch (c) {
case 'Q':
p->lex_strterm = new_strterm(p, str_dquote, term, paren);
return tSTRING_BEG;
case 'q':
p->lex_strterm = new_strterm(p, str_squote, term, paren);
return parse_string(p);
case 'W':
p->lex_strterm = new_strterm(p, str_dword, term, paren);
return tWORDS_BEG;
case 'w':
p->lex_strterm = new_strterm(p, str_sword, term, paren);
return tWORDS_BEG;
case 'x':
p->lex_strterm = new_strterm(p, str_xquote, term, paren);
return tXSTRING_BEG;
case 'r':
p->lex_strterm = new_strterm(p, str_regexp, term, paren);
return tREGEXP_BEG;
case 's':
p->lex_strterm = new_strterm(p, str_ssym, term, paren);
return tSYMBEG;
case 'I':
p->lex_strterm = new_strterm(p, str_dsymbols, term, paren);
return tSYMBOLS_BEG;
case 'i':
p->lex_strterm = new_strterm(p, str_ssymbols, term, paren);
return tSYMBOLS_BEG;
default:
yyerror(NULL, p, "unknown type of %string");
return 0;
}
}
if ((c = nextc(p)) == '=') {
pylval.id = intern_op(mod);
p->lstate = EXPR_BEG;
return tOP_ASGN;
}
if (IS_SPCARG(c)) {
goto quotation;
}
if (p->lstate == EXPR_FNAME || p->lstate == EXPR_DOT) {
p->lstate = EXPR_ARG;
}
else {
p->lstate = EXPR_BEG;
}
pushback(p, c);
return '%';
case '$':
p->lstate = EXPR_END;
token_column = newtok(p);
c = nextc(p);
if (c < 0) {
yyerror(NULL, p, "incomplete global variable syntax");
return 0;
}
switch (c) {
case '_': /* $_: last read line string */
c = nextc(p);
if (c >= 0 && identchar(c)) { /* if there is more after _ it is a variable */
tokadd(p, '$');
tokadd(p, c);
break;
}
pushback(p, c);
c = '_';
/* fall through */
case '~': /* $~: match-data */
case '*': /* $*: argv */
case '$': /* $$: pid */
case '?': /* $?: last status */
case '!': /* $!: error string */
case '@': /* $@: error position */
case '/': /* $/: input record separator */
case '\\': /* $\: output record separator */
case ';': /* $;: field separator */
case ',': /* $,: output field separator */
case '.': /* $.: last read line number */
case '=': /* $=: ignorecase */
case ':': /* $:: load path */
case '<': /* $<: reading filename */
case '>': /* $>: default output handle */
case '\"': /* $": already loaded files */
tokadd(p, '$');
tokadd(p, c);
tokfix(p);
pylval.id = intern(tok(p), toklen(p));
return tGVAR;
case '-':
tokadd(p, '$');
tokadd(p, c);
c = nextc(p);
pushback(p, c);
gvar:
tokfix(p);
pylval.id = intern(tok(p), toklen(p));
return tGVAR;
case '&': /* $&: last match */
case '`': /* $`: string before last match */
case '\'': /* $': string after last match */
case '+': /* $+: string matches last pattern */
if (last_state == EXPR_FNAME) {
tokadd(p, '$');
tokadd(p, c);
goto gvar;
}
pylval.nd = new_back_ref(p, c);
return tBACK_REF;
case '1': case '2': case '3':
case '4': case '5': case '6':
case '7': case '8': case '9':
do {
tokadd(p, c);
c = nextc(p);
} while (c >= 0 && ISDIGIT(c));
pushback(p, c);
if (last_state == EXPR_FNAME) goto gvar;
tokfix(p);
{
mrb_int n;
if (!mrb_read_int(tok(p), NULL, NULL, &n)) {
yywarning(p, "capture group index too big; always nil");
return keyword_nil;
}
pylval.nd = new_nth_ref(p, (int)n);
}
return tNTH_REF;
default:
if (!identchar(c)) {
pushback(p, c);
return '$';
}
/* fall through */
case '0':
tokadd(p, '$');
}
break;
case '@':
c = nextc(p);
token_column = newtok(p);
tokadd(p, '@');
if (c == '@') {
tokadd(p, '@');
c = nextc(p);
}
if (c < 0) {
if (p->tidx == 1) {
yyerror(NULL, p, "incomplete instance variable syntax");
}
else {
yyerror(NULL, p, "incomplete class variable syntax");
}
return 0;
}
else if (ISDIGIT(c)) {
if (p->tidx == 1) {
yyerror_c(p, "wrong instance variable name: @", c);
}
else {
yyerror_c(p, "wrong class variable name: @@", c);
}
return 0;
}
if (!identchar(c)) {
pushback(p, c);
return '@';
}
break;
case '_':
token_column = newtok(p);
break;
default:
if (!identchar(c)) {
char buf[36];
const char s[] = "Invalid char in expression: 0x";
const char hexdigits[] = "0123456789ABCDEF";
strcpy(buf, s);
buf[sizeof(s)-1] = hexdigits[(c & 0xf0) >> 4];
buf[sizeof(s)] = hexdigits[(c & 0x0f)];
buf[sizeof(s)+1] = 0;
yyerror(NULL, p, buf);
goto retry;
}
token_column = newtok(p);
break;
}
do {
tokadd(p, c);
c = nextc(p);
if (c < 0) break;
} while (identchar(c));
if (token_column == 0 && toklen(p) == 7 && (c < 0 || c == '\n') &&
strncmp(tok(p), "__END__", toklen(p)) == 0)
return -1;
switch (tok(p)[0]) {
case '@': case '$':
pushback(p, c);
break;
default:
if ((c == '!' || c == '?') && !peek(p, '=')) {
tokadd(p, c);
}
else {
pushback(p, c);
}
}
tokfix(p);
{
int result = 0;
switch (tok(p)[0]) {
case '$':
p->lstate = EXPR_END;
result = tGVAR;
break;
case '@':
p->lstate = EXPR_END;
if (tok(p)[1] == '@')
result = tCVAR;
else
result = tIVAR;
break;
case '_':
if (toklen(p) == 2 && ISDIGIT(tok(p)[1]) && p->nvars) {
int n = tok(p)[1] - '0';
int nvar;
if (n > 0) {
nvar = node_to_int(p->nvars->car);
if (nvar != -2) { /* numbered parameters never appear on toplevel */
pylval.num = n;
p->lstate = EXPR_END;
return tNUMPARAM;
}
}
}
/* fall through */
default:
if (toklast(p) == '!' || toklast(p) == '?') {
result = tFID;
}
else {
if (p->lstate == EXPR_FNAME) {
if ((c = nextc(p)) == '=' && !peek(p, '~') && !peek(p, '>') &&
(!peek(p, '=') || (peek_n(p, '>', 1)))) {
result = tIDENTIFIER;
tokadd(p, c);
tokfix(p);
}
else {
pushback(p, c);
}
if ((c = nextc(p)) == '=' && !peek(p, '~') && !peek(p, '>') &&
(!peek(p, '=') || (peek_n(p, '>', 1)))) {
result = tIDENTIFIER;
tokadd(p, c);
tokfix(p);
}
else {
pushback(p, c);
}
}
if (result == 0 && ISUPPER(tok(p)[0])) {
result = tCONSTANT;
}
else {
result = tIDENTIFIER;
}
}
if (IS_LABEL_POSSIBLE()) {
if (IS_LABEL_SUFFIX(0)) {
p->lstate = EXPR_END;
tokfix(p);
pylval.id = intern(tok(p), toklen(p));
return tIDENTIFIER;
}
}
if (p->lstate != EXPR_DOT) {
const struct kwtable *kw;
/* See if it is a reserved word. */
kw = mrb_reserved_word(tok(p), toklen(p));
if (kw) {
enum mrb_lex_state_enum state = p->lstate;
pylval.num = p->lineno;
p->lstate = kw->state;
if (state == EXPR_FNAME) {
pylval.id = intern_cstr(kw->name);
return kw->id[0];
}
if (p->lstate == EXPR_BEG) {
p->cmd_start = TRUE;
}
if (kw->id[0] == keyword_do) {
if (p->lpar_beg && p->lpar_beg == p->paren_nest) {
p->lpar_beg = 0;
p->paren_nest--;
return keyword_do_LAMBDA;
}
if (COND_P()) return keyword_do_cond;
if (CMDARG_P() && state != EXPR_CMDARG)
return keyword_do_block;
if (state == EXPR_ENDARG || state == EXPR_BEG)
return keyword_do_block;
return keyword_do;
}
if (kw->id[0] == keyword_in) {
/* Set in_kwarg for pattern matching context */
p->in_kwarg++;
}
if (state == EXPR_BEG || state == EXPR_VALUE || state == EXPR_CLASS)
return kw->id[0];
else {
if (kw->id[0] != kw->id[1])
p->lstate = EXPR_BEG;
return kw->id[1];
}
}
}
if (IS_BEG() || p->lstate == EXPR_DOT || IS_ARG()) {
if (cmd_state) {
p->lstate = EXPR_CMDARG;
}
else {
p->lstate = EXPR_ARG;
}
}
else if (p->lstate == EXPR_FNAME) {
p->lstate = EXPR_ENDFN;
}
else {
p->lstate = EXPR_END;
}
}
{
mrb_sym ident = intern(tok(p), toklen(p));
pylval.id = ident;
if (last_state != EXPR_DOT && ISLOWER(tok(p)[0]) && local_var_p(p, ident)) {
p->lstate = EXPR_END;
}
}
return result;
}
}
static int
yylex(void *lval, void *lp, parser_state *p)
{
p->ylval = lval;
return parser_yylex(p);
}
static void
parser_init_cxt(parser_state *p, mrb_ccontext *cxt)
{
if (!cxt) return;
if (cxt->filename) mrb_parser_set_filename(p, cxt->filename);
if (cxt->lineno) p->lineno = cxt->lineno;
if (cxt->syms) {
int i;
p->locals = cons(0,0);
for (i=0; i<cxt->slen; i++) {
local_add_f(p, cxt->syms[i]);
}
}
p->capture_errors = cxt->capture_errors;
p->no_optimize = cxt->no_optimize;
p->no_ext_ops = cxt->no_ext_ops;
p->no_return_value = cxt->no_return_value;
p->upper = cxt->upper;
if (cxt->partial_hook) {
p->cxt = cxt;
}
}
static void
parser_update_cxt(parser_state *p, mrb_ccontext *cxt)
{
node *n, *n0;
int i = 0;
if (!cxt) return;
if (!p->tree) return;
if (!node_type_p(p->tree, NODE_SCOPE)) return;
/* Extract locals from variable-sized NODE_SCOPE */
struct mrb_ast_scope_node *scope = scope_node(p->tree);
n0 = n = scope->locals;
while (n) {
i++;
n = n->cdr;
}
cxt->syms = (mrb_sym*)mrbc_realloc(cxt->syms, i*sizeof(mrb_sym));
cxt->slen = i;
for (i=0, n=n0; n; i++,n=n->cdr) {
cxt->syms[i] = node_to_sym(n->car);
}
}
static void dump_node(mrb_state *mrb, node *tree, int offset);
MRB_API void
mrb_parser_parse(parser_state *p, mrb_ccontext *c)
{
struct mrb_jmpbuf buf1;
struct mrb_jmpbuf *prev = p->mrb->jmp;
p->mrb->jmp = &buf1;
MRB_TRY(p->mrb->jmp) {
int n = 1;
p->cmd_start = TRUE;
p->in_def = p->in_single = 0;
p->nerr = p->nwarn = 0;
p->lex_strterm = NULL;
parser_init_cxt(p, c);
n = yyparse(p);
if (n != 0 || p->nerr > 0) {
p->tree = 0;
p->mrb->jmp = prev;
return;
}
parser_update_cxt(p, c);
if (c && c->dump_result) {
dump_node(p->mrb, p->tree, 0);
}
}
MRB_CATCH(p->mrb->jmp) {
p->nerr++;
if (p->mrb->exc == NULL) {
yyerror(NULL, p, "memory allocation error");
p->nerr++;
p->tree = 0;
}
}
MRB_END_EXC(p->jmp);
p->mrb->jmp = prev;
}
MRB_API parser_state*
mrb_parser_new(mrb_state *mrb)
{
mempool *pool;
parser_state *p;
static const parser_state parser_state_zero = { 0 };
pool = mempool_open();
if (!pool) return NULL;
p = (parser_state*)mempool_alloc(pool, sizeof(parser_state));
if (!p) return NULL;
*p = parser_state_zero;
p->mrb = mrb;
p->pool = pool;
p->s = p->send = NULL;
#ifndef MRB_NO_STDIO
p->f = NULL;
#endif
p->cmd_start = TRUE;
p->in_def = p->in_single = 0;
p->capture_errors = FALSE;
p->lineno = 1;
p->column = 0;
#if defined(PARSER_TEST) || defined(PARSER_DEBUG)
yydebug = 1;
#endif
p->tsiz = MRB_PARSER_TOKBUF_SIZE;
p->tokbuf = p->buf;
p->lex_strterm = NULL;
p->current_filename_index = -1;
p->filename_table = NULL;
p->filename_table_length = 0;
return p;
}
MRB_API void
mrb_parser_free(parser_state *p) {
if (p->tokbuf != p->buf) {
mrbc_free(p->tokbuf);
}
mempool_close(p->pool);
}
MRB_API mrb_ccontext*
mrb_ccontext_new(mrb_state *mrb)
{
static const mrb_ccontext cc_zero = { 0 };
mrb_ccontext *cc = (mrb_ccontext*)mrbc_malloc(sizeof(mrb_ccontext));
*cc = cc_zero;
return cc;
}
MRB_API void
mrb_ccontext_free(mrb_state *mrb, mrb_ccontext *cxt)
{
mrbc_free(cxt->filename);
mrbc_free(cxt->syms);
mrbc_free(cxt);
}
MRB_API const char*
mrb_ccontext_filename(mrb_state *mrb, mrb_ccontext *c, const char *s)
{
if (s) {
size_t len = strlen(s);
char *p = (char*)mrbc_malloc(len + 1);
if (p == NULL) return NULL;
memcpy(p, s, len + 1);
if (c->filename) {
mrbc_free(c->filename);
}
c->filename = p;
}
return c->filename;
}
MRB_API void
mrb_ccontext_partial_hook(mrb_ccontext *c, int (*func)(struct mrb_parser_state*), void *data)
{
c->partial_hook = func;
c->partial_data = data;
}
MRB_API void
mrb_ccontext_cleanup_local_variables(mrb_ccontext *c)
{
if (c->syms) {
mrbc_free(c->syms);
c->syms = NULL;
c->slen = 0;
}
c->keep_lv = FALSE;
}
MRB_API void
mrb_parser_set_filename(struct mrb_parser_state *p, const char *f)
{
mrb_sym sym;
uint16_t i;
mrb_sym* new_table;
sym = mrb_intern_cstr(p->mrb, f);
p->filename_sym = sym;
/* Save current lineno so that AST nodes produced from a bison lookahead
across the file boundary (in partial_hook) can recover the correct
line in init_var_header instead of recording lineno=0. */
p->prev_file_lineno = p->lineno;
p->lineno = (p->filename_table_length > 0)? 0 : 1;
for (i = 0; i < p->filename_table_length; i++) {
if (p->filename_table[i] == sym) {
p->current_filename_index = i;
return;
}
}
if (p->filename_table_length == UINT16_MAX) {
yyerror(NULL, p, "too many files to compile");
return;
}
p->current_filename_index = p->filename_table_length++;
new_table = (mrb_sym*)parser_palloc(p, sizeof(mrb_sym) * p->filename_table_length);
if (p->filename_table) {
memmove(new_table, p->filename_table, sizeof(mrb_sym) * p->current_filename_index);
}
p->filename_table = new_table;
p->filename_table[p->filename_table_length - 1] = sym;
}
MRB_API mrb_sym
mrb_parser_get_filename(struct mrb_parser_state* p, uint16_t idx) {
if (idx >= p->filename_table_length) return 0;
else {
return p->filename_table[idx];
}
}
#ifndef MRB_NO_STDIO
static struct mrb_parser_state *
mrb_parse_file_continue(mrb_state *mrb, FILE *f, const void *prebuf, size_t prebufsize, mrb_ccontext *c)
{
parser_state *p;
p = mrb_parser_new(mrb);
if (!p) return NULL;
if (prebuf) {
p->s = (const char*)prebuf;
p->send = (const char*)prebuf + prebufsize;
}
else {
p->s = p->send = NULL;
}
p->f = f;
mrb_parser_parse(p, c);
return p;
}
MRB_API parser_state*
mrb_parse_file(mrb_state *mrb, FILE *f, mrb_ccontext *c)
{
return mrb_parse_file_continue(mrb, f, NULL, 0, c);
}
#endif
MRB_API parser_state*
mrb_parse_nstring(mrb_state *mrb, const char *s, size_t len, mrb_ccontext *c)
{
parser_state *p;
p = mrb_parser_new(mrb);
if (!p) return NULL;
p->s = s;
p->send = s + len;
mrb_parser_parse(p, c);
return p;
}
MRB_API parser_state*
mrb_parse_string(mrb_state *mrb, const char *s, mrb_ccontext *c)
{
return mrb_parse_nstring(mrb, s, strlen(s), c);
}
MRB_API mrb_value
mrb_load_exec(mrb_state *mrb, struct mrb_parser_state *p, mrb_ccontext *c)
{
struct RClass *target = mrb->object_class;
struct RProc *proc;
mrb_value v;
mrb_int keep = 0;
if (!p) {
return mrb_undef_value();
}
if (!p->tree || p->nerr) {
if (c) c->parser_nerr = p->nerr;
if (p->capture_errors) {
char buf[256];
strcpy(buf, "line ");
dump_int(p->error_buffer[0].lineno, buf+5);
strcat(buf, ": ");
strncat(buf, p->error_buffer[0].message, sizeof(buf) - strlen(buf) - 1);
mrb->exc = mrb_obj_ptr(mrb_exc_new(mrb, E_SYNTAX_ERROR, buf, strlen(buf)));
mrb_parser_free(p);
return mrb_undef_value();
}
else {
if (mrb->exc == NULL) {
mrb->exc = mrb_obj_ptr(mrb_exc_new_lit(mrb, E_SYNTAX_ERROR, "syntax error"));
}
mrb_parser_free(p);
return mrb_undef_value();
}
}
proc = mrb_generate_code(mrb, p);
mrb_parser_free(p);
if (proc == NULL) {
if (mrb->exc == NULL) {
mrb->exc = mrb_obj_ptr(mrb_exc_new_lit(mrb, E_SCRIPT_ERROR, "codegen error"));
}
return mrb_undef_value();
}
if (c) {
if (c->dump_result) mrb_codedump_all(mrb, proc);
if (c->no_exec) return mrb_obj_value(proc);
if (c->target_class) {
target = c->target_class;
}
if (c->keep_lv) {
keep = c->slen + 1;
}
else {
c->keep_lv = TRUE;
}
}
MRB_PROC_SET_TARGET_CLASS(proc, target);
if (mrb->c->ci) {
mrb_vm_ci_target_class_set(mrb->c->ci, target);
}
v = mrb_top_run(mrb, proc, mrb_top_self(mrb), keep);
if (mrb->exc) return mrb_nil_value();
return v;
}
#ifndef MRB_NO_STDIO
MRB_API mrb_value
mrb_load_file_cxt(mrb_state *mrb, FILE *f, mrb_ccontext *c)
{
return mrb_load_exec(mrb, mrb_parse_file(mrb, f, c), c);
}
MRB_API mrb_value
mrb_load_file(mrb_state *mrb, FILE *f)
{
return mrb_load_file_cxt(mrb, f, NULL);
}
#define DETECT_SIZE 64
/*
* In order to be recognized as a `.mrb` file, the following three points must be satisfied:
* - File starts with "RITE"
* - At least `sizeof(struct rite_binary_header)` bytes can be read
* - `NUL` is included in the first 64 bytes of the file
*/
MRB_API mrb_value
mrb_load_detect_file_cxt(mrb_state *mrb, FILE *fp, mrb_ccontext *c)
{
union {
char b[DETECT_SIZE];
struct rite_binary_header h;
} leading;
size_t bufsize;
if (mrb == NULL || fp == NULL) {
return mrb_nil_value();
}
bufsize = fread(leading.b, sizeof(char), sizeof(leading), fp);
if (bufsize < sizeof(leading.h) ||
memcmp(leading.h.binary_ident, RITE_BINARY_IDENT, sizeof(leading.h.binary_ident)) != 0 ||
memchr(leading.b, '\0', bufsize) == NULL) {
return mrb_load_exec(mrb, mrb_parse_file_continue(mrb, fp, leading.b, bufsize, c), c);
}
else {
mrb_int binsize = bin_to_uint32(leading.h.binary_size);
mrb_value bin_obj = mrb_str_new(mrb, NULL, binsize);
uint8_t *bin = (uint8_t*)RSTRING_PTR(bin_obj);
if ((size_t)binsize > bufsize) {
memcpy(bin, leading.b, bufsize);
if (fread(bin + bufsize, binsize - bufsize, 1, fp) == 0) {
binsize = bufsize;
/* The error is reported by mrb_load_irep_buf_cxt() */
}
}
mrb_value result = mrb_load_irep_buf_cxt(mrb, bin, binsize, c);
if (mrb_string_p(bin_obj)) mrb_str_resize(mrb, bin_obj, 0);
return result;
}
}
#endif
MRB_API mrb_value
mrb_load_nstring_cxt(mrb_state *mrb, const char *s, size_t len, mrb_ccontext *c)
{
return mrb_load_exec(mrb, mrb_parse_nstring(mrb, s, len, c), c);
}
MRB_API mrb_value
mrb_load_nstring(mrb_state *mrb, const char *s, size_t len)
{
return mrb_load_nstring_cxt(mrb, s, len, NULL);
}
MRB_API mrb_value
mrb_load_string_cxt(mrb_state *mrb, const char *s, mrb_ccontext *c)
{
return mrb_load_nstring_cxt(mrb, s, strlen(s), c);
}
MRB_API mrb_value
mrb_load_string(mrb_state *mrb, const char *s)
{
return mrb_load_string_cxt(mrb, s, NULL);
}
#ifndef MRB_NO_STDIO
static void
dump_prefix(int offset, uint16_t lineno)
{
printf("%05d ", lineno);
while (offset--) {
putc(' ', stdout);
putc(' ', stdout);
}
}
static void
dump_recur(mrb_state *mrb, node *tree, int offset)
{
while (tree) {
dump_node(mrb, tree->car, offset);
tree = tree->cdr;
}
}
static void
dump_locals(mrb_state *mrb, node *tree, int offset, uint16_t lineno)
{
if (!tree || (!tree->car && !tree->cdr)) return;
dump_prefix(offset, lineno);
printf("locals:\n");
dump_prefix(offset+1, lineno);
while (tree) {
if (tree->car) {
mrb_sym sym = node_to_sym(tree->car);
if (sym != 0) {
const char *name = mrb_sym_name(mrb, sym);
if (name && strlen(name) > 0 && name[0] != '!' && name[0] != '@' && name[0] != '$') {
printf(" %s", mrb_sym_dump(mrb, sym));
}
else {
printf(" (invalid symbol: %s)", name ? name : "(null)");
}
}
else {
printf(" (anonymous)");
}
}
tree = tree->cdr;
}
printf("\n");
}
static void
dump_cpath(mrb_state *mrb, node *tree, int offset, uint16_t lineno)
{
dump_prefix(offset, lineno);
printf("cpath: ");
if (!tree) {
printf("(null)\n");
}
else if (node_to_int(tree->car) == 0) {
printf("(null)\n");
}
else if (node_to_int(tree->car) == 1) {
printf("Object\n");
}
else {
printf("\n");
dump_node(mrb, tree->car, offset+1);
}
dump_prefix(offset, lineno);
printf("name: %s\n", mrb_sym_dump(mrb, node_to_sym(tree->cdr)));
}
/*
* This function restores the GC arena on return.
* For this reason, if a process that further generates an object is
* performed at the caller, the string pointer returned as the return
* value may become invalid.
*/
static const char*
str_dump(mrb_state *mrb, const char *str, int len)
{
int ai = mrb_gc_arena_save(mrb);
mrb_value s = mrb_str_new(mrb, str, (mrb_int)len);
s = mrb_str_dump(mrb, s);
mrb_gc_arena_restore(mrb, ai);
return RSTRING_PTR(s);
}
static void
dump_str(mrb_state *mrb, node *n, int offset, uint16_t lineno)
{
while (n) {
dump_prefix(offset, lineno);
int len = node_to_int(n->car->car);
if (len >= 0) {
printf("str: %s\n", str_dump(mrb, (char*)n->car->cdr, len));
}
else {
printf("interpolation:\n");
dump_node(mrb, n->car->cdr, offset+1);
}
n = n->cdr;
}
}
static void
dump_args(mrb_state *mrb, struct mrb_ast_args *args, int offset, uint16_t lineno)
{
if (args->mandatory_args) {
dump_prefix(offset, lineno);
printf("mandatory args:\n");
dump_recur(mrb, args->mandatory_args, offset+1);
}
if (args->optional_args) {
dump_prefix(offset, lineno);
printf("optional args:\n");
{
node *n = args->optional_args;
while (n) {
dump_prefix(offset+1, lineno);
printf("%s=\n", mrb_sym_name(mrb, node_to_sym(n->car->car)));
dump_node(mrb, n->car->cdr, offset+2);
n = n->cdr;
}
}
}
if (args->rest_arg) {
mrb_sym rest = args->rest_arg;
dump_prefix(offset, lineno);
if (rest == MRB_OPSYM(mul))
printf("rest=*\n");
else
printf("rest=*%s\n", mrb_sym_name(mrb, rest));
}
if (args->post_mandatory_args) {
dump_prefix(offset, lineno);
printf("post mandatory args:\n");
dump_recur(mrb, args->post_mandatory_args, offset+1);
}
if (args->keyword_args) {
dump_prefix(offset, lineno);
printf("keyword args:\n");
{
node *n = args->keyword_args;
while (n) {
dump_prefix(offset+1, lineno);
printf("%s:\n", mrb_sym_name(mrb, node_to_sym(n->car->car)));
dump_node(mrb, n->car->cdr, offset+2);
n = n->cdr;
}
}
}
if (args->kwrest_arg) {
mrb_sym rest = args->kwrest_arg;
dump_prefix(offset, lineno);
if (rest == MRB_OPSYM(pow))
printf("kwrest=**\n");
else
printf("kwrest=**%s\n", mrb_sym_name(mrb, rest));
}
if (args->block_arg) {
mrb_sym blk = args->block_arg;
dump_prefix(offset, lineno);
if (blk == MRB_OPSYM(and))
printf("blk=&\n");
else if (blk == MRB_SYM(nil))
printf("blk=&nil\n");
else
printf("blk=&%s\n", mrb_sym_name(mrb, blk));
}
}
static void
dump_callargs(mrb_state *mrb, node *n, int offset, uint16_t lineno)
{
if (!n) return;
struct mrb_ast_callargs *args = (struct mrb_ast_callargs*)n;
if (args->regular_args) {
dump_prefix(offset+1, lineno);
printf("args:\n");
dump_recur(mrb, args->regular_args, offset+2);
}
if (args->keyword_args) {
dump_prefix(offset+1, lineno);
printf("kw_args:\n");
node *kw = args->keyword_args;
while (kw) {
dump_prefix(offset+2, lineno);
printf("key:\n");
if (node_to_sym(kw->car->car) == MRB_OPSYM(pow)) {
dump_prefix(offset+3, lineno);
printf("**:\n");
}
else {
dump_node(mrb, kw->car->car, offset+3);
}
dump_prefix(offset+2, lineno);
printf("value:\n");
dump_node(mrb, kw->car->cdr, offset+3);
kw = kw->cdr;
}
}
if (args->block_arg) {
dump_prefix(offset+1, lineno);
printf("block:\n");
dump_node(mrb, args->block_arg, offset+2);
}
}
#endif
void
dump_node(mrb_state *mrb, node *tree, int offset)
{
#ifndef MRB_NO_STDIO
enum node_type nodetype;
uint16_t lineno = 0;
if (!tree) return;
/* Extract line number from variable-sized node header */
if (node_type(tree) != NODE_LAST) {
lineno = ((struct mrb_ast_var_header*)tree)->lineno;
}
dump_prefix(offset, lineno);
/* All nodes are now variable-sized nodes with headers */
nodetype = node_type(tree);
switch (nodetype) {
/* Variable-sized node cases */
case NODE_SCOPE:
printf("NODE_SCOPE:\n");
if (scope_node(tree)->locals) {
dump_locals(mrb, scope_node(tree)->locals, offset+1, lineno);
}
if (scope_node(tree)->body) {
dump_prefix(offset+1, lineno);
printf("body:\n");
dump_node(mrb, scope_node(tree)->body, offset+2);
}
break;
case NODE_INT:
printf("NODE_INT: %d\n", int_node(tree)->value);
break;
case NODE_BIGINT:
printf("NODE_BIGINT: %s (base %d)\n", bigint_node(tree)->string, bigint_node(tree)->base);
break;
case NODE_FLOAT:
printf("NODE_FLOAT: %s\n", float_node(tree)->value);
break;
case NODE_STR:
printf("NODE_STR:\n");
dump_str(mrb, str_node(tree)->list, offset+1, lineno);
break;
case NODE_XSTR:
printf("NODE_XSTR:\n");
dump_str(mrb, xstr_node(tree)->list, offset+1, lineno);
break;
case NODE_SYM:
printf("NODE_SYM: %s\n", mrb_sym_dump(mrb, sym_node(tree)->symbol));
break;
case NODE_DSYM:
printf("NODE_DSYM:\n");
dump_str(mrb, str_node(tree)->list, offset+1, lineno);
break;
case NODE_LVAR:
printf("NODE_LVAR: %s\n", mrb_sym_dump(mrb, var_node(tree)->symbol));
break;
case NODE_GVAR:
printf("NODE_GVAR: %s\n", mrb_sym_dump(mrb, var_node(tree)->symbol));
break;
case NODE_IVAR:
printf("NODE_IVAR: %s\n", mrb_sym_dump(mrb, var_node(tree)->symbol));
break;
case NODE_CVAR:
printf("NODE_CVAR: %s\n", mrb_sym_dump(mrb, var_node(tree)->symbol));
break;
case NODE_NVAR:
printf("NODE_NVAR: %d\n", nvar_node(tree)->num);
break;
case NODE_CONST:
printf("NODE_CONST: %s\n", mrb_sym_dump(mrb, var_node(tree)->symbol));
break;
case NODE_CALL:
printf("NODE_CALL: %s\n", mrb_sym_dump(mrb, call_node(tree)->method_name));
if (call_node(tree)->receiver) {
dump_prefix(offset+1, lineno);
printf("receiver:\n");
dump_node(mrb, call_node(tree)->receiver, offset+2);
}
if (call_node(tree)->args) {
dump_callargs(mrb, call_node(tree)->args, offset, lineno);
}
break;
case NODE_ARRAY:
printf("NODE_ARRAY:\n");
if (array_node(tree)->elements) {
dump_recur(mrb, array_node(tree)->elements, offset+1);
}
break;
case NODE_TRUE:
printf("NODE_TRUE\n");
break;
case NODE_FALSE:
printf("NODE_FALSE\n");
break;
case NODE_NIL:
printf("NODE_NIL\n");
break;
case NODE_SELF:
printf("NODE_SELF\n");
break;
case NODE_IF:
printf("NODE_IF:\n");
if (if_node(tree)->condition) {
dump_prefix(offset+1, lineno);
printf("cond:\n");
dump_node(mrb, if_node(tree)->condition, offset+2);
}
if (if_node(tree)->then_body) {
dump_prefix(offset+1, lineno);
printf("then:\n");
dump_node(mrb, if_node(tree)->then_body, offset+2);
}
if (if_node(tree)->else_body) {
dump_prefix(offset+1, lineno);
printf("else:\n");
dump_node(mrb, if_node(tree)->else_body, offset+2);
}
break;
case NODE_DEF:
printf("NODE_DEF: %s\n", mrb_sym_dump(mrb, def_node(tree)->name));
if (def_node(tree)->args) {
dump_args(mrb, sdef_node(tree)->args, offset+1, lineno);
}
if (def_node(tree)->locals) {
dump_locals(mrb, def_node(tree)->locals, offset+1, lineno);
}
if (def_node(tree)->body) {
dump_prefix(offset+1, lineno);
printf("body:\n");
dump_node(mrb, def_node(tree)->body, offset+2);
}
break;
case NODE_ASGN:
printf("NODE_ASGN:\n");
if (asgn_node(tree)->lhs) {
dump_prefix(offset+1, lineno);
printf("lhs:\n");
dump_node(mrb, asgn_node(tree)->lhs, offset+2);
}
if (asgn_node(tree)->rhs) {
dump_prefix(offset+1, lineno);
printf("rhs:\n");
dump_node(mrb, asgn_node(tree)->rhs, offset+2);
}
break;
case NODE_MASGN:
case NODE_MARG:
printf("%s:\n", node_type(tree) == NODE_MASGN ? "NODE_MASGN" : "NODE_MARG");
/* Handle pre-splat variables */
if (masgn_node(tree)->pre) {
dump_prefix(offset+1, lineno);
printf("pre:\n");
dump_recur(mrb, masgn_node(tree)->pre, offset+2);
}
/* Handle splat variable (can be -1 sentinel for anonymous splat) */
if (masgn_node(tree)->rest) {
if ((intptr_t)masgn_node(tree)->rest == -1) {
dump_prefix(offset+1, lineno);
printf("rest: *<anonymous>\n");
}
else {
dump_prefix(offset+1, lineno);
printf("rest:\n");
dump_node(mrb, masgn_node(tree)->rest, offset+2);
}
}
/* Handle post-splat variables */
if (masgn_node(tree)->post) {
dump_prefix(offset+1, lineno);
printf("post:\n");
dump_recur(mrb, masgn_node(tree)->post, offset+2);
}
if (masgn_node(tree)->rhs) {
dump_prefix(offset+1, lineno);
printf("rhs:\n");
dump_node(mrb, masgn_node(tree)->rhs, offset+2);
}
break;
case NODE_RETURN:
printf("NODE_RETURN:\n");
if (return_node(tree)->args) {
dump_node(mrb, return_node(tree)->args, offset);
}
break;
case NODE_BREAK:
printf("NODE_BREAK:\n");
if (break_node(tree)->value) {
dump_prefix(offset+1, lineno);
printf("value:\n");
dump_node(mrb, break_node(tree)->value, offset+2);
}
break;
case NODE_NEXT:
printf("NODE_NEXT:\n");
if (next_node(tree)->value) {
dump_prefix(offset+1, lineno);
printf("value:\n");
dump_node(mrb, next_node(tree)->value, offset+2);
}
break;
case NODE_NEGATE:
printf("NODE_NEGATE:\n");
if (negate_node(tree)->operand) {
dump_prefix(offset+1, lineno);
printf("operand:\n");
dump_node(mrb, negate_node(tree)->operand, offset+2);
}
break;
case NODE_STMTS:
printf("NODE_STMTS:\n");
if (stmts_node(tree)->stmts) {
dump_recur(mrb, stmts_node(tree)->stmts, offset+1);
}
break;
case NODE_BEGIN:
printf("NODE_BEGIN:\n");
if (begin_node(tree)->body) {
dump_node(mrb, begin_node(tree)->body, offset+1);
}
break;
case NODE_RESCUE:
printf("NODE_RESCUE:\n");
if (rescue_node(tree)->body) {
dump_prefix(offset+1, lineno);
printf("body:\n");
dump_node(mrb, rescue_node(tree)->body, offset+2);
}
if (rescue_node(tree)->rescue_clauses) {
node *n2 = rescue_node(tree)->rescue_clauses;
dump_prefix(offset+1, lineno);
printf("rescue:\n");
while (n2) {
node *n3 = n2->car;
if (n3->car) {
dump_prefix(offset+2, lineno);
printf("handle classes:\n");
dump_recur(mrb, n3->car, offset+3);
}
if (n3->cdr->car) {
dump_prefix(offset+2, lineno);
printf("exc_var:\n");
dump_node(mrb, n3->cdr->car, offset+3);
}
if (n3->cdr->cdr->car) {
dump_prefix(offset+2, lineno);
printf("rescue body:\n");
dump_node(mrb, n3->cdr->cdr->car, offset+3);
}
n2 = n2->cdr;
}
}
if (rescue_node(tree)->else_clause) {
dump_prefix(offset+1, lineno);
printf("else:\n");
dump_node(mrb, rescue_node(tree)->else_clause, offset+2);
}
break;
case NODE_ENSURE:
printf("NODE_ENSURE:\n");
if (ensure_node(tree)->body) {
dump_prefix(offset+1, lineno);
printf("body:\n");
dump_node(mrb, ensure_node(tree)->body, offset+2);
}
if (ensure_node(tree)->ensure_clause) {
dump_prefix(offset+1, lineno);
printf("ensure:\n");
dump_node(mrb, ensure_node(tree)->ensure_clause, offset+2);
}
break;
case NODE_LAMBDA:
printf("NODE_LAMBDA:\n");
goto block;
case NODE_BLOCK:
printf("NODE_BLOCK:\n");
block:
if (block_node(tree)->locals) {
dump_locals(mrb, block_node(tree)->locals, offset+1, lineno);
}
if (block_node(tree)->args) {
dump_args(mrb, block_node(tree)->args, offset+1, lineno);
}
dump_prefix(offset+1, lineno);
printf("body:\n");
dump_node(mrb, block_node(tree)->body, offset+2);
break;
case NODE_AND:
printf("NODE_AND:\n");
dump_node(mrb, and_node(tree)->left, offset+1);
dump_node(mrb, and_node(tree)->right, offset+1);
break;
case NODE_OR:
printf("NODE_OR:\n");
dump_node(mrb, or_node(tree)->left, offset+1);
dump_node(mrb, or_node(tree)->right, offset+1);
break;
case NODE_CASE:
printf("NODE_CASE:\n");
if (case_node(tree)->value) {
dump_prefix(offset+1, lineno);
printf("value:\n");
dump_node(mrb, case_node(tree)->value, offset+2);
}
if (case_node(tree)->body) {
node *when_node = case_node(tree)->body;
while (when_node) {
dump_prefix(offset+1, lineno);
printf("when:\n");
node *when_clause = when_node->car;
if (when_clause && when_clause->car) {
dump_prefix(offset+2, lineno);
printf("cond:\n");
dump_recur(mrb, when_clause->car, offset+3);
}
if (when_clause && when_clause->cdr) {
dump_prefix(offset+2, lineno);
printf("body:\n");
dump_node(mrb, when_clause->cdr, offset+3);
}
when_node = when_node->cdr;
}
}
break;
case NODE_WHILE:
printf("NODE_WHILE:\n");
goto dump_loop_node;
case NODE_UNTIL:
printf("NODE_UNTIL:\n");
goto dump_loop_node;
case NODE_WHILE_MOD:
printf("NODE_WHILE_MOD:\n");
goto dump_loop_node;
case NODE_UNTIL_MOD:
printf("NODE_UNTIL_MOD:\n");
dump_loop_node:
dump_prefix(offset+1, lineno);
printf("cond:\n");
dump_node(mrb, while_node(tree)->condition, offset+2);
dump_prefix(offset+1, lineno);
printf("body:\n");
dump_node(mrb, while_node(tree)->body, offset+2);
break;
case NODE_FOR:
printf("NODE_FOR:\n");
if (for_node(tree)->var) {
dump_prefix(offset+1, lineno);
printf("var:\n");
/* FOR_NODE_VAR structure:
* var_list->car: cons-list of pre-splat variables
* var_list->cdr->car: splat varnode (not a cons-list)
* var_list->cdr->cdr->car: cons-list of post-splat variables */
node *var_list = for_node(tree)->var;
if (var_list) {
dump_recur(mrb, var_list->car, offset+2);
if (var_list && var_list->cdr) {
/* Second element is a varnode, not a cons-list */
dump_prefix(offset+1, lineno);
printf("splat var:\n");
dump_node(mrb, var_list->cdr->car, offset+2);
if (var_list->cdr->cdr) {
/* Third element is a cons-list of post-splat variables */
dump_prefix(offset+1, lineno);
printf("post var:\n");
dump_recur(mrb, var_list->cdr->cdr->car, offset+2);
}
}
}
}
if (for_node(tree)->iterable) {
dump_prefix(offset+1, lineno);
printf("iterable:\n");
dump_node(mrb, for_node(tree)->iterable, offset+2);
}
if (for_node(tree)->body) {
dump_prefix(offset+1, lineno);
printf("body:\n");
dump_node(mrb, for_node(tree)->body, offset+2);
}
break;
case NODE_DOT2:
printf("NODE_DOT2:\n");
{
if (dot2_node(tree)->left) {
dump_prefix(offset+1, lineno);
printf("left:\n");
dump_node(mrb, dot2_node(tree)->left, offset+2);
}
if (dot2_node(tree)->right) {
dump_prefix(offset+1, lineno);
printf("right:\n");
dump_node(mrb, dot2_node(tree)->right, offset+2);
}
}
break;
case NODE_DOT3:
printf("NODE_DOT3:\n");
{
if (dot3_node(tree)->left) {
dump_prefix(offset+1, lineno);
printf("left:\n");
dump_node(mrb, dot3_node(tree)->left, offset+2);
}
if (dot3_node(tree)->right) {
dump_prefix(offset+1, lineno);
printf("right:\n");
dump_node(mrb, dot3_node(tree)->right, offset+2);
}
}
break;
case NODE_COLON2:
printf("NODE_COLON2:\n");
if (colon2_node(tree)->base) {
dump_prefix(offset+1, lineno);
printf("base:\n");
dump_node(mrb, colon2_node(tree)->base, offset+2);
}
dump_prefix(offset+1, lineno);
printf("name: %s\n", mrb_sym_name(mrb, colon2_node(tree)->name));
break;
case NODE_COLON3:
printf("NODE_COLON3: ::%s\n", mrb_sym_name(mrb, colon3_node(tree)->name));
break;
case NODE_HASH:
printf("NODE_HASH:\n");
{
node *pairs = hash_node(tree)->pairs;
while (pairs) {
dump_prefix(offset+1, lineno);
printf("key:\n");
if (node_to_sym(pairs->car->car) == MRB_OPSYM(pow)) {
dump_prefix(offset+2, lineno);
printf("**\n");
}
else {
dump_node(mrb, pairs->car->car, offset+2);
}
dump_prefix(offset+1, lineno);
printf("value:\n");
dump_node(mrb, pairs->car->cdr, offset+2);
pairs = pairs->cdr;
}
}
break;
case NODE_SPLAT:
printf("NODE_SPLAT:\n");
dump_node(mrb, splat_node(tree)->value, offset+1);
break;
case NODE_OP_ASGN:
printf("NODE_OP_ASGN:\n");
dump_prefix(offset+1, lineno);
printf("lhs:\n");
dump_node(mrb, op_asgn_node(tree)->lhs, offset+2);
dump_prefix(offset+1, lineno);
printf("op='%s' (%d)\n", mrb_sym_name(mrb, op_asgn_node(tree)->op), (int)op_asgn_node(tree)->op);
dump_node(mrb, op_asgn_node(tree)->rhs, offset+1);
break;
case NODE_SUPER:
printf("NODE_SUPER:\n");
if (super_node(tree)->args) {
dump_callargs(mrb, super_node(tree)->args, offset, lineno);
}
break;
case NODE_ZSUPER:
printf("NODE_ZSUPER:\n");
if (super_node(tree)->args) {
dump_callargs(mrb, super_node(tree)->args, offset, lineno);
}
break;
case NODE_YIELD:
printf("NODE_YIELD:\n");
if (yield_node(tree)->args) {
dump_callargs(mrb, yield_node(tree)->args, offset, lineno);
}
break;
case NODE_REDO:
printf("NODE_REDO\n");
break;
case NODE_RETRY:
printf("NODE_RETRY\n");
break;
case NODE_BACK_REF:
printf("NODE_BACK_REF: $%c\n", node_to_int(tree));
break;
case NODE_NTH_REF:
printf("NODE_NTH_REF: $%d\n", node_to_int(tree));
break;
case NODE_BLOCK_ARG:
printf("NODE_BLOCK_ARG:\n");
dump_node(mrb, block_arg_node(tree)->value, offset+1);
break;
case NODE_REGX:
printf("NODE_REGX:\n");
if (regx_node(tree)->list) {
dump_str(mrb, regx_node(tree)->list, offset+1, lineno);
}
if (regx_node(tree)->flags) {
dump_prefix(offset+1, lineno);
printf("flags: %s\n", regx_node(tree)->flags);
}
if (regx_node(tree)->encoding) {
dump_prefix(offset+1, lineno);
printf("encoding: %s\n", regx_node(tree)->encoding);
}
break;
case NODE_WORDS:
printf("NODE_WORDS:\n");
if (words_node(tree)->args) {
node *list = words_node(tree)->args;
while (list && list->car) {
node *item = list->car;
if (item->car == 0 && item->cdr == 0) {
/* Skip separator (0 . 0) */
}
else if (item->car && item->cdr) {
/* String item: (len . str) */
dump_prefix(offset+1, lineno);
int len = node_to_int(item->car);
if (len >= 0 && len < 1000 && item->cdr) {
printf("word: \"%.*s\"\n", len, (char*)item->cdr);
}
}
list = list->cdr;
}
}
break;
case NODE_SYMBOLS:
printf("NODE_SYMBOLS:\n");
if (symbols_node(tree)->args) {
node *list = symbols_node(tree)->args;
while (list && list->car) {
node *item = list->car;
if (item->car == 0 && item->cdr == 0) {
/* Skip separator (0 . 0) */
}
else if (item->car && item->cdr) {
/* String item: (len . str) */
dump_prefix(offset+1, lineno);
int len = node_to_int(item->car);
if (len >= 0 && len < 1000 && item->cdr) {
printf("symbol: \"%.*s\"\n", len, (char*)item->cdr);
}
}
list = list->cdr;
}
}
break;
case NODE_ALIAS:
printf("NODE_ALIAS %s %s:\n",
mrb_sym_dump(mrb, node_to_sym(tree->car)),
mrb_sym_dump(mrb, node_to_sym(tree->cdr)));
break;
case NODE_UNDEF:
printf("NODE_UNDEF");
{
node *t = tree;
while (t) {
printf(" %s", mrb_sym_dump(mrb, node_to_sym(t->car)));
t = t->cdr;
}
}
printf(":\n");
break;
case NODE_CLASS:
printf("NODE_CLASS:\n");
if (class_node(tree)->name) {
dump_cpath(mrb, module_node(tree)->name, offset+1, lineno);
}
if (class_node(tree)->superclass) {
dump_prefix(offset+1, lineno);
printf("super:\n");
dump_node(mrb, class_node(tree)->superclass, offset+2);
}
if (class_node(tree)->body) {
dump_prefix(offset+1, lineno);
printf("body:\n");
dump_node(mrb, class_node(tree)->body->cdr, offset+2);
}
break;
case NODE_MODULE:
printf("NODE_MODULE:\n");
if (module_node(tree)->name) {
dump_cpath(mrb, module_node(tree)->name, offset+1, lineno);
}
if (module_node(tree)->body) {
dump_prefix(offset+1, lineno);
printf("body:\n");
dump_node(mrb, module_node(tree)->body->cdr, offset+2);
}
break;
case NODE_SCLASS:
printf("NODE_SCLASS:\n");
if (sclass_node(tree)->obj) {
dump_prefix(offset+1, lineno);
printf("obj:\n");
dump_node(mrb, sclass_node(tree)->obj, offset+2);
}
if (sclass_node(tree)->body) {
dump_prefix(offset+1, lineno);
printf("body:\n");
dump_node(mrb, sclass_node(tree)->body->cdr, offset+2);
}
break;
case NODE_SDEF:
printf("NODE_SDEF: %s\n", mrb_sym_dump(mrb, def_node(tree)->name));
if (sdef_node(tree)->obj) {
dump_prefix(offset+1, lineno);
printf("recv:\n");
dump_node(mrb, sdef_node(tree)->obj, offset+2);
}
if (sdef_node(tree)->args) {
dump_args(mrb, sdef_node(tree)->args, offset+1, lineno);
}
if (sdef_node(tree)->locals) {
dump_locals(mrb, sdef_node(tree)->locals, offset+1, lineno);
}
if (sdef_node(tree)->body) {
dump_prefix(offset+1, lineno);
printf("body:\n");
dump_node(mrb, sdef_node(tree)->body, offset+2);
}
break;
case NODE_POSTEXE:
printf("NODE_POSTEXE:\n");
dump_node(mrb, tree, offset+1);
break;
case NODE_HEREDOC:
printf("NODE_HEREDOC:\n");
if (heredoc_node(tree)->info.term) {
dump_prefix(offset+1, lineno);
printf("terminator: \"%s\"\n", heredoc_node(tree)->info.term);
}
if (heredoc_node(tree)->info.doc) {
dump_prefix(offset+1, lineno);
printf("body:\n");
dump_str(mrb, heredoc_node(tree)->info.doc, offset+2, lineno);
}
if (heredoc_node(tree)->info.allow_indent) {
dump_prefix(offset+1, lineno);
printf("allow_indent: true\n");
}
if (heredoc_node(tree)->info.remove_indent) {
dump_prefix(offset+1, lineno);
printf("remove_indent: true\n");
}
break;
case NODE_CASE_MATCH:
printf("NODE_CASE_MATCH:\n");
if (case_match_node(tree)->value) {
dump_prefix(offset+1, lineno);
printf("value:\n");
dump_node(mrb, case_match_node(tree)->value, offset+2);
}
if (case_match_node(tree)->in_clauses) {
node *in_clause = case_match_node(tree)->in_clauses;
while (in_clause) {
dump_node(mrb, in_clause->car, offset+1);
in_clause = in_clause->cdr;
}
}
break;
case NODE_IN:
printf("NODE_IN:\n");
if (in_node(tree)->pattern) {
dump_prefix(offset+1, lineno);
printf("pattern:\n");
dump_node(mrb, in_node(tree)->pattern, offset+2);
}
if (in_node(tree)->guard) {
dump_prefix(offset+1, lineno);
printf("guard (%s):\n", in_node(tree)->guard_is_unless ? "unless" : "if");
dump_node(mrb, in_node(tree)->guard, offset+2);
}
if (in_node(tree)->body) {
dump_prefix(offset+1, lineno);
printf("body:\n");
dump_node(mrb, in_node(tree)->body, offset+2);
}
break;
case NODE_PAT_VALUE:
printf("NODE_PAT_VALUE:\n");
if (pat_value_node(tree)->value) {
dump_node(mrb, pat_value_node(tree)->value, offset+1);
}
break;
case NODE_PAT_VAR:
if (pat_var_node(tree)->name) {
printf("NODE_PAT_VAR: %s\n", mrb_sym_dump(mrb, pat_var_node(tree)->name));
}
else {
printf("NODE_PAT_VAR: _ (wildcard)\n");
}
break;
case NODE_PAT_PIN:
printf("NODE_PAT_PIN: ^%s\n", mrb_sym_dump(mrb, pat_pin_node(tree)->name));
break;
case NODE_PAT_AS:
printf("NODE_PAT_AS: => %s\n", mrb_sym_dump(mrb, pat_as_node(tree)->name));
if (pat_as_node(tree)->pattern) {
dump_prefix(offset+1, lineno);
printf("pattern:\n");
dump_node(mrb, pat_as_node(tree)->pattern, offset+2);
}
break;
case NODE_PAT_ALT:
printf("NODE_PAT_ALT:\n");
if (pat_alt_node(tree)->left) {
dump_prefix(offset+1, lineno);
printf("left:\n");
dump_node(mrb, pat_alt_node(tree)->left, offset+2);
}
if (pat_alt_node(tree)->right) {
dump_prefix(offset+1, lineno);
printf("right:\n");
dump_node(mrb, pat_alt_node(tree)->right, offset+2);
}
break;
case NODE_PAT_ARRAY:
printf("NODE_PAT_ARRAY:\n");
if (pat_array_node(tree)->pre) {
dump_prefix(offset+1, lineno);
printf("pre:\n");
dump_recur(mrb, pat_array_node(tree)->pre, offset+2);
}
if (pat_array_node(tree)->rest) {
dump_prefix(offset+1, lineno);
if (pat_array_node(tree)->rest == (node*)-1) {
printf("rest: * (anonymous)\n");
}
else {
printf("rest:\n");
dump_node(mrb, pat_array_node(tree)->rest, offset+2);
}
}
if (pat_array_node(tree)->post) {
dump_prefix(offset+1, lineno);
printf("post:\n");
dump_recur(mrb, pat_array_node(tree)->post, offset+2);
}
break;
case NODE_PAT_HASH:
printf("NODE_PAT_HASH:\n");
if (pat_hash_node(tree)->pairs) {
dump_prefix(offset+1, lineno);
printf("pairs:\n");
dump_recur(mrb, pat_hash_node(tree)->pairs, offset+2);
}
if (pat_hash_node(tree)->rest) {
dump_prefix(offset+1, lineno);
if (pat_hash_node(tree)->rest == (node*)-1) {
printf("rest: **nil\n");
}
else {
printf("rest:\n");
dump_node(mrb, pat_hash_node(tree)->rest, offset+2);
}
}
break;
case NODE_MATCH_PAT:
printf("NODE_MATCH_PAT%s:\n", match_pat_node(tree)->raise_on_fail ? " (=>)" : " (in)");
dump_prefix(offset+1, lineno);
printf("value:\n");
dump_node(mrb, match_pat_node(tree)->value, offset+2);
dump_prefix(offset+1, lineno);
printf("pattern:\n");
dump_node(mrb, match_pat_node(tree)->pattern, offset+2);
break;
default:
/* Fallback: unknown node type - skip like codegen.c does */
printf("unknown node type %d (0x%x)\n", nodetype, (unsigned)nodetype);
break;
}
#endif
}
void
mrb_parser_dump(mrb_state *mrb, node *tree, int offset)
{
dump_node(mrb, tree, offset);
}
typedef mrb_bool mrb_parser_foreach_top_variable_func(mrb_state *mrb, mrb_sym sym, void *user);
void mrb_parser_foreach_top_variable(mrb_state *mrb, struct mrb_parser_state *p, mrb_parser_foreach_top_variable_func *func, void *user);
void
mrb_parser_foreach_top_variable(mrb_state *mrb, struct mrb_parser_state *p, mrb_parser_foreach_top_variable_func *func, void *user)
{
const mrb_ast_node *n = p->tree;
if (node_type_p((node*)n, NODE_SCOPE)) {
/* Extract locals from variable-sized NODE_SCOPE */
struct mrb_ast_scope_node *scope = scope_node(n);
n = scope->locals;
for (; n; n = n->cdr) {
mrb_sym sym = node_to_sym(n->car);
if (sym != 0) {
if (!func(mrb, sym, user)) break;
}
}
}
}
Reference in New Issue View Git Blame Copy Permalink