xxq250/Nasal-Interpreter
1
0
Fork 1
mirror of https://github.com/ValKmjolnir/Nasal-Interpreter.git synced 2026-05-24 13:35:43 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

bug fixed & more efficient callfv

Browse Source 
I changed callfv's way of calling a function with arguments in vm_vec.
now callfv fetches arguments from val_stack directly,so it runs test/fib.nas from 2.4s to 1.9s.

delete operand callf,add operands callfv & callfh.

also,i check val_stack's top to make sure there is not a stack overflow.
This commit is contained in:
Valk Richard Li
2021-06-03 21:49:31 +08:00
parent b2e85de7a7
commit a3d629a08e
9 changed files with 164 additions and 135 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
main.cpp
View File

@@ -1,24 +1,19 @@
#include "nasal.h"
nasal_lexer lexer;
nasal_parse parse;
nasal_import import;
std::string file="null";
nasal_codegen codegen;
nasal_vm vm;
nasal_vm vm;
void help()
{
std::cout
<<">> [\"file\"] input file name. \n"
<<">> [help ] show help. \n"
<<">> [clear ] clear the screen. \n"
<<">> [lex ] view tokens. \n"
<<">> [ast ] view abstract syntax tree. \n"
<<">> [code ] view byte code. \n"
<<">> [exec ] execute program on bytecode vm. \n"
<<">> [logo ] print logo of nasal . \n"
<<">> [exit ] quit nasal interpreter. \n";
<<">> [\"file\"] input file name. \n"
<<">> [help ] show help. \n"
<<">> [clear] clear the screen. \n"
<<">> [lex ] view tokens. \n"
<<">> [ast ] view abstract syntax tree. \n"
<<">> [code ] view byte code. \n"
<<">> [exec ] execute program on bytecode vm.\n"
<<">> [logo ] print logo of nasal . \n"
<<">> [exit ] quit nasal interpreter. \n";
return;
}
@@ -39,8 +34,12 @@ void die(std::string stage,std::string filename)
return;
}
void execute(std::string& command)
void execute(std::string& file,std::string& command)
{
nasal_lexer lexer;
nasal_parse parse;
nasal_import import;
nasal_codegen codegen;
lexer.openfile(file);
lexer.scanner();
if(lexer.get_error())
@@ -95,12 +94,13 @@ void execute(std::string& command)
int main()
{
std::string command;
std::string file="null";
#ifdef _WIN32
// use chcp 65001 to use unicode io
system("chcp 65001");
system("cls");
#else
system("clear");
int rs=system("clear");// avoid annoying warning of high version gcc/g++
#endif
logo();
std::cout<<">> Nasal interpreter ver 6.5 efficient gc test .\n";
@@ -120,7 +120,7 @@ int main()
#ifdef _WIN32
system("cls");
#else
system("clear");
int rs=system("clear");
#endif
}
else if(command=="logo")
@@ -128,7 +128,7 @@ int main()
else if(command=="exit")
break;
else if(command=="lex" || command=="ast" || command=="code" || command=="exec")
execute(command);
execute(file,command);
else
file=command;
}