hyung-hwan/hak
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fixed the reader and the compiler to process the a dic/array/byte-array item after a period in a data list properly

Browse Source
This commit is contained in:
hyung-hwan
2021-01-25 15:23:24 +00:00
parent fbbdb6188e
commit 2e3fae05e4
4 changed files with 76 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
lib/comp2.c
View File

@ -1950,6 +1950,7 @@ static int compile_object (hcl_t* hcl)
HCL_ASSERT (hcl, cf->opcode == COP_COMPILE_OBJECT);
oprnd = cf->operand;
redo:
switch (HCL_CNODE_GET_TYPE(oprnd))
{
case HCL_CNODE_NIL:
@ -2040,10 +2041,10 @@ static int compile_object (hcl_t* hcl)
break;
}
case HCL_CNODE_LIST:
case HCL_CNODE_ELIST:
{
/* empty list */
switch (HCL_CNODE_LIST_CONCODE(oprnd))
switch (HCL_CNODE_ELIST_CONCODE(oprnd))
{
case HCL_CONCODE_XLIST:
hcl_setsynerrbfmt (hcl, HCL_SYNERR_VARDCLBANNED, HCL_CNODE_GET_LOC(oprnd), HCL_NULL, "empty executable list");
@ -2077,6 +2078,11 @@ static int compile_object (hcl_t* hcl)
break;
}
case HCL_CNODE_SHELL:
/* a shell node is just a wrapper of an actual node */
oprnd = oprnd->u.shell.obj;
goto redo;
default:
hcl_setsynerrbfmt (hcl, HCL_SYNERR_INTERN, HCL_CNODE_GET_LOC(oprnd), HCL_CNODE_GET_TOK(oprnd), "internal error - unexpected object type %d", HCL_CNODE_GET_TYPE(oprnd));
return -1;
@ -3229,11 +3235,11 @@ int hcl_compile2 (hcl_t* hcl, hcl_cnode_t* obj)
case COP_SUBCOMPILE_AND_EXPR:
if (subcompile_and_expr(hcl) <= -1) goto oops;
break;
case COP_SUBCOMPILE_OR_EXPR:
if (subcompile_or_expr(hcl) <= -1) goto oops;
break;
case COP_POST_AND_EXPR:
if (post_and_expr(hcl) <= -1) goto oops;
break;