2020-10-23 14:53:04 +08:00
|
|
|
#ifndef __NASAL_ENUM_H__
|
|
|
|
#define __NASAL_ENUM_H__
|
|
|
|
|
|
|
|
/* token_type is used in lexer */
|
|
|
|
enum token_type
|
|
|
|
{
|
|
|
|
tok_null=0,
|
|
|
|
tok_number,tok_string,tok_identifier,
|
|
|
|
tok_for,tok_forindex,tok_foreach,tok_while,
|
|
|
|
tok_var,tok_func,tok_break,tok_continue,
|
|
|
|
tok_return,tok_if,tok_elsif,tok_else,tok_nil,
|
|
|
|
tok_left_curve,tok_right_curve,
|
|
|
|
tok_left_bracket,tok_right_bracket,
|
|
|
|
tok_left_brace,tok_right_brace,
|
|
|
|
tok_semi,tok_and,tok_or,tok_comma,tok_dot,tok_ellipsis,tok_quesmark,
|
|
|
|
tok_colon,tok_add,tok_sub,tok_mult,tok_div,tok_link,tok_not,
|
|
|
|
tok_equal,
|
|
|
|
tok_add_equal,tok_sub_equal,tok_mult_equal,tok_div_equal,tok_link_equal,
|
|
|
|
tok_cmp_equal,tok_cmp_not_equal,tok_less_than,tok_greater_than,tok_less_equal,tok_greater_equal
|
|
|
|
};
|
|
|
|
|
|
|
|
enum ast_node
|
|
|
|
{
|
|
|
|
ast_null=0,ast_root,ast_block,
|
|
|
|
ast_nil,ast_number,ast_string,ast_identifier,ast_function,ast_hash,ast_vector,
|
|
|
|
ast_hashmember,ast_call,ast_call_hash,ast_call_vec,ast_call_func,ast_subvec,
|
|
|
|
ast_args,ast_default_arg,ast_dynamic_id,
|
|
|
|
ast_and,ast_or,
|
|
|
|
ast_equal,ast_add_equal,ast_sub_equal,ast_mult_equal,ast_div_equal,ast_link_equal,
|
|
|
|
ast_cmp_equal,ast_cmp_not_equal,ast_less_than,ast_less_equal,ast_greater_than,ast_greater_equal,
|
|
|
|
ast_add,ast_sub,ast_mult,ast_div,ast_link,
|
|
|
|
ast_unary_sub,ast_unary_not,
|
|
|
|
ast_trinocular,
|
|
|
|
ast_for,ast_forindex,ast_foreach,ast_while,ast_new_iter,
|
|
|
|
ast_conditional,ast_if,ast_elsif,ast_else,
|
|
|
|
ast_multi_id,ast_multi_scalar,
|
|
|
|
ast_definition,ast_multi_assign,
|
|
|
|
ast_continue,ast_break,ast_return
|
|
|
|
};
|
|
|
|
|
|
|
|
std::string ast_str(int type)
|
|
|
|
{
|
|
|
|
std::string str;
|
|
|
|
switch(type)
|
|
|
|
{
|
|
|
|
case ast_null: str="null";break;
|
|
|
|
case ast_root: str="root";break;
|
|
|
|
case ast_block: str="block";break;
|
|
|
|
case ast_nil: str="nil";break;
|
|
|
|
case ast_number: str="number";break;
|
|
|
|
case ast_string: str="string";break;
|
|
|
|
case ast_identifier: str="id";break;
|
|
|
|
case ast_function: str="function";break;
|
|
|
|
case ast_hash: str="hash";break;
|
|
|
|
case ast_vector: str="vector";break;
|
|
|
|
case ast_hashmember: str="hashmember";break;
|
|
|
|
case ast_call: str="call";break;
|
|
|
|
case ast_call_hash: str="call_hash";break;
|
|
|
|
case ast_call_vec: str="call_vector";break;
|
|
|
|
case ast_call_func: str="call_func";break;
|
|
|
|
case ast_subvec: str="subvec";break;
|
|
|
|
case ast_args: str="arguments";break;
|
|
|
|
case ast_default_arg: str="default_arg";break;
|
|
|
|
case ast_dynamic_id: str="dynamic_id";break;
|
|
|
|
case ast_and: str="and";break;
|
|
|
|
case ast_or: str="or";break;
|
|
|
|
case ast_equal: str="=";break;
|
|
|
|
case ast_add_equal: str="+=";break;
|
|
|
|
case ast_sub_equal: str="-=";break;
|
|
|
|
case ast_mult_equal: str="*=";break;
|
|
|
|
case ast_div_equal: str="/=";break;
|
|
|
|
case ast_link_equal: str="~=";break;
|
|
|
|
case ast_cmp_equal: str="==";break;
|
|
|
|
case ast_cmp_not_equal:str="!=";break;
|
|
|
|
case ast_less_than: str="<";break;
|
|
|
|
case ast_less_equal: str="<=";break;
|
|
|
|
case ast_greater_than: str=">";break;
|
|
|
|
case ast_greater_equal:str=">=";break;
|
|
|
|
case ast_add: str="+";break;
|
|
|
|
case ast_sub: str="-";break;
|
|
|
|
case ast_mult: str="*";break;
|
|
|
|
case ast_div: str="/";break;
|
|
|
|
case ast_link: str="~";break;
|
|
|
|
case ast_unary_sub: str="unary-";break;
|
|
|
|
case ast_unary_not: str="unary!";break;
|
|
|
|
case ast_trinocular: str="trinocular";break;
|
|
|
|
case ast_for: str="for";break;
|
|
|
|
case ast_forindex: str="forindex";break;
|
|
|
|
case ast_foreach: str="foreach";break;
|
|
|
|
case ast_while: str="while";break;
|
|
|
|
case ast_new_iter: str="new_iterator";break;
|
|
|
|
case ast_conditional: str="conditional";break;
|
|
|
|
case ast_if: str="if";break;
|
|
|
|
case ast_elsif: str="elsif";break;
|
|
|
|
case ast_else: str="else";break;
|
|
|
|
case ast_multi_id: str="multi_id";break;
|
|
|
|
case ast_multi_scalar: str="multi_scalar";break;
|
|
|
|
case ast_definition: str="definition";break;
|
|
|
|
case ast_multi_assign: str="multi_assignment";break;
|
|
|
|
case ast_continue: str="continue";break;
|
|
|
|
case ast_break: str="break";break;
|
|
|
|
case ast_return: str="return";break;
|
|
|
|
}
|
|
|
|
return str;
|
|
|
|
}
|
|
|
|
|
|
|
|
enum parse_error
|
|
|
|
{
|
|
|
|
unknown,
|
|
|
|
error_token,
|
|
|
|
error_expr,
|
|
|
|
lack_left_curve,
|
|
|
|
lack_right_curve,
|
|
|
|
lack_left_bracket,
|
|
|
|
lack_right_bracket,
|
|
|
|
lack_left_brace,
|
|
|
|
lack_right_brace,
|
|
|
|
exprs_lack_rbrace,
|
|
|
|
lack_semi,
|
|
|
|
lack_comma,
|
|
|
|
lack_colon,
|
|
|
|
lack_equal,
|
|
|
|
lack_scalar,
|
|
|
|
lack_identifier,
|
|
|
|
lack_calculation,
|
|
|
|
lack_exprs,
|
|
|
|
lack_token,
|
|
|
|
lack_args,
|
|
|
|
default_arg_not_end,
|
|
|
|
dynamic_id_not_end,
|
|
|
|
name_repetition,
|
|
|
|
definition_use_call,
|
|
|
|
multi_id_use_call,
|
|
|
|
multi_assign_lack_val,
|
|
|
|
lack_definition,
|
|
|
|
lack_loop_iter,
|
|
|
|
lack_func_content
|
|
|
|
};
|
|
|
|
|
|
|
|
void error_info(int line,int error_type,std::string error_str="")
|
|
|
|
{
|
|
|
|
std::string detail;
|
2020-11-02 12:24:12 +08:00
|
|
|
std::cout<<">> [parse] line "<<line<<": ";
|
2020-10-23 14:53:04 +08:00
|
|
|
switch(error_type)
|
|
|
|
{
|
|
|
|
case unknown: std::cout<<"unknown error.\n"; break;
|
|
|
|
case error_token: std::cout<<"error token \""+error_str+"\".\n"; break;
|
|
|
|
case error_expr: std::cout<<"error expression \""+error_str+"\".\n"; break;
|
|
|
|
case lack_left_curve: std::cout<<"expected \"(\".\n"; break;
|
|
|
|
case lack_right_curve: std::cout<<"expected \")\".\n"; break;
|
|
|
|
case lack_left_bracket: std::cout<<"expected \"[\".\n"; break;
|
|
|
|
case lack_right_bracket: std::cout<<"expected \"]\".\n"; break;
|
|
|
|
case lack_left_brace: std::cout<<"expected \"{\".\n"; break;
|
|
|
|
case lack_right_brace: std::cout<<"expected \"}\".\n"; break;
|
|
|
|
case exprs_lack_rbrace: std::cout<<"expected \"}\" with this line\'s \"{\".\n";break;
|
|
|
|
case lack_semi: std::cout<<"expected \";\".\n"; break;
|
|
|
|
case lack_comma: std::cout<<"expected \",\".\n"; break;
|
|
|
|
case lack_colon: std::cout<<"expected \":\".\n"; break;
|
|
|
|
case lack_equal: std::cout<<"expected \"=\".\n"; break;
|
|
|
|
case lack_scalar: std::cout<<"expected scalar here.\n"; break;
|
|
|
|
case lack_identifier: std::cout<<"expected identifier here.\n"; break;
|
|
|
|
case lack_calculation: std::cout<<"expected arithmetic-expression here.\n"; break;
|
|
|
|
case lack_exprs: std::cout<<"expected expression block here.\n"; break;
|
|
|
|
case lack_token: std::cout<<"expected \""+error_str+"\" here.\n"; break;
|
|
|
|
case lack_args: std::cout<<"expected arguments here.\n"; break;
|
|
|
|
case default_arg_not_end: std::cout<<"default argument missing for parameter of "+error_str+".\n";break;
|
|
|
|
case dynamic_id_not_end: std::cout<<"dynamic id must be the end of "+error_str+".\n";break;
|
|
|
|
case name_repetition: std::cout<<"this identifier name has existed.\n";break;
|
|
|
|
case definition_use_call: std::cout<<"should not use call_scalar in definition progress.\n";break;
|
|
|
|
case multi_id_use_call: std::cout<<"should not use call_scalar in multi_id progress.\n";break;
|
|
|
|
case multi_assign_lack_val:std::cout<<"multi-assignment lacks value list.\n";break;
|
|
|
|
case lack_definition: std::cout<<"expected a definition expression here.\n";break;
|
|
|
|
case lack_loop_iter: std::cout<<"expected an iterator to loop through.\n";break;
|
|
|
|
case lack_func_content: std::cout<<"expected arguments or expression block here.\n";break;
|
|
|
|
}
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
enum runtime_scalar_type
|
|
|
|
{
|
|
|
|
vm_nil=0,
|
|
|
|
vm_number,
|
|
|
|
vm_string,
|
|
|
|
vm_closure,
|
|
|
|
vm_function,
|
|
|
|
vm_vector,
|
|
|
|
vm_hash
|
|
|
|
};
|
|
|
|
|
2020-06-01 01:19:26 +08:00
|
|
|
#endif
|