compile.c: no extra parentheses
* compile.c (COMPILE_ERROR): remove extra parentheses to enclose variadic arguments. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@52889 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
parent
650f890534
commit
a560f2a4cc
66
compile.c
66
compile.c
@ -327,7 +327,7 @@ prepare_compile_error(rb_iseq_t *iseq)
|
|||||||
return append_compile_error;
|
return append_compile_error;
|
||||||
}
|
}
|
||||||
|
|
||||||
#define COMPILE_ERROR(strs) prepare_compile_error(iseq)strs
|
#define COMPILE_ERROR prepare_compile_error(iseq)
|
||||||
|
|
||||||
#define ERROR_ARGS_AT(n) ruby_sourcefile, nd_line(n),
|
#define ERROR_ARGS_AT(n) ruby_sourcefile, nd_line(n),
|
||||||
#define ERROR_ARGS ERROR_ARGS_AT(node)
|
#define ERROR_ARGS ERROR_ARGS_AT(node)
|
||||||
@ -509,9 +509,9 @@ validate_label(st_data_t name, st_data_t label, st_data_t arg)
|
|||||||
LABEL *lobj = (LABEL *)label;
|
LABEL *lobj = (LABEL *)label;
|
||||||
if (!lobj->link.next) {
|
if (!lobj->link.next) {
|
||||||
do {
|
do {
|
||||||
COMPILE_ERROR((ruby_sourcefile, lobj->position,
|
COMPILE_ERROR(ruby_sourcefile, lobj->position,
|
||||||
"%"PRIsVALUE": undefined label",
|
"%"PRIsVALUE": undefined label",
|
||||||
rb_id2str((ID)name)));
|
rb_id2str((ID)name));
|
||||||
} while (0);
|
} while (0);
|
||||||
}
|
}
|
||||||
return ST_CONTINUE;
|
return ST_CONTINUE;
|
||||||
@ -592,8 +592,8 @@ rb_iseq_compile_node(rb_iseq_t *iseq, NODE *node)
|
|||||||
case ISEQ_TYPE_EVAL:
|
case ISEQ_TYPE_EVAL:
|
||||||
case ISEQ_TYPE_MAIN:
|
case ISEQ_TYPE_MAIN:
|
||||||
case ISEQ_TYPE_TOP:
|
case ISEQ_TYPE_TOP:
|
||||||
COMPILE_ERROR((ERROR_ARGS "compile/should not be reached: %s:%d",
|
COMPILE_ERROR(ERROR_ARGS "compile/should not be reached: %s:%d",
|
||||||
__FILE__, __LINE__));
|
__FILE__, __LINE__);
|
||||||
return COMPILE_NG;
|
return COMPILE_NG;
|
||||||
case ISEQ_TYPE_RESCUE:
|
case ISEQ_TYPE_RESCUE:
|
||||||
iseq_set_exception_local_table(iseq);
|
iseq_set_exception_local_table(iseq);
|
||||||
@ -1556,7 +1556,7 @@ iseq_set_sequence(rb_iseq_t *iseq, LINK_ANCHOR *anchor)
|
|||||||
default:
|
default:
|
||||||
dump_disasm_list(FIRST_ELEMENT(anchor));
|
dump_disasm_list(FIRST_ELEMENT(anchor));
|
||||||
dump_disasm_list(list);
|
dump_disasm_list(list);
|
||||||
COMPILE_ERROR((ruby_sourcefile, line, "error: set_sequence"));
|
COMPILE_ERROR(ruby_sourcefile, line, "error: set_sequence");
|
||||||
return COMPILE_NG;
|
return COMPILE_NG;
|
||||||
}
|
}
|
||||||
list = list->next;
|
list = list->next;
|
||||||
@ -1603,9 +1603,9 @@ iseq_set_sequence(rb_iseq_t *iseq, LINK_ANCHOR *anchor)
|
|||||||
dump_disasm_list(list);
|
dump_disasm_list(list);
|
||||||
xfree(generated_iseq);
|
xfree(generated_iseq);
|
||||||
xfree(line_info_table);
|
xfree(line_info_table);
|
||||||
COMPILE_ERROR((ruby_sourcefile, iobj->line_no,
|
COMPILE_ERROR(ruby_sourcefile, iobj->line_no,
|
||||||
"operand size miss! (%d for %d)",
|
"operand size miss! (%d for %d)",
|
||||||
iobj->operand_size, len - 1));
|
iobj->operand_size, len - 1);
|
||||||
return COMPILE_NG;
|
return COMPILE_NG;
|
||||||
}
|
}
|
||||||
|
|
||||||
@ -1618,8 +1618,8 @@ iseq_set_sequence(rb_iseq_t *iseq, LINK_ANCHOR *anchor)
|
|||||||
/* label(destination position) */
|
/* label(destination position) */
|
||||||
LABEL *lobj = (LABEL *)operands[j];
|
LABEL *lobj = (LABEL *)operands[j];
|
||||||
if (!lobj->set) {
|
if (!lobj->set) {
|
||||||
COMPILE_ERROR((ruby_sourcefile, iobj->line_no,
|
COMPILE_ERROR(ruby_sourcefile, iobj->line_no,
|
||||||
"unknown label"));
|
"unknown label");
|
||||||
return COMPILE_NG;
|
return COMPILE_NG;
|
||||||
}
|
}
|
||||||
if (lobj->sp == -1) {
|
if (lobj->sp == -1) {
|
||||||
@ -1712,8 +1712,8 @@ iseq_set_sequence(rb_iseq_t *iseq, LINK_ANCHOR *anchor)
|
|||||||
default:
|
default:
|
||||||
xfree(generated_iseq);
|
xfree(generated_iseq);
|
||||||
xfree(line_info_table);
|
xfree(line_info_table);
|
||||||
COMPILE_ERROR((ruby_sourcefile, iobj->line_no,
|
COMPILE_ERROR(ruby_sourcefile, iobj->line_no,
|
||||||
"unknown operand type: %c", type));
|
"unknown operand type: %c", type);
|
||||||
return COMPILE_NG;
|
return COMPILE_NG;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
@ -2450,8 +2450,8 @@ insn_set_sc_state(rb_iseq_t *iseq, INSN *iobj, int state)
|
|||||||
dump_disasm_list((LINK_ELEMENT *)iobj);
|
dump_disasm_list((LINK_ELEMENT *)iobj);
|
||||||
dump_disasm_list((LINK_ELEMENT *)lobj);
|
dump_disasm_list((LINK_ELEMENT *)lobj);
|
||||||
printf("\n-- %d, %d\n", lobj->sc_state, nstate);
|
printf("\n-- %d, %d\n", lobj->sc_state, nstate);
|
||||||
COMPILE_ERROR((ruby_sourcefile, iobj->line_no,
|
COMPILE_ERROR(ruby_sourcefile, iobj->line_no,
|
||||||
"insn_set_sc_state error\n"));
|
"insn_set_sc_state error\n");
|
||||||
return COMPILE_NG;
|
return COMPILE_NG;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
@ -2552,8 +2552,8 @@ iseq_set_sequence_stackcaching(rb_iseq_t *iseq, LINK_ANCHOR *anchor)
|
|||||||
case SCS_XX:
|
case SCS_XX:
|
||||||
goto normal_insn;
|
goto normal_insn;
|
||||||
default:
|
default:
|
||||||
COMPILE_ERROR((ruby_sourcefile, iobj->line_no,
|
COMPILE_ERROR(ruby_sourcefile, iobj->line_no,
|
||||||
"unreachable"));
|
"unreachable");
|
||||||
return COMPILE_NG;
|
return COMPILE_NG;
|
||||||
}
|
}
|
||||||
/* remove useless pop */
|
/* remove useless pop */
|
||||||
@ -3716,7 +3716,7 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped)
|
|||||||
line = nd_line(node);
|
line = nd_line(node);
|
||||||
|
|
||||||
if (type != NODE_WHEN) {
|
if (type != NODE_WHEN) {
|
||||||
COMPILE_ERROR((ERROR_ARGS "NODE_CASE: unexpected node. must be NODE_WHEN, but %s", ruby_node_name(type)));
|
COMPILE_ERROR(ERROR_ARGS "NODE_CASE: unexpected node. must be NODE_WHEN, but %s", ruby_node_name(type));
|
||||||
debug_node_end();
|
debug_node_end();
|
||||||
return COMPILE_NG;
|
return COMPILE_NG;
|
||||||
}
|
}
|
||||||
@ -4018,7 +4018,7 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped)
|
|||||||
}
|
}
|
||||||
else if (iseq->body->type == ISEQ_TYPE_EVAL) {
|
else if (iseq->body->type == ISEQ_TYPE_EVAL) {
|
||||||
break_in_eval:
|
break_in_eval:
|
||||||
COMPILE_ERROR((ERROR_ARGS "Can't escape from eval with break"));
|
COMPILE_ERROR(ERROR_ARGS "Can't escape from eval with break");
|
||||||
debug_node_end();
|
debug_node_end();
|
||||||
return COMPILE_NG;
|
return COMPILE_NG;
|
||||||
}
|
}
|
||||||
@ -4046,7 +4046,7 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped)
|
|||||||
|
|
||||||
ip = ip->body->parent_iseq;
|
ip = ip->body->parent_iseq;
|
||||||
}
|
}
|
||||||
COMPILE_ERROR((ERROR_ARGS "Invalid break"));
|
COMPILE_ERROR(ERROR_ARGS "Invalid break");
|
||||||
debug_node_end();
|
debug_node_end();
|
||||||
return COMPILE_NG;
|
return COMPILE_NG;
|
||||||
}
|
}
|
||||||
@ -4084,7 +4084,7 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped)
|
|||||||
}
|
}
|
||||||
else if (iseq->body->type == ISEQ_TYPE_EVAL) {
|
else if (iseq->body->type == ISEQ_TYPE_EVAL) {
|
||||||
next_in_eval:
|
next_in_eval:
|
||||||
COMPILE_ERROR((ERROR_ARGS "Can't escape from eval with next"));
|
COMPILE_ERROR(ERROR_ARGS "Can't escape from eval with next");
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
const rb_iseq_t *ip = iseq;
|
const rb_iseq_t *ip = iseq;
|
||||||
@ -4118,7 +4118,7 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped)
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
COMPILE_ERROR((ERROR_ARGS "Invalid next"));
|
COMPILE_ERROR(ERROR_ARGS "Invalid next");
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
@ -4138,7 +4138,7 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped)
|
|||||||
}
|
}
|
||||||
else if (iseq->body->type == ISEQ_TYPE_EVAL) {
|
else if (iseq->body->type == ISEQ_TYPE_EVAL) {
|
||||||
redo_in_eval:
|
redo_in_eval:
|
||||||
COMPILE_ERROR((ERROR_ARGS "Can't escape from eval with redo"));
|
COMPILE_ERROR(ERROR_ARGS "Can't escape from eval with redo");
|
||||||
}
|
}
|
||||||
else if (ISEQ_COMPILE_DATA(iseq)->start_label) {
|
else if (ISEQ_COMPILE_DATA(iseq)->start_label) {
|
||||||
LABEL *splabel = NEW_LABEL(0);
|
LABEL *splabel = NEW_LABEL(0);
|
||||||
@ -4185,7 +4185,7 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped)
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
COMPILE_ERROR((ERROR_ARGS "Invalid redo"));
|
COMPILE_ERROR(ERROR_ARGS "Invalid redo");
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
@ -4200,7 +4200,7 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped)
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
COMPILE_ERROR((ERROR_ARGS "Invalid retry"));
|
COMPILE_ERROR(ERROR_ARGS "Invalid retry");
|
||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
@ -4686,8 +4686,8 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped)
|
|||||||
COMPILE(ret, "NODE_OP_CDECL/colon2#nd_head", node->nd_head->nd_head);
|
COMPILE(ret, "NODE_OP_CDECL/colon2#nd_head", node->nd_head->nd_head);
|
||||||
break;
|
break;
|
||||||
default:
|
default:
|
||||||
COMPILE_ERROR((ERROR_ARGS "%s: invalid node in NODE_OP_CDECL",
|
COMPILE_ERROR(ERROR_ARGS "%s: invalid node in NODE_OP_CDECL",
|
||||||
ruby_node_name(nd_type(node->nd_head))));
|
ruby_node_name(nd_type(node->nd_head)));
|
||||||
debug_node_end();
|
debug_node_end();
|
||||||
return COMPILE_NG;
|
return COMPILE_NG;
|
||||||
}
|
}
|
||||||
@ -4886,7 +4886,7 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped)
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
COMPILE_ERROR((ERROR_ARGS "invalid goto/label format"));
|
COMPILE_ERROR(ERROR_ARGS "invalid goto/label format");
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
@ -5119,7 +5119,7 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped)
|
|||||||
|
|
||||||
if (is) {
|
if (is) {
|
||||||
if (is->body->type == ISEQ_TYPE_TOP) {
|
if (is->body->type == ISEQ_TYPE_TOP) {
|
||||||
COMPILE_ERROR((ERROR_ARGS "Invalid return"));
|
COMPILE_ERROR(ERROR_ARGS "Invalid return");
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
LABEL *splabel = 0;
|
LABEL *splabel = 0;
|
||||||
@ -5160,7 +5160,7 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped)
|
|||||||
|
|
||||||
INIT_ANCHOR(args);
|
INIT_ANCHOR(args);
|
||||||
if (iseq->body->type == ISEQ_TYPE_TOP) {
|
if (iseq->body->type == ISEQ_TYPE_TOP) {
|
||||||
COMPILE_ERROR((ERROR_ARGS "Invalid yield"));
|
COMPILE_ERROR(ERROR_ARGS "Invalid yield");
|
||||||
debug_node_end();
|
debug_node_end();
|
||||||
return COMPILE_NG;
|
return COMPILE_NG;
|
||||||
}
|
}
|
||||||
@ -6332,15 +6332,15 @@ iseq_build_from_ary_body(rb_iseq_t *iseq, LINK_ANCHOR *anchor,
|
|||||||
insn = (argc < 0) ? Qnil : RARRAY_AREF(obj, 0);
|
insn = (argc < 0) ? Qnil : RARRAY_AREF(obj, 0);
|
||||||
if (st_lookup(insn_table, (st_data_t)insn, &insn_id) == 0) {
|
if (st_lookup(insn_table, (st_data_t)insn, &insn_id) == 0) {
|
||||||
/* TODO: exception */
|
/* TODO: exception */
|
||||||
COMPILE_ERROR((ruby_sourcefile, line_no,
|
COMPILE_ERROR(ruby_sourcefile, line_no,
|
||||||
"unknown instruction: %+"PRIsVALUE, insn));
|
"unknown instruction: %+"PRIsVALUE, insn);
|
||||||
ret = COMPILE_NG;
|
ret = COMPILE_NG;
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
|
|
||||||
if (argc != insn_len((VALUE)insn_id)-1) {
|
if (argc != insn_len((VALUE)insn_id)-1) {
|
||||||
COMPILE_ERROR((ruby_sourcefile, line_no,
|
COMPILE_ERROR(ruby_sourcefile, line_no,
|
||||||
"operand size mismatch"));
|
"operand size mismatch");
|
||||||
ret = COMPILE_NG;
|
ret = COMPILE_NG;
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user