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

rearranged the stack for the call operation by pushing a dummy receiver.

Browse Source 
the rearrangement is done to make aa plain function call look the same as a message send
This commit is contained in:
hyung-hwan
2022-01-22 15:40:38 +00:00
parent a7a69d9a11
commit 7ad9b2d499
5 changed files with 178 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
lib/hcl.h
View File

@ -1749,15 +1749,24 @@ struct hcl_t
/* get the argument at the given index */
#define HCL_STACK_GETARG(hcl,nargs,idx) HCL_STACK_GET(hcl, (hcl)->sp - ((nargs) - (idx) - 1))
/* get the receiver of a message */
#define HCL_STACK_GETRCV(hcl,nargs) HCL_STACK_GET(hcl, (hcl)->sp - nargs)
#define HCL_STACK_GETRCV(hcl,nargs) HCL_STACK_GET(hcl, (hcl)->sp - nargs - 1)
/* get the operator such as the called function/block/method */
#define HCL_STACK_GETOP(hcl,nargs) HCL_STACK_GET(hcl, (hcl)->sp - nargs)
/*
* .....
* argument 1
* argument 0
* operator
* receiver
*/
/* you can't access arguments and receiver after this macro.
* also you must not call this macro more than once */
#define HCL_STACK_SETRET(hcl,nargs,retv) \
do { \
HCL_STACK_POPS(hcl, nargs); \
HCL_STACK_POPS(hcl, nargs + 1); \
HCL_STACK_SETTOP(hcl, (retv)); \
} while(0)