You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
55 lines
1.4 KiB
55 lines
1.4 KiB
/* |
|
* Copyright (C) 2023 Riyyi |
|
* |
|
* SPDX-License-Identifier: MIT |
|
*/ |
|
|
|
#pragma once |
|
|
|
#include <list> |
|
#include <stack> |
|
|
|
#include "environment.h" |
|
#include "forward.h" |
|
|
|
namespace blaze { |
|
|
|
class List; |
|
|
|
class Eval { |
|
public: |
|
Eval(ValuePtr ast, EnvironmentPtr env); |
|
virtual ~Eval() = default; |
|
|
|
void eval(); |
|
|
|
ValuePtr ast() const { return m_ast; } |
|
|
|
private: |
|
ValuePtr evalImpl(); |
|
ValuePtr evalAst(ValuePtr ast, EnvironmentPtr env); |
|
|
|
bool isMacroCall(ValuePtr ast, EnvironmentPtr env); |
|
ValuePtr macroExpand(ValuePtr ast, EnvironmentPtr env); |
|
|
|
ValuePtr evalDef(const std::list<ValuePtr>& nodes, EnvironmentPtr env); |
|
ValuePtr evalDefMacro(const std::list<ValuePtr>& nodes, EnvironmentPtr env); |
|
ValuePtr evalFn(const std::list<ValuePtr>& nodes, EnvironmentPtr env); |
|
ValuePtr evalMacroExpand(const std::list<ValuePtr>& nodes, EnvironmentPtr env); |
|
ValuePtr evalQuasiQuoteExpand(const std::list<ValuePtr>& nodes); |
|
ValuePtr evalQuote(const std::list<ValuePtr>& nodes); |
|
void evalDo(const std::list<ValuePtr>& nodes, EnvironmentPtr env); |
|
void evalIf(const std::list<ValuePtr>& nodes, EnvironmentPtr env); |
|
void evalLet(const std::list<ValuePtr>& nodes, EnvironmentPtr env); |
|
void evalQuasiQuote(const std::list<ValuePtr>& nodes, EnvironmentPtr env); |
|
|
|
ValuePtr apply(std::shared_ptr<List> evaluated_list); |
|
|
|
ValuePtr m_ast; |
|
EnvironmentPtr m_env; |
|
|
|
std::stack<ValuePtr> m_ast_stack; |
|
std::stack<EnvironmentPtr> m_env_stack; |
|
}; |
|
|
|
} // namespace blaze
|
|
|