58 lines
2.1 KiB
C++
58 lines
2.1 KiB
C++
#pragma once
|
|
|
|
#include "common.hpp"
|
|
|
|
struct Context;
|
|
|
|
struct Expression {
|
|
Expression() {}
|
|
Expression(Array&& code) : reg(0), code(std::move(code)) {}
|
|
|
|
static Result<Expression> create() {
|
|
Array c = TRY(Array::create());
|
|
|
|
return Expression(std::move(c));
|
|
}
|
|
Result<void> add_opcode(Oc opcode, OpArg arg1 = {0, 0}, OpArg arg2 = {0, 0},
|
|
OpArg arg3 = {0, 0}, OpArg arg4 = {0, 0});
|
|
|
|
Result<void> add_code(Array& c) {
|
|
code = TRY(code.concat(c));
|
|
return Result<void>();
|
|
}
|
|
uint64_t reg;
|
|
Array code;
|
|
};
|
|
|
|
class Compiler {
|
|
public:
|
|
Compiler() {}
|
|
|
|
Result<Value> compile(Value& expr);
|
|
Result<Expression> compile_expr(Context& context, const Value& expr);
|
|
Result<Expression> compile_list(Context& context, const Value& expr);
|
|
Result<Expression> compile_primop(Context& context, Symbol& op,
|
|
const Value& expr);
|
|
Result<Expression> compile_comparison(Context& context, Symbol& op,
|
|
const Value& expr);
|
|
Result<Expression> compile_constant(Context& context, const Value& value);
|
|
Result<Expression> compile_symbol(Context& context, const Value& value);
|
|
Result<Expression> compile_if(Context& context, Symbol& op,
|
|
const Value& expr);
|
|
Result<Expression> compile_and(Context& context, Symbol& op,
|
|
const Value& expr);
|
|
Result<Expression> compile_or(Context& context, Symbol& op,
|
|
const Value& expr);
|
|
Result<Expression> compile_not(Context& context, Symbol& op,
|
|
const Value& expr);
|
|
Result<Expression> compile_def(Context& context, Symbol& op,
|
|
const Value& expr);
|
|
Result<Expression> compile_fn(Context& context, Symbol& op,
|
|
const Value& expr);
|
|
Result<Expression> compile_let(Context& context, Symbol& op,
|
|
const Value& expr);
|
|
Result<Expression> compile_body(Context& context, const Value& expr);
|
|
Result<Expression> compile_function_call(Context& context, const Value& expr);
|
|
};
|
|
|
|
Result<Value> compile(Value& expr);
|