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.
71 lines
1.1 KiB
71 lines
1.1 KiB
2 years ago
|
/*
|
||
|
|
* Copyright (C) 2023 Riyyi
|
||
|
|
*
|
||
|
|
* SPDX-License-Identifier: MIT
|
||
|
|
*/
|
||
|
|
|
||
|
|
#include "ruc/format/print.h"
|
||
|
|
|
||
|
|
#include "printer.h"
|
||
|
|
#include "types.h"
|
||
|
|
|
||
|
|
namespace blaze {
|
||
|
|
|
||
|
|
Printer::Printer(ASTNode* node)
|
||
|
|
: m_node(node)
|
||
|
|
{
|
||
|
|
}
|
||
|
|
|
||
|
|
Printer::~Printer()
|
||
|
|
{
|
||
|
|
delete m_node;
|
||
|
|
}
|
||
|
|
|
||
|
|
// -----------------------------------------
|
||
|
|
|
||
|
|
void Printer::dump()
|
||
|
|
{
|
||
|
|
if (m_node == nullptr) {
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
dumpImpl(m_node);
|
||
|
|
print("\n");
|
||
|
|
}
|
||
|
|
|
||
|
|
void Printer::dumpImpl(ASTNode* node)
|
||
|
|
{
|
||
|
|
auto printSpacing = [this]() {
|
||
|
|
if (!m_firstNode && !m_previousNodeIsList) {
|
||
|
|
print(" ");
|
||
|
|
}
|
||
|
|
};
|
||
|
|
|
||
|
|
if (is<List>(node)) {
|
||
|
|
printSpacing();
|
||
|
|
print("(");
|
||
|
|
m_firstNode = false;
|
||
|
|
m_previousNodeIsList = true;
|
||
|
|
List* list = static_cast<List*>(node);
|
||
|
|
for (size_t i = 0; i < list->nodes().size(); ++i) {
|
||
|
|
dumpImpl(list->nodes()[i]);
|
||
|
|
m_previousNodeIsList = false;
|
||
|
|
}
|
||
|
|
print(")");
|
||
|
|
}
|
||
|
|
else if (is<String>(node)) {
|
||
|
|
printSpacing();
|
||
|
|
print("\"{}\"", static_cast<String*>(node)->data());
|
||
|
|
}
|
||
|
|
else if (is<Number>(node)) {
|
||
|
|
printSpacing();
|
||
|
|
print("{}", static_cast<Number*>(node)->number());
|
||
|
|
}
|
||
|
|
else if (is<Symbol>(node)) {
|
||
|
|
printSpacing();
|
||
|
|
print("{}", static_cast<Symbol*>(node)->symbol());
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
} // namespace blaze
|