1berry/ruby
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

node.c: all node types

Browse Source 
* node.c (dump_node): moved rb_bug for unknown node outside to let
  unhandled node types be warned.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@60202 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nobu 2017-10-17 12:30:12 +00:00
parent 4e01c50774
commit ecf61fa5b0
1 changed files with 92 additions and 82 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

174
node.c
View File

@ -185,10 +185,11 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
} while (node->nd_next && } while (node->nd_next &&
nd_type(node->nd_next) == NODE_BLOCK && nd_type(node->nd_next) == NODE_BLOCK &&
(node = node->nd_next, 1)); (node = node->nd_next, 1));
if (!node->nd_next) break; if (node->nd_next) {
LAST_NODE; LAST_NODE;
F_NODE(nd_next, "next block"); F_NODE(nd_next, "next block");
break; }
return;
case NODE_IF: case NODE_IF:
ANN("if statement"); ANN("if statement");
@ -198,7 +199,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_body, "then clause"); F_NODE(nd_body, "then clause");
LAST_NODE; LAST_NODE;
F_NODE(nd_else, "else clause"); F_NODE(nd_else, "else clause");
break; return;
case NODE_UNLESS: case NODE_UNLESS:
ANN("unless statement"); ANN("unless statement");
@ -208,7 +209,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_body, "then clause"); F_NODE(nd_body, "then clause");
LAST_NODE; LAST_NODE;
F_NODE(nd_else, "else clause"); F_NODE(nd_else, "else clause");
break; return;
case NODE_CASE: case NODE_CASE:
ANN("case statement"); ANN("case statement");
@ -217,7 +218,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_head, "case expr"); F_NODE(nd_head, "case expr");
LAST_NODE; LAST_NODE;
F_NODE(nd_body, "when clauses"); F_NODE(nd_body, "when clauses");
break; return;
case NODE_WHEN: case NODE_WHEN:
ANN("if statement"); ANN("if statement");
@ -227,7 +228,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_body, "when clause"); F_NODE(nd_body, "when clause");
LAST_NODE; LAST_NODE;
F_NODE(nd_next, "next when clause"); F_NODE(nd_next, "next when clause");
break; return;
case NODE_OPT_N: case NODE_OPT_N:
ANN("wrapper for -n option"); ANN("wrapper for -n option");
@ -251,7 +252,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_cond, "condition"); F_NODE(nd_cond, "condition");
LAST_NODE; LAST_NODE;
F_NODE(nd_body, "body"); F_NODE(nd_body, "body");
break; return;
case NODE_ITER: case NODE_ITER:
ANN("method call with block"); ANN("method call with block");
@ -266,7 +267,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_iter, "iteration receiver"); F_NODE(nd_iter, "iteration receiver");
LAST_NODE; LAST_NODE;
F_NODE(nd_body, "body"); F_NODE(nd_body, "body");
break; return;
case NODE_BREAK: case NODE_BREAK:
ANN("for statement"); ANN("for statement");
@ -285,19 +286,19 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
jump: jump:
LAST_NODE; LAST_NODE;
F_NODE(nd_stts, "value"); F_NODE(nd_stts, "value");
break; return;
case NODE_REDO: case NODE_REDO:
ANN("redo statement"); ANN("redo statement");
ANN("format: redo"); ANN("format: redo");
ANN("example: redo"); ANN("example: redo");
break; return;
case NODE_RETRY: case NODE_RETRY:
ANN("retry statement"); ANN("retry statement");
ANN("format: retry"); ANN("format: retry");
ANN("example: retry"); ANN("example: retry");
break; return;
case NODE_BEGIN: case NODE_BEGIN:
ANN("begin statement"); ANN("begin statement");
@ -305,7 +306,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
ANN("example: begin; 1; end"); ANN("example: begin; 1; end");
LAST_NODE; LAST_NODE;
F_NODE(nd_body, "body"); F_NODE(nd_body, "body");
break; return;
case NODE_RESCUE: case NODE_RESCUE:
ANN("rescue clause"); ANN("rescue clause");
@ -315,7 +316,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_resq, "rescue clause list"); F_NODE(nd_resq, "rescue clause list");
LAST_NODE; LAST_NODE;
F_NODE(nd_else, "rescue else clause"); F_NODE(nd_else, "rescue else clause");
break; return;
case NODE_RESBODY: case NODE_RESBODY:
ANN("rescue clause (cont'd)"); ANN("rescue clause (cont'd)");
@ -325,7 +326,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_body, "rescue clause"); F_NODE(nd_body, "rescue clause");
LAST_NODE; LAST_NODE;
F_NODE(nd_head, "next rescue clause"); F_NODE(nd_head, "next rescue clause");
break; return;
case NODE_ENSURE: case NODE_ENSURE:
ANN("ensure clause"); ANN("ensure clause");
@ -334,7 +335,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_head, "body"); F_NODE(nd_head, "body");
LAST_NODE; LAST_NODE;
F_NODE(nd_ensr, "ensure clause"); F_NODE(nd_ensr, "ensure clause");
break; return;
case NODE_AND: case NODE_AND:
ANN("&& operator"); ANN("&& operator");
@ -354,7 +355,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
} }
LAST_NODE; LAST_NODE;
F_NODE(nd_2nd, "right expr"); F_NODE(nd_2nd, "right expr");
break; return;
case NODE_MASGN: case NODE_MASGN:
ANN("multiple assignment"); ANN("multiple assignment");
@ -369,7 +370,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
else { else {
F_MSG(nd_args, "splatn", "-1 (rest argument without name)"); F_MSG(nd_args, "splatn", "-1 (rest argument without name)");
} }
break; return;
case NODE_LASGN: case NODE_LASGN:
ANN("local variable assignment"); ANN("local variable assignment");
@ -404,7 +405,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
else { else {
F_NODE(nd_value, "rvalue"); F_NODE(nd_value, "rvalue");
} }
break; return;
case NODE_GASGN: case NODE_GASGN:
ANN("global variable assignment"); ANN("global variable assignment");
@ -413,7 +414,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_GENTRY(nd_entry, "global variable"); F_GENTRY(nd_entry, "global variable");
LAST_NODE; LAST_NODE;
F_NODE(nd_value, "rvalue"); F_NODE(nd_value, "rvalue");
break; return;
case NODE_CDECL: case NODE_CDECL:
ANN("constant declaration"); ANN("constant declaration");
@ -429,7 +430,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
} }
LAST_NODE; LAST_NODE;
F_NODE(nd_value, "rvalue"); F_NODE(nd_value, "rvalue");
break; return;
case NODE_OP_ASGN1: case NODE_OP_ASGN1:
ANN("array assignment with operator"); ANN("array assignment with operator");
@ -446,7 +447,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_args->nd_head, "index"); F_NODE(nd_args->nd_head, "index");
LAST_NODE; LAST_NODE;
F_NODE(nd_args->nd_body, "rvalue"); F_NODE(nd_args->nd_body, "rvalue");
break; return;
case NODE_OP_ASGN2: case NODE_OP_ASGN2:
ANN("attr assignment with operator"); ANN("attr assignment with operator");
@ -467,7 +468,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
} }
LAST_NODE; LAST_NODE;
F_NODE(nd_value, "rvalue"); F_NODE(nd_value, "rvalue");
break; return;
case NODE_OP_ASGN_AND: case NODE_OP_ASGN_AND:
ANN("assignment with && operator"); ANN("assignment with && operator");
@ -482,7 +483,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_head, "variable"); F_NODE(nd_head, "variable");
LAST_NODE; LAST_NODE;
F_NODE(nd_value, "rvalue"); F_NODE(nd_value, "rvalue");
break; return;
case NODE_OP_CDECL: case NODE_OP_CDECL:
ANN("constant declaration with operator"); ANN("constant declaration with operator");
@ -498,7 +499,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
} }
LAST_NODE; LAST_NODE;
F_NODE(nd_value, "rvalue"); F_NODE(nd_value, "rvalue");
break; return;
case NODE_CALL: case NODE_CALL:
case NODE_OPCALL: case NODE_OPCALL:
@ -509,7 +510,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_recv, "receiver"); F_NODE(nd_recv, "receiver");
LAST_NODE; LAST_NODE;
F_NODE(nd_args, "arguments"); F_NODE(nd_args, "arguments");
break; return;
case NODE_FCALL: case NODE_FCALL:
ANN("function call"); ANN("function call");
@ -518,14 +519,14 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_ID(nd_mid, "method id"); F_ID(nd_mid, "method id");
LAST_NODE; LAST_NODE;
F_NODE(nd_args, "arguments"); F_NODE(nd_args, "arguments");
break; return;
case NODE_VCALL: case NODE_VCALL:
ANN("function call with no argument"); ANN("function call with no argument");
ANN("format: [nd_mid]"); ANN("format: [nd_mid]");
ANN("example: foo"); ANN("example: foo");
F_ID(nd_mid, "method id"); F_ID(nd_mid, "method id");
break; return;
case NODE_QCALL: case NODE_QCALL:
ANN("safe method invocation"); ANN("safe method invocation");
@ -535,7 +536,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_recv, "receiver"); F_NODE(nd_recv, "receiver");
LAST_NODE; LAST_NODE;
F_NODE(nd_args, "arguments"); F_NODE(nd_args, "arguments");
break; return;
case NODE_SUPER: case NODE_SUPER:
ANN("super invocation"); ANN("super invocation");
@ -543,13 +544,13 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
ANN("example: super 1"); ANN("example: super 1");
LAST_NODE; LAST_NODE;
F_NODE(nd_args, "arguments"); F_NODE(nd_args, "arguments");
break; return;
case NODE_ZSUPER: case NODE_ZSUPER:
ANN("super invocation with no argument"); ANN("super invocation with no argument");
ANN("format: super"); ANN("format: super");
ANN("example: super"); ANN("example: super");
break; return;
case NODE_ARRAY: case NODE_ARRAY:
ANN("array constructor"); ANN("array constructor");
@ -562,13 +563,13 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
ANN("example: return 1, 2, 3"); ANN("example: return 1, 2, 3");
ary: ary:
dump_array(buf, indent, comment, node); dump_array(buf, indent, comment, node);
break; return;
case NODE_ZARRAY: case NODE_ZARRAY:
ANN("empty array constructor"); ANN("empty array constructor");
ANN("format: []"); ANN("format: []");
ANN("example: []"); ANN("example: []");
break; return;
case NODE_HASH: case NODE_HASH:
if (!node->nd_alen) { if (!node->nd_alen) {
@ -583,7 +584,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
} }
LAST_NODE; LAST_NODE;
F_NODE(nd_head, "contents"); F_NODE(nd_head, "contents");
break; return;
case NODE_YIELD: case NODE_YIELD:
ANN("yield invocation"); ANN("yield invocation");
@ -591,52 +592,52 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
ANN("example: yield 1"); ANN("example: yield 1");
LAST_NODE; LAST_NODE;
F_NODE(nd_head, "arguments"); F_NODE(nd_head, "arguments");
break; return;
case NODE_LVAR: case NODE_LVAR:
ANN("local variable reference"); ANN("local variable reference");
ANN("format: [nd_vid](lvar)"); ANN("format: [nd_vid](lvar)");
ANN("example: x"); ANN("example: x");
F_ID(nd_vid, "local variable"); F_ID(nd_vid, "local variable");
break; return;
case NODE_DVAR: case NODE_DVAR:
ANN("dynamic variable reference"); ANN("dynamic variable reference");
ANN("format: [nd_vid](dvar)"); ANN("format: [nd_vid](dvar)");
ANN("example: 1.times { x = 1; x }"); ANN("example: 1.times { x = 1; x }");
F_ID(nd_vid, "local variable"); F_ID(nd_vid, "local variable");
break; return;
case NODE_IVAR: case NODE_IVAR:
ANN("instance variable reference"); ANN("instance variable reference");
ANN("format: [nd_vid](ivar)"); ANN("format: [nd_vid](ivar)");
ANN("example: @x"); ANN("example: @x");
F_ID(nd_vid, "instance variable"); F_ID(nd_vid, "instance variable");
break; return;
case NODE_CONST: case NODE_CONST:
ANN("constant reference"); ANN("constant reference");
ANN("format: [nd_vid](constant)"); ANN("format: [nd_vid](constant)");
ANN("example: X"); ANN("example: X");
F_ID(nd_vid, "constant"); F_ID(nd_vid, "constant");
break; return;
case NODE_CVAR: case NODE_CVAR:
ANN("class variable reference"); ANN("class variable reference");
ANN("format: [nd_vid](cvar)"); ANN("format: [nd_vid](cvar)");
ANN("example: @@x"); ANN("example: @@x");
F_ID(nd_vid, "class variable"); F_ID(nd_vid, "class variable");
break; return;
case NODE_GVAR: case NODE_GVAR:
ANN("global variable reference"); ANN("global variable reference");
ANN("format: [nd_entry](gvar)"); ANN("format: [nd_entry](gvar)");
ANN("example: $x"); ANN("example: $x");
F_GENTRY(nd_entry, "global variable"); F_GENTRY(nd_entry, "global variable");
break; return;
case NODE_NTH_REF: case NODE_NTH_REF:
ANN("nth special variable reference"); ANN("nth special variable reference");
ANN("format: $[nd_nth]"); ANN("format: $[nd_nth]");
ANN("example: $1, $2, .."); ANN("example: $1, $2, ..");
F_CUSTOM1(nd_nth, "variable") { A("$"); A_LONG(node->nd_nth); } F_CUSTOM1(nd_nth, "variable") { A("$"); A_LONG(node->nd_nth); }
break; return;
case NODE_BACK_REF: case NODE_BACK_REF:
ANN("back special variable reference"); ANN("back special variable reference");
@ -649,14 +650,14 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
name[2] = '\0'; name[2] = '\0';
A(name); A(name);
} }
break; return;
case NODE_MATCH: case NODE_MATCH:
ANN("match expression (against $_ implicitly)"); ANN("match expression (against $_ implicitly)");
ANN("format: [nd_lit] (in condition)"); ANN("format: [nd_lit] (in condition)");
ANN("example: if /foo/; foo; end"); ANN("example: if /foo/; foo; end");
F_LIT(nd_lit, "regexp"); F_LIT(nd_lit, "regexp");
break; return;
case NODE_MATCH2: case NODE_MATCH2:
ANN("match expression (regexp first)"); ANN("match expression (regexp first)");
@ -669,7 +670,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
LAST_NODE; LAST_NODE;
F_NODE(nd_args, "named captures"); F_NODE(nd_args, "named captures");
} }
break; return;
case NODE_MATCH3: case NODE_MATCH3:
ANN("match expression (regexp second)"); ANN("match expression (regexp second)");
@ -678,7 +679,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_recv, "string (receiver)"); F_NODE(nd_recv, "string (receiver)");
LAST_NODE; LAST_NODE;
F_NODE(nd_value, "regexp (argument)"); F_NODE(nd_value, "regexp (argument)");
break; return;
case NODE_LIT: case NODE_LIT:
ANN("literal"); ANN("literal");
@ -696,7 +697,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
ANN("example: `foo`"); ANN("example: `foo`");
lit: lit:
F_LIT(nd_lit, "literal"); F_LIT(nd_lit, "literal");
break; return;
case NODE_DSTR: case NODE_DSTR:
ANN("string literal with interpolation"); ANN("string literal with interpolation");
@ -727,7 +728,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_next->nd_head, "interpolation"); F_NODE(nd_next->nd_head, "interpolation");
LAST_NODE; LAST_NODE;
F_NODE(nd_next->nd_next, "tailing strings"); F_NODE(nd_next->nd_next, "tailing strings");
break; return;
case NODE_EVSTR: case NODE_EVSTR:
ANN("interpolation expression"); ANN("interpolation expression");
@ -735,7 +736,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
ANN("example: \"foo#{ bar }baz\""); ANN("example: \"foo#{ bar }baz\"");
LAST_NODE; LAST_NODE;
F_NODE(nd_body, "body"); F_NODE(nd_body, "body");
break; return;
case NODE_ARGSCAT: case NODE_ARGSCAT:
ANN("splat argument following arguments"); ANN("splat argument following arguments");
@ -744,7 +745,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_head, "preceding array"); F_NODE(nd_head, "preceding array");
LAST_NODE; LAST_NODE;
F_NODE(nd_body, "following array"); F_NODE(nd_body, "following array");
break; return;
case NODE_ARGSPUSH: case NODE_ARGSPUSH:
ANN("splat argument following one argument"); ANN("splat argument following one argument");
@ -753,7 +754,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_head, "preceding array"); F_NODE(nd_head, "preceding array");
LAST_NODE; LAST_NODE;
F_NODE(nd_body, "following element"); F_NODE(nd_body, "following element");
break; return;
case NODE_SPLAT: case NODE_SPLAT:
ANN("splat argument"); ANN("splat argument");
@ -761,7 +762,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
ANN("example: foo(*ary)"); ANN("example: foo(*ary)");
LAST_NODE; LAST_NODE;
F_NODE(nd_head, "splat'ed array"); F_NODE(nd_head, "splat'ed array");
break; return;
case NODE_BLOCK_PASS: case NODE_BLOCK_PASS:
ANN("arguments with block argument"); ANN("arguments with block argument");
@ -770,7 +771,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_head, "other arguments"); F_NODE(nd_head, "other arguments");
LAST_NODE; LAST_NODE;
F_NODE(nd_body, "block argument"); F_NODE(nd_body, "block argument");
break; return;
case NODE_DEFN: case NODE_DEFN:
ANN("method definition"); ANN("method definition");
@ -779,7 +780,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_ID(nd_mid, "method name"); F_ID(nd_mid, "method name");
LAST_NODE; LAST_NODE;
F_NODE(nd_defn, "method definition"); F_NODE(nd_defn, "method definition");
break; return;
case NODE_DEFS: case NODE_DEFS:
ANN("singleton method definition"); ANN("singleton method definition");
@ -789,7 +790,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_ID(nd_mid, "method name"); F_ID(nd_mid, "method name");
LAST_NODE; LAST_NODE;
F_NODE(nd_defn, "method definition"); F_NODE(nd_defn, "method definition");
break; return;
case NODE_ALIAS: case NODE_ALIAS:
ANN("method alias statement"); ANN("method alias statement");
@ -798,7 +799,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(u1.node, "new name"); F_NODE(u1.node, "new name");
LAST_NODE; LAST_NODE;
F_NODE(u2.node, "old name"); F_NODE(u2.node, "old name");
break; return;
case NODE_VALIAS: case NODE_VALIAS:
ANN("global variable alias statement"); ANN("global variable alias statement");
@ -806,7 +807,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
ANN("example: alias $y $x"); ANN("example: alias $y $x");
F_ID(u1.id, "new name"); F_ID(u1.id, "new name");
F_ID(u2.id, "old name"); F_ID(u2.id, "old name");
break; return;
case NODE_UNDEF: case NODE_UNDEF:
ANN("method alias statement"); ANN("method alias statement");
@ -814,7 +815,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
ANN("example: undef foo"); ANN("example: undef foo");
LAST_NODE; LAST_NODE;
F_NODE(u2.node, "old name"); F_NODE(u2.node, "old name");
break; return;
case NODE_CLASS: case NODE_CLASS:
ANN("class definition"); ANN("class definition");
@ -824,7 +825,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_super, "superclass"); F_NODE(nd_super, "superclass");
LAST_NODE; LAST_NODE;
F_NODE(nd_body, "class definition"); F_NODE(nd_body, "class definition");
break; return;
case NODE_MODULE: case NODE_MODULE:
ANN("module definition"); ANN("module definition");
@ -833,7 +834,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_cpath, "module path"); F_NODE(nd_cpath, "module path");
LAST_NODE; LAST_NODE;
F_NODE(nd_body, "module definition"); F_NODE(nd_body, "module definition");
break; return;
case NODE_SCLASS: case NODE_SCLASS:
ANN("singleton class definition"); ANN("singleton class definition");
@ -842,7 +843,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_recv, "receiver"); F_NODE(nd_recv, "receiver");
LAST_NODE; LAST_NODE;
F_NODE(nd_body, "singleton class definition"); F_NODE(nd_body, "singleton class definition");
break; return;
case NODE_COLON2: case NODE_COLON2:
ANN("scoped constant reference"); ANN("scoped constant reference");
@ -851,14 +852,14 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_ID(nd_mid, "constant name"); F_ID(nd_mid, "constant name");
LAST_NODE; LAST_NODE;
F_NODE(nd_head, "receiver"); F_NODE(nd_head, "receiver");
break; return;
case NODE_COLON3: case NODE_COLON3:
ANN("top-level constant reference"); ANN("top-level constant reference");
ANN("format: ::[nd_mid]"); ANN("format: ::[nd_mid]");
ANN("example: ::Object"); ANN("example: ::Object");
F_ID(nd_mid, "constant name"); F_ID(nd_mid, "constant name");
break; return;
case NODE_DOT2: case NODE_DOT2:
ANN("range constructor (incl.)"); ANN("range constructor (incl.)");
@ -883,44 +884,44 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_beg, "begin"); F_NODE(nd_beg, "begin");
LAST_NODE; LAST_NODE;
F_NODE(nd_end, "end"); F_NODE(nd_end, "end");
break; return;
case NODE_SELF: case NODE_SELF:
ANN("self"); ANN("self");
ANN("format: self"); ANN("format: self");
ANN("example: self"); ANN("example: self");
break; return;
case NODE_NIL: case NODE_NIL:
ANN("nil"); ANN("nil");
ANN("format: nil"); ANN("format: nil");
ANN("example: nil"); ANN("example: nil");
break; return;
case NODE_TRUE: case NODE_TRUE:
ANN("true"); ANN("true");
ANN("format: true"); ANN("format: true");
ANN("example: true"); ANN("example: true");
break; return;
case NODE_FALSE: case NODE_FALSE:
ANN("false"); ANN("false");
ANN("format: false"); ANN("format: false");
ANN("example: false"); ANN("example: false");
break; return;
case NODE_ERRINFO: case NODE_ERRINFO:
ANN("virtual reference to $!"); ANN("virtual reference to $!");
ANN("format: rescue => id"); ANN("format: rescue => id");
ANN("example: rescue => id"); ANN("example: rescue => id");
break; return;
case NODE_DEFINED: case NODE_DEFINED:
ANN("defined? expression"); ANN("defined? expression");
ANN("format: defined?([nd_head])"); ANN("format: defined?([nd_head])");
ANN("example: defined?(foo)"); ANN("example: defined?(foo)");
F_NODE(nd_head, "expr"); F_NODE(nd_head, "expr");
break; return;
case NODE_POSTEXE: case NODE_POSTEXE:
ANN("post-execution"); ANN("post-execution");
@ -928,7 +929,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
ANN("example: END { foo }"); ANN("example: END { foo }");
LAST_NODE; LAST_NODE;
F_NODE(nd_body, "END clause"); F_NODE(nd_body, "END clause");
break; return;
case NODE_ATTRASGN: case NODE_ATTRASGN:
ANN("attr assignment"); ANN("attr assignment");
@ -943,7 +944,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_ID(nd_mid, "method name"); F_ID(nd_mid, "method name");
LAST_NODE; LAST_NODE;
F_NODE(nd_args, "arguments"); F_NODE(nd_args, "arguments");
break; return;
case NODE_PRELUDE: case NODE_PRELUDE:
ANN("pre-execution"); ANN("pre-execution");
@ -957,7 +958,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
LAST_NODE; LAST_NODE;
F_OPTION(nd_compile_option, "compile_option"); F_OPTION(nd_compile_option, "compile_option");
} }
break; return;
case NODE_LAMBDA: case NODE_LAMBDA:
ANN("lambda expression"); ANN("lambda expression");
@ -965,7 +966,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
ANN("example: -> { foo }"); ANN("example: -> { foo }");
LAST_NODE; LAST_NODE;
F_NODE(nd_body, "lambda clause"); F_NODE(nd_body, "lambda clause");
break; return;
case NODE_OPT_ARG: case NODE_OPT_ARG:
ANN("optional arguments"); ANN("optional arguments");
@ -974,7 +975,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_body, "body"); F_NODE(nd_body, "body");
LAST_NODE; LAST_NODE;
F_NODE(nd_next, "next"); F_NODE(nd_next, "next");
break; return;
case NODE_KW_ARG: case NODE_KW_ARG:
ANN("keyword arguments"); ANN("keyword arguments");
@ -983,7 +984,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_body, "body"); F_NODE(nd_body, "body");
LAST_NODE; LAST_NODE;
F_NODE(nd_next, "next"); F_NODE(nd_next, "next");
break; return;
case NODE_POSTARG: case NODE_POSTARG:
ANN("post arguments"); ANN("post arguments");
@ -997,7 +998,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
} }
LAST_NODE; LAST_NODE;
F_NODE(nd_2nd, "post arguments"); F_NODE(nd_2nd, "post arguments");
break; return;
case NODE_ARGS: case NODE_ARGS:
ANN("method parameters"); ANN("method parameters");
@ -1014,7 +1015,7 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_ainfo->kw_args, "keyword arguments"); F_NODE(nd_ainfo->kw_args, "keyword arguments");
LAST_NODE; LAST_NODE;
F_NODE(nd_ainfo->kw_rest_arg, "keyword rest argument"); F_NODE(nd_ainfo->kw_rest_arg, "keyword rest argument");
break; return;
case NODE_SCOPE: case NODE_SCOPE:
ANN("new scope"); ANN("new scope");
@ -1031,11 +1032,20 @@ dump_node(VALUE buf, VALUE indent, int comment, NODE *node)
F_NODE(nd_args, "arguments"); F_NODE(nd_args, "arguments");
LAST_NODE; LAST_NODE;
F_NODE(nd_body, "body"); F_NODE(nd_body, "body");
break; return;
default: case NODE_IASGN2:
rb_bug("dump_node: unknown node: %s", ruby_node_name(nd_type(node))); case NODE_CVDECL:
case NODE_ARGS_AUX:
case NODE_TO_ARY:
case NODE_BLOCK_ARG:
case NODE_ALLOCA:
case NODE_BMETHOD:
case NODE_LAST:
break;
} }
rb_bug("dump_node: unknown node: %s", ruby_node_name(nd_type(node)));
} }
VALUE VALUE