Make a Lisp
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.

66 lines
1.3 KiB

2 years ago
/*
* Copyright (C) 2023 Riyyi
*
* SPDX-License-Identifier: MIT
*/
#pragma once
#include <cstddef> // size_t
#include <memory> // std::shared_ptr
2 years ago
#include <vector>
#include "ast.h"
#include "lexer.h"
namespace blaze {
// Parsing -> creates AST
class Reader {
public:
Reader(std::vector<Token>&& tokens) noexcept;
virtual ~Reader();
void read();
void dump();
ValuePtr node() { return m_node; }
2 years ago
private:
bool isEOF() const;
Token peek() const;
Token consume();
bool consumeSpecific(Token token);
2 years ago
void ignore();
void retreat();
2 years ago
ValuePtr readImpl();
ValuePtr readSpliceUnquote(); // ~@
ValuePtr readList(); // ()
ValuePtr readVector(); // []
ValuePtr readHashMap(); // {}
ValuePtr readQuote(); // '
ValuePtr readQuasiQuote(); // `
ValuePtr readUnquote(); // ~
ValuePtr readWithMeta(); // ^
ValuePtr readDeref(); // @
ValuePtr readString(); // "foobar"
ValuePtr readKeyword(); // :keyword
ValuePtr readValue(); // number, "nil", "true", "false", symbol
2 years ago
void dumpImpl(ValuePtr node);
2 years ago
size_t m_index { 0 };
size_t m_indentation { 0 };
std::vector<Token> m_tokens;
char m_error_character { 0 };
bool m_invalid_syntax { false };
bool m_is_unbalanced { false };
ValuePtr m_node { nullptr };
2 years ago
};
} // namespace blaze