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

Add new functions & bugs fixed

This commit is contained in:
Valk Richard Li 2019-11-27 16:19:36 +08:00 committed by GitHub
parent 3aae6494ce
commit 85c4ce8946
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 54 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

38
balloon/abstract_syntax_tree.cpp
View File

@ -672,7 +672,7 @@ var abstract_syntax_tree::assignment()
}
else if(type==__link_equal)
{
if(addr->get_type()==__var_string && temp.get_type()==__string)
if(addr->get_type()==__var_string && temp.get_type()==__var_string)
addr->set_string(addr->get_string()+temp.get_string());
else
{
@ -1097,6 +1097,42 @@ var abstract_syntax_tree::run_func(std::list<var> parameter,var self_func)
// this must be added when running a function
ret_stack.push(ret);
}
else if(self_func.get_name()=="chars")
{
if(!parameter.empty())
{
std::list<var>::iterator i=parameter.begin();
if(i->get_type()==__var_string)
{
std::string str=i->get_string();
ret.set_type(__var_array);
std::string temp="";
for(int j=0;j<str.length();++j)
{
temp="";
temp+=str[j];
var new_var;
new_var.set_type(__var_string);
new_var.set_string(temp);
ret.append_array(new_var);
}
}
else
{
exit_type=__error_value_type;
std::cout<<">>[Runtime-error] line "<<this->line<<": incorrect value type.must use a string."<<std::endl;
}
}
else
{
exit_type=__lack_parameter;
std::cout<<">>[Runtime-error] line "<<this->line<<": lack parameter(s)."<<std::endl;
}
// this must be added when running a function
if(exit_type!=__process_exited_successfully)
ret.set_type(__null_type);
ret_stack.push(ret);
}
else
{
for(;para_name!=para.children.end();++para_name,++para_value)

17
balloon/lib/basics.nas
View File

@ -46,4 +46,21 @@ var size=func(value)
var rand=func()
{
return __call_Cpp_rand();
};
# chars is used to split string into char vector
# each member of this vector is a string which has only one char
var chars=func(str)
{
var char_vector=__call_Cpp_split_str_to_chars(str);
return char_vector;
};
# get the substring from the given string
var substr=func(str,start,length)
{
var temp='';
var char_split_str=chars(str);
for(var i=start;i<start+length;i+=1){temp~=char_split_str[i];}
return temp;
};