|
|
@ -290,16 +290,16 @@ int sol_state_init(sol_state_t *state) { |
|
|
|
sol_map_borrow_name(state, mod, "ST_CONT", sol_new_int(state, ST_CONT)); |
|
|
|
sol_map_borrow_name(state, mod, "ST_BREAK", sol_new_int(state, ST_BREAK)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_LIT", sol_new_int(state, EX_LIT)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_LISTGEN", sol_new_int(state, EX_LIT)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_MAPGEN", sol_new_int(state, EX_LIT)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_BINOP", sol_new_int(state, EX_LIT)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_UNOP", sol_new_int(state, EX_LIT)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_INDEX", sol_new_int(state, EX_LIT)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_SETINDEX", sol_new_int(state, EX_LIT)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_ASSIGN", sol_new_int(state, EX_LIT)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_REF", sol_new_int(state, EX_LIT)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_CALL", sol_new_int(state, EX_LIT)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_FUNCDECL", sol_new_int(state, EX_LIT)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_LISTGEN", sol_new_int(state, EX_LISTGEN)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_MAPGEN", sol_new_int(state, EX_MAPGEN)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_BINOP", sol_new_int(state, EX_BINOP)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_UNOP", sol_new_int(state, EX_UNOP)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_INDEX", sol_new_int(state, EX_INDEX)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_SETINDEX", sol_new_int(state, EX_SETINDEX)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_ASSIGN", sol_new_int(state, EX_ASSIGN)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_REF", sol_new_int(state, EX_REF)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_CALL", sol_new_int(state, EX_CALL)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_FUNCDECL", sol_new_int(state, EX_FUNCDECL)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_IFELSE", sol_new_int(state, EX_IFELSE)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_LOOP", sol_new_int(state, EX_LOOP)); |
|
|
|
sol_map_borrow_name(state, mod, "EX_ITER", sol_new_int(state, EX_ITER)); |
|
|
@ -330,6 +330,8 @@ int sol_state_init(sol_state_t *state) { |
|
|
|
sol_map_borrow_name(state, mod, "LIT_FLOAT", sol_new_int(state, LIT_FLOAT)); |
|
|
|
sol_map_borrow_name(state, mod, "LIT_STRING", sol_new_int(state, LIT_STRING)); |
|
|
|
sol_map_borrow_name(state, mod, "LIT_NONE", sol_new_int(state, LIT_NONE)); |
|
|
|
sol_map_borrow_name(state, mod, "KIND_STMT", sol_new_int(state, -1)); |
|
|
|
sol_map_borrow_name(state, mod, "KIND_EXPR", sol_new_int(state, -2)); |
|
|
|
sol_map_invert(state, mod); |
|
|
|
sol_map_borrow_name(state, mod, "print", sol_new_cfunc(state, sol_f_ast_print)); |
|
|
|
sol_register_module_name(state, "ast", mod); |
|
|
|