Added generic form of desugaring functions
This commit is contained in:
parent
5df9db015c
commit
ffd050e603
3 changed files with 4 additions and 1 deletions
|
|
@ -47,7 +47,7 @@ static HCFChoice* desugar_sequence(HAllocator *mm__, void *env) {
|
|||
HCFSequence *seq = h_new(HCFSequence, 1);
|
||||
seq->items = h_new(HCFChoice*, s->len+1);
|
||||
for (size_t i=0; i<s->len; ++i) {
|
||||
seq->items[i] = s->p_array[i]->vtable->desugar(mm__, s->p_array[i]->env);
|
||||
seq->items[i] = h_desugar(s->p_array[i]);
|
||||
}
|
||||
seq->items[s->len] = NULL;
|
||||
HCFChoice *ret = h_new(HCFChoice, 1);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue