server_common/a8
5
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

1

Browse Source
This commit is contained in:
aozhiwei 2023-03-05 11:43:46 +08:00
parent c4610bed76
commit abee0bed17
2 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
a8/lisp.cc
View File

@ -200,6 +200,11 @@ namespace a8
return std::make_shared<Value>(stack[0]); return std::make_shared<Value>(stack[0]);
} }
bool Expr::MaybeExpr(const std::string& script)
{
return script.find('(') != std::string::npos;
}
/* /*
1: token 1: token
-1: end -1: end

1
a8/lisp.h
View File

@ -77,6 +77,7 @@ namespace a8
static std::shared_ptr<Value> Compile(const std::string& script, std::shared_ptr<Scope> env); static std::shared_ptr<Value> Compile(const std::string& script, std::shared_ptr<Scope> env);
static std::shared_ptr<Value> Eval(std::shared_ptr<Value> x, std::shared_ptr<Scope> env); static std::shared_ptr<Value> Eval(std::shared_ptr<Value> x, std::shared_ptr<Scope> env);
static bool MaybeExpr(const std::string& script);
private: private:
static int GetToken(const std::string& script, int& pos, std::string& token); static int GetToken(const std::string& script, int& pos, std::string& token);