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

Delete nasal_functional.h

This commit is contained in:
Valk Richard Li 2019-08-08 22:47:16 +08:00 committed by GitHub
parent 36d38faad4
commit 949e01a725
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 0 additions and 426 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

426
nasal_functional.h
View File

@ -1,426 +0,0 @@
#ifndef __NASAL_FUNCTIONAL_H__
#define __NASAL_FUNCTIONAL_H__
#include <iostream>
#include <cstring>
#include "nasal_var_stack.h"
#include "nasal_func_stack.h"
namespace nasal
{
bool isFloat(std::string &str)
{
for(int i=0;i<(int)str.length();++i)
if(str[i]=='.')
return true;
return false;
}
long long int int_Str2Num(std::string &str)
{
for(int i=0;i<(int)str.length();++i)
if(!(('0'<=str[i]) && (str[i]<='9') || (str[i]=='.')))
{
std::cout<<"[Error] Non-numeric string."<<std::endl;
return 0;
}
long long int num=0;
long long int acc=1;
for(int i=(int)str.length()-1;i>=0;--i)
{
num+=acc*((long long int)(str[i]-'0'));
acc*=10;
}
return num;
}
double double_Str2Num(std::string &str)
{
for(int i=0;i<(int)str.length();++i)
if(!(('0'<=str[i]) && (str[i]<='9') || (str[i]=='.')))
{
std::cout<<"[Error] Non-numeric string."<<std::endl;
return 0;
}
int DotPlace=0;
for(int i=0;i<(int)str.length();++i)
if(str[i]=='.')
{
DotPlace=i;
break;
}
double num=0;
double acc=1;
double aff=0.1;
for(int i=DotPlace+1;i<(int)str.length();++i)
{
num+=aff*((double)(str[i]-'0'));
aff*=0.1;
}
for(int i=DotPlace-1;i>=0;--i)
{
num+=acc*((double)(str[i]-'0'));
acc*=10;
}
return num;
}
#define FUNC_OPERATOR 1
#define FUNC_IDENTIFIER 2
#define FUNC_NUMBER 3
#define FUNC_RESERVEWORD 4
#define FUNC_STRING 5
var_stack nasal_var_stack;
func_stack nasal_func_stack;
var temp_var;
func temp_func;
struct token_unit
{
std::string type;
std::string content;
int line;
token_unit *next;
};
class token_list
{
private:
token_unit *head;
public:
token_list()
{
head=new token_unit;
head->type="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 char *_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=="Operator")
std::cout<<"( Operator | ";
else if(temp->type=="Identifier")
std::cout<<"( Identifier | ";
else if(temp->type=="Number")
std::cout<<"( Number | ";
else if(temp->type=="ReserveWord")
std::cout<<"( ReserveWord | ";
else if(temp->type=="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