xxq250
/
Nasal-Interpreter
mirror of https://github.com/ValKmjolnir/Nasal-Interpreter.git
1
0
Fork 0
Code Issues Actions 1 Packages Projects Releases Wiki Activity

update

This commit is contained in:
Valk Richard Li 2020-03-14 01:20:53 +08:00 committed by GitHub
parent 4d74e5a064
commit 17e107996d
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 41 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
version2.0/main.cpp
View File

@ -13,10 +13,10 @@ std::string command;
int main() int main()
{ {
std::cout<<" __ _ "<<std::endl; std::cout<<" __ _ "<<std::endl;
std::cout<<" /\\ \\ \\__ _ ___ __ _| |"<<std::endl; std::cout<<" /\\ \\ \\__ _ ___ __ _| | "<<std::endl;
std::cout<<" / \\/ / _` / __|/ _` | |"<<std::endl; std::cout<<" / \\/ / _` / __|/ _` | | "<<std::endl;
std::cout<<" / /\\ / (_| \\__ \\ (_| | |"<<std::endl; std::cout<<" / /\\ / (_| \\__ \\ (_| | | "<<std::endl;
std::cout<<" \\_\\ \\/ \\__,_|___/\\__,_|_|"<<std::endl; std::cout<<" \\_\\ \\/ \\__,_|___/\\__,_|_|"<<std::endl;
#ifdef _WIN32 #ifdef _WIN32
std::cout<<">> [system] Windows system."<<std::endl; std::cout<<">> [system] Windows system."<<std::endl;
@ -163,10 +163,10 @@ int main()
} }
else if(command=="logo") else if(command=="logo")
{ {
std::cout<<" __ _ "<<std::endl; std::cout<<" __ _ "<<std::endl;
std::cout<<" /\\ \\ \\__ _ ___ __ _| |"<<std::endl; std::cout<<" /\\ \\ \\__ _ ___ __ _| | "<<std::endl;
std::cout<<" / \\/ / _` / __|/ _` | |"<<std::endl; std::cout<<" / \\/ / _` / __|/ _` | | "<<std::endl;
std::cout<<" / /\\ / (_| \\__ \\ (_| | |"<<std::endl; std::cout<<" / /\\ / (_| \\__ \\ (_| | | "<<std::endl;
std::cout<<" \\_\\ \\/ \\__,_|___/\\__,_|_|"<<std::endl; std::cout<<" \\_\\ \\/ \\__,_|___/\\__,_|_|"<<std::endl;
} }
else if(command=="info") else if(command=="info")

40
version2.0/nasal_runtime.h
View File

@ -33,7 +33,7 @@ class nasal_runtime
int calculation (std::list<std::map<std::string,int> >&,abstract_syntax_tree&); int calculation (std::list<std::map<std::string,int> >&,abstract_syntax_tree&);
int* get_identifier_addr(std::list<std::map<std::string,int> >&,abstract_syntax_tree&); int* get_identifier_addr(std::list<std::map<std::string,int> >&,abstract_syntax_tree&);
int call_identifier (std::list<std::map<std::string,int> >&,abstract_syntax_tree&); int call_identifier (std::list<std::map<std::string,int> >&,abstract_syntax_tree&);
void definition (std::list<std::map<std::string,int> >&,abstract_syntax_tree&); void definition (std::map<std::string,int>&,abstract_syntax_tree&);
void loop_expr (std::list<std::map<std::string,int> >&,abstract_syntax_tree&); void loop_expr (std::list<std::map<std::string,int> >&,abstract_syntax_tree&);
void conditional (std::list<std::map<std::string,int> >&,abstract_syntax_tree&); void conditional (std::list<std::map<std::string,int> >&,abstract_syntax_tree&);
int func_proc (std::list<std::map<std::string,int> >&,abstract_syntax_tree&); int func_proc (std::list<std::map<std::string,int> >&,abstract_syntax_tree&);
@ -504,7 +504,32 @@ int nasal_runtime::calculation(std::list<std::map<std::string,int> >& local_scop
int child_node_type_1=node.get_children().front().get_node_type(); int child_node_type_1=node.get_children().front().get_node_type();
int child_node_type_2=node.get_children().back().get_node_type(); int child_node_type_2=node.get_children().back().get_node_type();
if(child_node_type_1==__multi_scalar) if(child_node_type_1==__multi_scalar)
; {
std::vector<int*> assigned_addrs;
for(std::list<abstract_syntax_tree>::iterator i=node.get_children().front().get_children().begin();i!=node.get_children().front().get_children().end();++i)
{
assigned_addrs.push_back(get_identifier_addr(local_scope,*i));
if(!assigned_addrs.back())
{
assigned_addrs.clear();
break;
}
}
if(assigned_addrs.empty())
return -1;
}
else
{
int* assigned_addr=get_identifier_addr(local_scope,node.get_children().front());
if(!assigned_addr)
return -1;
int data_addr=calculation(local_scope,node.get_children().back());
nasal_gc.reference_delete(*assigned_addr);
*assigned_addr=data_addr;
nasal_gc.reference_add(data_addr);
return data_addr;
}
return -1;
} }
else if(node_type==__add_equal || node_type==__sub_equal || node_type==__mul_equal || node_type==__div_equal) else if(node_type==__add_equal || node_type==__sub_equal || node_type==__mul_equal || node_type==__div_equal)
{ {
@ -843,6 +868,9 @@ int nasal_runtime::calculation(std::list<std::map<std::string,int> >& local_scop
} }
else if(node_type==__ques_mark) else if(node_type==__ques_mark)
{ {
// ?:
// this will return the first element if the condition is true
// this will return the second element if the condition is null(0,nil,"0",'0',"",'',"0x0","0o0")
; ;
} }
return -1; return -1;
@ -880,10 +908,8 @@ int nasal_runtime::call_identifier(std::list<std::map<std::string,int> >& local_
} }
return addr; return addr;
} }
void nasal_runtime::definition(std::list<std::map<std::string,int> >& local_scope,abstract_syntax_tree& node) void nasal_runtime::definition(std::map<std::string,int>& local_scope,abstract_syntax_tree& node)
{ {
if(local_scope.empty())
;
if(node.get_children().front().get_node_type()==__multi_id) if(node.get_children().front().get_node_type()==__multi_id)
{ {
; ;
@ -970,7 +996,7 @@ int nasal_runtime::func_proc(std::list<std::map<std::string,int> >& local_scope,
node_type==__equal || node_type==__add_equal || node_type==__sub_equal || node_type==__div_equal || node_type==__mul_equal || node_type==__link_equal) node_type==__equal || node_type==__add_equal || node_type==__sub_equal || node_type==__div_equal || node_type==__mul_equal || node_type==__link_equal)
this->calculation(local_scope,*iter); this->calculation(local_scope,*iter);
else if(node_type==__definition) else if(node_type==__definition)
this->definition(local_scope,*iter); this->definition(local_scope.back(),*iter);
else if(node_type==__conditional) else if(node_type==__conditional)
this->conditional(local_scope,*iter); this->conditional(local_scope,*iter);
else if((node_type==__while) || (node_type==__for) || (node_type==__foreach) || (node_type==__forindex)) else if((node_type==__while) || (node_type==__for) || (node_type==__foreach) || (node_type==__forindex))
@ -1017,7 +1043,7 @@ void nasal_runtime::main_proc(abstract_syntax_tree& root)
node_type==__equal || node_type==__add_equal || node_type==__sub_equal || node_type==__div_equal || node_type==__mul_equal || node_type==__link_equal) node_type==__equal || node_type==__add_equal || node_type==__sub_equal || node_type==__div_equal || node_type==__mul_equal || node_type==__link_equal)
this->calculation(main_local_scope,*iter); this->calculation(main_local_scope,*iter);
else if(node_type==__definition) else if(node_type==__definition)
this->definition(main_local_scope,*iter); this->definition(global_scope,*iter);
else if(node_type==__conditional) else if(node_type==__conditional)
this->conditional(main_local_scope,*iter); this->conditional(main_local_scope,*iter);
else if((node_type==__while) || (node_type==__for) || (node_type==__foreach) || (node_type==__forindex)) else if((node_type==__while) || (node_type==__for) || (node_type==__foreach) || (node_type==__forindex))