quinn-os/my-basic
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

*developing lambda.

Browse Source
This commit is contained in:
paladin-t 2016-01-06 16:43:00 +08:00
parent f2b42770bd
commit ec695b5d5f
2 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
core/my_basic.c
View File

@ -417,6 +417,7 @@ typedef enum _invokable_e {
#ifdef MB_ENABLE_LAMBDA
typedef struct _running_context_ref_t {
_ref_t ref;
struct _running_context_ref_t* prev;
struct _running_context_t* running;
} _running_context_ref_t;
#endif /* MB_ENABLE_LAMBDA */
@ -11455,6 +11456,7 @@ int _core_lambda(mb_interpreter_t* s, void** l) {
if(!routine->func.lambda.parameters)
routine->func.lambda.parameters = _ls_create();
_ls_pushback(routine->func.lambda.parameters, v);
/* TODO: Add lambda parameters */
ast = (_ls_node_t*)*l;
if(_IS_FUNC(ast->data, _core_close_bracket))
@ -11479,6 +11481,7 @@ int _core_lambda(mb_interpreter_t* s, void** l) {
brackets++;
else if(_IS_FUNC(ast->data, _core_close_bracket))
brackets--;
/* TODO: Mark upvalues */
ast = ast->next;
}
*l = ast;

2
core/my_basic.h
View File

@ -90,7 +90,7 @@ extern "C" {
#endif /* MB_ENABLE_CLASS */
#ifndef MB_ENABLE_LAMBDA
# define MB_ENABLE_LAMBDA
# define MB_ENABLE_LAMBDA /* The Lambda is still under development */
#endif /* MB_ENABLE_LAMBDA */
#ifndef MB_COMPACT_MODE