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
Nasal-Interpreter/version0.2/nasal_functional.h

366 lines
9.2 KiB
C++
Raw Blame History

#ifndef __NASAL_FUNCTIONAL_H__
#define __NASAL_FUNCTIONAL_H__
#define FUNC_BEGIN 0
#define FUNC_OPERATOR 1
#define FUNC_IDENTIFIER 2
#define FUNC_NUMBER 3
#define FUNC_RESERVEWORD 4
#define FUNC_STRING 5
struct token_unit
{
int type;
std::string content;
int line;
token_unit *next;
};
class func
{
private:
token_unit *head;
public:
func();
~func();
};
class token_list
{
private:
token_unit *head;
public:
token_list()
{
head=new token_unit;
head->type=FUNC_BEGIN;
head->content="__process_begin";
head->line=0;
head->next=NULL;
}
~token_list()
{
token_unit *temp=head;
token_unit *this_node=NULL;
while(temp->next)
{
this_node=temp;
temp=temp->next;
delete this_node;
}
delete temp;
}
void print_line_token(const int _line)
{
std::cout<<"line "<<_line<<": ";
token_unit *temp=head;
while(temp->next)
{
temp=temp->next;
if(temp->line==_line)
std::cout<<temp->content<<" ";
else if(temp->line>_line)
break;
}
std::cout<<std::endl;
return;
}
void delete_all()
{
if(!head->next)
return;
token_unit *temp=head;
token_unit *this_node=NULL;
temp=temp->next;
head->next=NULL;
while(temp->next)
{
this_node=temp;
temp=temp->next;
delete this_node;
}
delete temp;
return;
}
void append(const int _type,std::string &_content,const int _line)
{
token_unit *temp=head;
while(temp->next)
temp=temp->next;
temp->next=new token_unit;
temp=temp->next;
temp->next=NULL;
temp->type=_type;
temp->line=_line;
temp->content=_content;
return;
}
void print()
{
token_unit *temp=head;
std::cout<<"line "<<temp->line<<": "<<"( ProcessBegin | "<<temp->content<<" )"<<std::endl;
if(!head->next)
return;
while(temp->next)
{
temp=temp->next;
std::cout<<"line "<<temp->line<<": ";
if(temp->type==FUNC_OPERATOR)
std::cout<<"( Operator | ";
else if(temp->type==FUNC_IDENTIFIER)
std::cout<<"( Identifier | ";
else if(temp->type==FUNC_NUMBER)
std::cout<<"( Number | ";
else if(temp->type==FUNC_RESERVEWORD)
std::cout<<"( ReserveWord | ";
else if(temp->type==FUNC_STRING)
std::cout<<"( String | ";
std::cout<<temp->content<<" )"<<std::endl;
}
return;
}
/*
void run()
{
nasal_var_stack.delete_all();
nasal_func_stack.delete_all();
token_unit *temp=head;
if(!head->next)
{
std::cout<<">> Running complete."<<std::endl;
return;
}
while(temp->next)
{
temp=temp->next;
if(temp->type=="Operator")
{
;
}
else if(temp->type=="Identifier")
{
;
}
else if(temp->type=="Number")
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] Number without any tokens."<<std::endl;
return;
}
else if(temp->type=="ReserveWord")
{
if(temp->content=="var")
{
if(temp->next)
temp=temp->next;
else
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] Missing elements after \"var\"."<<std::endl;
return;
}
//end identifier
std::string name_of_var;
if(temp->type=="Identifier")
name_of_var=temp->content;
else
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] Missing identifier after \"var\"."<<std::endl;
return;
}
if(temp->next)
temp=temp->next;
else
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] Missing operator \"=\" after identifier."<<std::endl;
return;
}
if(temp->content!="=")
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] Missing operator \"=\" after identifier."<<std::endl;
return;
}
if(temp->next)
temp=temp->next;
else
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] Missing value after operator \"=\" ."<<std::endl;
return;
}
if(temp->type=="Number")
{
temp_var.isGlobal=true;
if(isFloat(temp->content))
{
temp_var.Type="double";
temp_var.data=new double;
*((double *)temp_var.data)=double_Str2Num(temp->content);
nasal_var_stack.append_var(name_of_var,temp_var);
delete (double *)temp_var.data;
temp_var.data=NULL;
}
else
{
temp_var.Type="long long int";
temp_var.data=new long long int;
*((long long int *)temp_var.data)=int_Str2Num(temp->content);
nasal_var_stack.append_var(name_of_var,temp_var);
delete (long long int *)temp_var.data;
temp_var.data=NULL;
}
}
else if(temp->type=="String")
{
temp_var.isGlobal=true;
temp_var.Type="string";
temp_var.data=new std::string;
std::string temp_string="";
for(int i=1;i<(int)temp->content.length()-1;++i)
temp_string+=temp->content[i];
*((std::string *)temp_var.data)=temp_string;
nasal_var_stack.append_var(name_of_var,temp_var);
delete (std::string *)temp_var.data;
temp_var.data=NULL;
}
else if(temp->type=="Operator" && temp->content=="{")
{
bool make_pair=false;
int cnt=1;
while(temp->next)
{
temp=temp->next;
if(temp->type=="Operator" && temp->content=="}")
{
--cnt;
if(!cnt)
{
make_pair=true;
break;
}
}
else if(temp->type=="Operator" && temp->content=="{")
++cnt;
}
if(!make_pair)
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] Expect a \"}\"."<<std::endl;
return;
}
}
else if(temp->type=="Operator" && temp->content=="[")
{
bool make_pair=false;
int cnt=1;
while(temp->next)
{
temp=temp->next;
if(temp->type=="Operator" && temp->content=="]")
{
--cnt;
if(!cnt)
{
make_pair=true;
break;
}
}
else if(temp->type=="Operator" && temp->content=="[")
++cnt;
}
if(!make_pair)
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] Expect a \"]\"."<<std::endl;
return;
}
}
else
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] Missing value after operator \"=\" ."<<std::endl;
return;
}
if(!(temp->next && temp->next->content==";"))
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] Expect a \";\" at the end of the statement."<<std::endl;
nasal_var_stack.pop_var();
return;
}
else
temp=temp->next;
//end var
}
else if(temp->content=="print")
{
if(temp->next && temp->next->content=="(")
{
temp=temp->next;
while(temp->next)
{
temp=temp->next;
if(temp->type=="String")
{
std::string temp_string="";
for(int i=1;i<(int)temp->content.length()-1;++i)
temp_string+=temp->content[i];
PrintString(temp_string);
}
else if(temp->type=="Identifier")
PrintVar(nasal_var_stack.SearchVar(temp->content));
else if(temp->type=="Operator" && temp->content==")")
{
if(!temp->next)
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] Expect a \";\" at the end of the statement."<<std::endl;
return;
}
break;
}
else if(temp->type=="Operator" && temp->content==";")
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] Expect a \")\" at the end of print."<<std::endl;
return;
}
}
}
else
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] Expect a \"(\" after function print."<<std::endl;
return;
}
if(!(temp->next && temp->next->content==";"))
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] Expect a \";\" at the end of the statement."<<std::endl;
return;
}
}
}
else if(temp->type=="String")
{
print_line_token(temp->line);
std::cout<<"line "<<temp->line<<": "<<"[Error] String without any tokens."<<std::endl;
return;
}
}
//nasal_var_stack.print_var(); //for debug mode
//nasal_func_stack.print_function(); //for debug mode
nasal_var_stack.delete_all();
nasal_func_stack.delete_all();
std::cout<<">> Running complete."<<std::endl;
return;
}*/
};
#endif
Reference in New Issue View Git Blame Copy Permalink