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) ...@@ -802,14 +802,14 @@ new_symbols(parser_state *p, node *a)
/* (:call a op) */ /* (:call a op) */
static node* 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); return new_call(p, recv, intern_cstr(m), 0);
} }
/* (:call a op b) */ /* (:call a op b) */
static node* 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))); 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