fixed the way to drive hcl in main.c

This commit is contained in:
2018-02-09 17:15:31 +00:00
parent eff4be881f
commit 45bb26d97f
2 changed files with 10 additions and 3 deletions

View File

@ -1276,6 +1276,7 @@ static HCL_INLINE hcl_oop_t leave_list (hcl_t* hcl, int* flagv, int* oldflagv)
/* the stack must not be empty - cannot leave a list without entering it */
HCL_ASSERT (hcl, !HCL_IS_NIL(hcl,hcl->c->r.s));
/* TODO: fix bug here. unblanced ) cause assertion failure here */
/*head = HCL_CONS_CAR(HCL_CONS_CDR(hcl->c->r.s));*/