minor cleanup
This commit is contained in:
parent
3a11fcb834
commit
b70231bcff
|
|
@ -231,12 +231,8 @@ void
|
||||||
push_quote_onto_expression(JoyList el, JoyListPtr expression)
|
push_quote_onto_expression(JoyList el, JoyListPtr expression)
|
||||||
{
|
{
|
||||||
JoyList node;
|
JoyList node;
|
||||||
|
|
||||||
if (!el) return;
|
if (!el) return;
|
||||||
node = newJoyList;
|
node = make_list_node(el);
|
||||||
node->head = newJoyType;
|
|
||||||
node->head->kind = joyList;
|
|
||||||
node->head->value.el = el;
|
|
||||||
node->tail = *expression;
|
node->tail = *expression;
|
||||||
*expression = node;
|
*expression = node;
|
||||||
}
|
}
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue