add const to char* to pacify warnings for string litral to char* conversion

parent b98890a4
......@@ -802,14 +802,14 @@ new_symbols(parser_state *p, node *a)
/* (:call a op) */
static node*
call_uni_op(parser_state *p, node *recv, char *m)
call_uni_op(parser_state *p, node *recv, const char *m)
{
return new_call(p, recv, intern_cstr(m), 0);
}
/* (:call a op b) */
static node*
call_bin_op(parser_state *p, node *recv, char *m, node *arg1)
call_bin_op(parser_state *p, node *recv, const char *m, node *arg1)
{
return new_call(p, recv, intern_cstr(m), list1(list1(arg1)));
}
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment