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-04 10:07:01 +08:00
parent bb2f76674d
commit b075c000c2
2 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
a8/lisp.cc
View File

@ -158,6 +158,9 @@ namespace a8
if (token == "(") {
List new_list = std::make_shared<std::vector<std::shared_ptr<Value>>>();
stack.push_back(new_list);
if (depth >= 0) {
stack.at(depth)->push_back(std::make_shared<Value>(new_list));
}
++depth;
} else if (token == ")") {
--depth;
@ -178,7 +181,9 @@ namespace a8
}
stack.at(depth)->push_back(symbol);
} else {
abort();
Symbol symbol;
symbol.name = token;
stack.at(depth)->push_back(std::make_shared<Value>(symbol));
}
}
}

2
a8/lisp.h
View File

@ -47,7 +47,7 @@ namespace a8
a8::XObject ToXObject();
};
class Scope
class Scope : public std::enable_shared_from_this<Scope>
{
public:
std::shared_ptr<Value> Find(const std::string& name);