mirror of
https://codeberg.org/ProgramSnail/lang_2023.git
synced 2025-12-05 22:48:42 +00:00
part of find_symols_visitor, going to change grammar
This commit is contained in:
parent
18e85f794f
commit
0d98183953
4 changed files with 158 additions and 192 deletions
|
|
@ -70,8 +70,8 @@ private:
|
|||
|
||||
// Operators
|
||||
|
||||
void Visit(BinaryOperatorExpression* node) override;
|
||||
void Visit(UnaryOperatorExpression* node) override;
|
||||
//// void Visit(BinaryOperatorExpression* node) override;
|
||||
//// void Visit(UnaryOperatorExpression* node) override;
|
||||
|
||||
// Simple Expressions
|
||||
|
||||
|
|
@ -94,7 +94,7 @@ private:
|
|||
|
||||
// Type
|
||||
|
||||
void Visit(TypeConstructor* node) override;
|
||||
//// void Visit(TypeConstructor* node) override;
|
||||
void Visit(TupleType* node) override;
|
||||
void Visit(VariantType* node) override;
|
||||
void Visit(AnnotatedType* node) override;
|
||||
|
|
|
|||
|
|
@ -372,7 +372,7 @@ struct DefinitionParameter : public Node {
|
|||
|
||||
struct DefinitionArgument : public Node {
|
||||
NameIdentifier name;
|
||||
std::vector<std::unique_ptr<ParametrizedType>> types;
|
||||
std::vector<std::unique_ptr<ParametrizedType>> types; // TODO: one type
|
||||
};
|
||||
|
||||
// ----------------- Flow control -----------------
|
||||
|
|
|
|||
|
|
@ -50,34 +50,37 @@ enum class BuiltInTypeInfo {
|
|||
FloatT,
|
||||
};
|
||||
|
||||
struct TypeUsageInfo {
|
||||
struct TypeUsageInfo { // TODO: typeclass_expression
|
||||
std::vector<std::string> param_names;
|
||||
std::vector<TypeInfo*> param_types;
|
||||
std::vector<TypeInfo*> params;
|
||||
std::vector<std::string> arg_names; // ??, arg expr ??
|
||||
};
|
||||
|
||||
struct ParameterInfo {
|
||||
std::string name;
|
||||
std::vector<std::string> param_names;
|
||||
std::vector<std::string> param_names; // TODO: paramaters
|
||||
std::vector<TypeclassInfo*> param_types;
|
||||
std::vector<std::string> arg_names; // ??
|
||||
};
|
||||
|
||||
struct AnyTypeInfo {
|
||||
std::vector<ParameterInfo> params; // ??
|
||||
struct SymbolDefinitionInfo {
|
||||
std::string name;
|
||||
std::vector<ParameterInfo> params;
|
||||
std::vector<std::string> arg_names;
|
||||
};
|
||||
|
||||
struct AnyTypeInfo : SymbolDefinitionInfo {
|
||||
std::variant<std::unique_ptr<VariantTypeInfo>,
|
||||
std::unique_ptr<TupleTypeInfo>,
|
||||
std::unique_ptr<BuiltInTypeInfo>> info;
|
||||
};
|
||||
|
||||
struct VariableInfo {
|
||||
std::string name;
|
||||
std::optional<Value> value;
|
||||
TypeInfo* type = nullptr;
|
||||
};
|
||||
// TODO lambda functions as values
|
||||
// struct VariableInfo {
|
||||
// std::string name;
|
||||
// std::optional<Value> value;
|
||||
// TypeInfo* type = nullptr;
|
||||
// };
|
||||
// TODO lambda functions as value
|
||||
// TODO: decide=
|
||||
|
||||
struct TupleTypeInfo {
|
||||
std::optional<std::string> name;
|
||||
|
|
@ -107,22 +110,16 @@ struct FunctionDeclarationInfo {
|
|||
std::vector<TypeUsageInfo> arg_types;
|
||||
};
|
||||
|
||||
struct FunctionDefinitionInfo {
|
||||
std::vector<ParameterInfo> params; // TODO: dublicates ??
|
||||
std::vector<std::string> arg_names;
|
||||
|
||||
struct FunctionDefinitionInfo : SymbolDefinitionInfo {
|
||||
interpreter::tokens::SuperExpression* expression;
|
||||
};
|
||||
|
||||
struct FunctionInfo {
|
||||
FunctionDeclarationInfo declaration;
|
||||
FunctionDefinitionInfo definition;
|
||||
// add requirements ??
|
||||
};
|
||||
|
||||
struct TypeclassInfo {
|
||||
std::vector<ParameterInfo> params;
|
||||
std::vector<std::string> arg_names;
|
||||
struct TypeclassInfo : SymbolDefinitionInfo {
|
||||
std::vector<FunctionDeclarationInfo> requirements;
|
||||
};
|
||||
|
||||
|
|
@ -142,4 +139,8 @@ struct NamespaceInfo {
|
|||
TypeInfo* type_info = nullptr;
|
||||
};
|
||||
|
||||
using AnyTypeVariant = std::variant<VariantTypeInfo,
|
||||
TupleTypeInfo,
|
||||
BuiltInTypeInfo>;
|
||||
|
||||
} // namespace info
|
||||
|
|
|
|||
|
|
@ -54,7 +54,7 @@ void FindSymbolsVisitor::Visit(ImportStatement* node) {
|
|||
info.module_name = node->module_name;
|
||||
for (auto& symbol : node->symbols) {
|
||||
Visitor::Visit(symbol);
|
||||
info.symbols.push_back(std::move(std::any_cast<std::string>(current_info_)));
|
||||
info.symbols.push_back(std::move(std::any_cast<std::string>(current_info_))); // TODO: expressions
|
||||
}
|
||||
global_info_.AddImport(std::move(info));
|
||||
// TODO: what if inside usage definition, global_info_.AddImport(std::move(info));
|
||||
|
|
@ -71,7 +71,8 @@ void FindSymbolsVisitor::Visit(AliasDefinition* node) {
|
|||
info::TypeInfo info;
|
||||
|
||||
Visit(node->type.get());
|
||||
auto type_info = std::move(std::any_cast<std::pair<std::string, std::vector<std::string>>>(current_info_));
|
||||
auto type_info = std::move(
|
||||
std::any_cast<std::pair<std::string, std::vector<std::string>>>(current_info_));
|
||||
current_info_.reset();
|
||||
|
||||
Visit(node->value.get());
|
||||
|
|
@ -117,23 +118,22 @@ void FindSymbolsVisitor::Visit(FunctionDefinition* node) {
|
|||
|
||||
Visit(node->name.get());
|
||||
auto name_info = std::move(
|
||||
std::any_cast<std::pair<std::string,
|
||||
std::pair<std::vector<info::ParameterInfo>,
|
||||
std::vector<std::string>>>>(current_info_));
|
||||
std::any_cast<info::SymbolDefinitionInfo>(current_info_));
|
||||
current_info_.reset();
|
||||
|
||||
info.params = std::move(name_info.second.first);
|
||||
info.arg_names = std::move(name_info.second.second);
|
||||
info.params = std::move(name_info.params);
|
||||
info.arg_names = std::move(name_info.arg_names);
|
||||
info.expression = &node->value;
|
||||
|
||||
global_info_.AddFunctionDefinition(name_info.first, std::move(info));
|
||||
global_info_.AddFunctionDefinition(name_info.name, std::move(info));
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(AliasTypeDefinition* node) { // TODO: unite with AliasDefinition
|
||||
info::TypeInfo info;
|
||||
|
||||
Visit(node->type.get());
|
||||
auto type_info = std::move(std::any_cast<std::pair<std::string, std::vector<std::string>>>(current_info_));
|
||||
auto type_info = std::move(
|
||||
std::any_cast<std::pair<std::string, std::vector<std::string>>>(current_info_));
|
||||
current_info_.reset();
|
||||
|
||||
Visit(node->value.get());
|
||||
|
|
@ -155,20 +155,16 @@ void FindSymbolsVisitor::Visit(TypeDefinition* node) {
|
|||
|
||||
Visit(node->type.get());
|
||||
auto type_info = std::move(
|
||||
std::any_cast<std::pair<std::string,
|
||||
std::pair<std::vector<info::ParameterInfo>,
|
||||
std::vector<std::string>>>>(current_info_));
|
||||
std::any_cast<info::SymbolDefinitionInfo>(current_info_));
|
||||
current_info_.reset();
|
||||
|
||||
Visitor::Visit(node->value);
|
||||
auto value_info = std::move(std::any_cast<std::variant<info::VariantTypeInfo,
|
||||
info::TupleTypeInfo,
|
||||
info::BuiltInTypeInfo>>(current_info_));
|
||||
auto value_info = std::move(std::any_cast<info::AnyTypeVariant>(current_info_));
|
||||
current_info_.reset();
|
||||
|
||||
info::AnyTypeInfo any_type_info;
|
||||
any_type_info.params = std::move(type_info.second.first);
|
||||
any_type_info.arg_names = std::move(type_info.second.second);
|
||||
any_type_info.params = std::move(type_info.params);
|
||||
any_type_info.arg_names = std::move(type_info.arg_names);
|
||||
|
||||
switch (value_info.index()) {
|
||||
case 0:
|
||||
|
|
@ -193,7 +189,7 @@ void FindSymbolsVisitor::Visit(TypeDefinition* node) {
|
|||
|
||||
info.type = std::move(any_type_info);
|
||||
|
||||
global_info_.AddType(type_info.first, std::move(info));
|
||||
global_info_.AddType(type_info.name, std::move(info));
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(TypeclassDefinition* node) {
|
||||
|
|
@ -201,12 +197,10 @@ void FindSymbolsVisitor::Visit(TypeclassDefinition* node) {
|
|||
|
||||
Visit(node->typeclass.get());
|
||||
auto typeclass_info = std::move(
|
||||
std::any_cast<std::pair<std::string,
|
||||
std::pair<std::vector<info::ParameterInfo>,
|
||||
std::vector<std::string>>>>(current_info_));
|
||||
std::any_cast<info::SymbolDefinitionInfo>(current_info_));
|
||||
current_info_.reset();
|
||||
info.params = std::move(typeclass_info.second.first);
|
||||
info.arg_names = std::move(typeclass_info.second.second);
|
||||
info.params = std::move(typeclass_info.params);
|
||||
info.arg_names = std::move(typeclass_info.arg_names);
|
||||
|
||||
for (auto& requirement : node->requirements) {
|
||||
Visit(requirement.get());
|
||||
|
|
@ -215,33 +209,33 @@ void FindSymbolsVisitor::Visit(TypeclassDefinition* node) {
|
|||
info.requirements.push_back(std::move(requrement_info));
|
||||
}
|
||||
|
||||
global_info_.AddTypeclass(typeclass_info.first, std::move(info));
|
||||
global_info_.AddTypeclass(typeclass_info.name, std::move(info));
|
||||
}
|
||||
|
||||
// Definition parts
|
||||
|
||||
void FindSymbolsVisitor::Visit(DefinedName* node) {
|
||||
out_ << "(DefinedName ";
|
||||
Visit(&node->name);
|
||||
if (!node->parameters.empty()) {
|
||||
out_ << "\n";
|
||||
}
|
||||
info::SymbolDefinitionInfo info;
|
||||
|
||||
info.name = node->name;
|
||||
for (auto& parameter : node->parameters) {
|
||||
Visit(parameter.get());
|
||||
}
|
||||
if (!node->arguments.empty()) {
|
||||
out_ << " : \n";
|
||||
auto param_info = std::move(std::any_cast<info::ParameterInfo>(current_info_));
|
||||
current_info_.reset();
|
||||
info.params.push_back(std::move(param_info));
|
||||
}
|
||||
for (auto& argument : node->arguments) {
|
||||
Visit(argument.get());
|
||||
auto argument_info = std::move(std::any_cast<std::string>(current_info_));
|
||||
current_info_.reset();
|
||||
info.arg_names.push_back(std::move(argument_info));
|
||||
}
|
||||
out_ << ")";
|
||||
|
||||
current_info_ = std::move(info);
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(DefinedAnnotatedName* node) {
|
||||
out_ << "(DefinedAnnotatedName ";
|
||||
Visit(&node->name);
|
||||
out_ << " : ";
|
||||
void FindSymbolsVisitor::Visit(DefinedAnnotatedName* node) { // TODO: remove
|
||||
// Visit(&node->name);
|
||||
if (std::holds_alternative<std::unique_ptr<DefinedType>>(node->type)) {
|
||||
Visit(std::get<std::unique_ptr<DefinedType>>(node->type).get());
|
||||
} else if (std::holds_alternative<std::unique_ptr<DefinedTypeclass>>(node->type)) {
|
||||
|
|
@ -249,244 +243,215 @@ void FindSymbolsVisitor::Visit(DefinedAnnotatedName* node) {
|
|||
} else {
|
||||
// no annotation
|
||||
}
|
||||
out_ << " )";
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(DefinedType* node) {
|
||||
out_ << "(DefinedType ";
|
||||
info::SymbolDefinitionInfo info;
|
||||
|
||||
Visit(node->type.get());
|
||||
if (!node->parameters.empty()) {
|
||||
out_ << "\n";
|
||||
}
|
||||
info.name = /*...*/; // TODO
|
||||
for (auto& parameter : node->parameters) {
|
||||
Visit(parameter.get());
|
||||
}
|
||||
if (!node->arguments.empty()) {
|
||||
out_ << " : \n";
|
||||
auto param_info = std::move(std::any_cast<info::ParameterInfo>(current_info_));
|
||||
current_info_.reset();
|
||||
info.params.push_back(std::move(param_info));
|
||||
}
|
||||
for (auto& argument : node->arguments) {
|
||||
Visit(argument.get());
|
||||
auto argument_info = std::move(std::any_cast<std::string>(current_info_));
|
||||
current_info_.reset();
|
||||
info.arg_names.push_back(std::move(argument_info));
|
||||
}
|
||||
out_ << ")";
|
||||
|
||||
current_info_ = std::move(info);
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(DefinedTypeclass* node) {
|
||||
out_ << "(DefinedTypeclass ";
|
||||
info::SymbolDefinitionInfo info;
|
||||
|
||||
Visit(node->typeclass.get());
|
||||
if (!node->parameters.empty()) {
|
||||
out_ << "\n";
|
||||
}
|
||||
info.name = /*...*/; // TODO
|
||||
for (auto& parameter : node->parameters) {
|
||||
Visit(parameter.get());
|
||||
}
|
||||
if (!node->arguments.empty()) {
|
||||
out_ << " : \n";
|
||||
auto param_info = std::move(std::any_cast<info::ParameterInfo>(current_info_));
|
||||
current_info_.reset();
|
||||
info.params.push_back(std::move(param_info));
|
||||
}
|
||||
for (auto& argument : node->arguments) {
|
||||
Visit(argument.get());
|
||||
auto argument_info = std::move(std::any_cast<std::string>(current_info_));
|
||||
current_info_.reset();
|
||||
info.arg_names.push_back(std::move(argument_info));
|
||||
}
|
||||
out_ << ")";
|
||||
|
||||
current_info_ = std::move(info);
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(DefinitionParameter* node) {
|
||||
out_ << "(DefinitionParameter " << (!node->typeclasses.empty() > 0 ? "(" : "");
|
||||
Visit(&node->type);
|
||||
out_ << ' ';
|
||||
info::ParameterInfo info;
|
||||
|
||||
info.name = node->type;
|
||||
for (auto& typeclass : node->typeclasses) {
|
||||
Visit(typeclass.get());
|
||||
auto typeclass_info = std::move(std::any_cast</*...*/>(current_info_));
|
||||
current_info_.reset();
|
||||
info.param_names.push_back(std::move(typeclass_info));
|
||||
}
|
||||
out_ << ")";
|
||||
|
||||
current_info_ = std::move(info);
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(DefinitionArgument* node) {
|
||||
out_ << "(DefinitionArgument " << (!node->types.empty() ? "(" : "");
|
||||
Visit(&node->name);
|
||||
out_ << ' ';
|
||||
for (auto& type : node->types) {
|
||||
Visit(type.get());
|
||||
}
|
||||
out_ << ")";
|
||||
std::string info; // TODO: add type
|
||||
|
||||
info = node->name;
|
||||
|
||||
// for (auto& type : node->types) {
|
||||
// Visit(type.get());
|
||||
// auto argument_info = std::move(std::any_cast<std::string>(current_info_));
|
||||
// current_info_.reset();
|
||||
// info.types.push_back(std::move(argument_info));
|
||||
// }
|
||||
|
||||
current_info_ = std::move(info);
|
||||
}
|
||||
|
||||
// Statements, expressions, blocks, etc. -----------------
|
||||
|
||||
// Name
|
||||
|
||||
void FindSymbolsVisitor::Visit(NameSuperExpression* node) {
|
||||
out_ << "(NameSuperExpression ";
|
||||
for (auto& variable_namespace : node->namespaces) {
|
||||
Visitor::Visit(variable_namespace);
|
||||
out_ << '.';
|
||||
}
|
||||
for (size_t i = 0; i < node->expressions.size(); ++i) {
|
||||
Visitor::Visit(node->expressions[i]);
|
||||
if (i + 1 < node->expressions.size()) {
|
||||
out_ << '.';
|
||||
}
|
||||
}
|
||||
out_ << ")";
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(NameExpression* node) {
|
||||
out_ << "(NameExpression ";
|
||||
for (auto& variable_namespace : node->namespaces) {
|
||||
Visitor::Visit(variable_namespace);
|
||||
out_ << '.';
|
||||
}
|
||||
for (size_t i = 0; i < node->names.size(); ++i) {
|
||||
Visit(&node->names[i]);
|
||||
if (i + 1 < node->names.size()) {
|
||||
out_ << '.';
|
||||
}
|
||||
}
|
||||
out_ << ")";
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(TupleName* node) {
|
||||
out_ << "(TupleName ";
|
||||
for (auto& name : node->names) {
|
||||
out_ << '&';
|
||||
Visit(name.get());
|
||||
}
|
||||
out_ << ")";
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(VariantName* node) {
|
||||
out_ << "(VariantName ";
|
||||
for (auto& name : node->names) {
|
||||
out_ << '|';
|
||||
Visit(name.get());
|
||||
}
|
||||
out_ << ")";
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(AnnotatedName* node) {
|
||||
out_ << "(AnnotatedName ";
|
||||
Visit(&node->name);
|
||||
if (node->type.has_value()) {
|
||||
out_ << " : ";
|
||||
Visit(node->type.value().get());
|
||||
}
|
||||
out_ << " )";
|
||||
}
|
||||
// void FindSymbolsVisitor::Visit(NameSuperExpression* node) {
|
||||
// for (auto& variable_namespace : node->namespaces) {
|
||||
// Visitor::Visit(variable_namespace);
|
||||
// }
|
||||
// for (size_t i = 0; i < node->expressions.size(); ++i) {
|
||||
// Visitor::Visit(node->expressions[i]);
|
||||
// if (i + 1 < node->expressions.size()) {
|
||||
// }
|
||||
// }
|
||||
// }
|
||||
//
|
||||
// void FindSymbolsVisitor::Visit(NameExpression* node) {
|
||||
// for (auto& variable_namespace : node->namespaces) {
|
||||
// Visitor::Visit(variable_namespace);
|
||||
// }
|
||||
// for (size_t i = 0; i < node->names.size(); ++i) {
|
||||
// Visit(&node->names[i]);
|
||||
// if (i + 1 < node->names.size()) {
|
||||
// }
|
||||
// }
|
||||
// }
|
||||
//
|
||||
// void FindSymbolsVisitor::Visit(TupleName* node) {
|
||||
// for (auto& name : node->names) {
|
||||
// Visit(name.get());
|
||||
// }
|
||||
// }
|
||||
//
|
||||
// void FindSymbolsVisitor::Visit(VariantName* node) {
|
||||
// for (auto& name : node->names) {
|
||||
// Visit(name.get());
|
||||
// }
|
||||
// }
|
||||
//
|
||||
// void FindSymbolsVisitor::Visit(AnnotatedName* node) {
|
||||
// Visit(&node->name);
|
||||
// if (node->type.has_value()) {
|
||||
// Visit(node->type.value().get());
|
||||
// }
|
||||
// }
|
||||
|
||||
// Type
|
||||
|
||||
void FindSymbolsVisitor::Visit(TypeConstructor* node) {
|
||||
out_ << "(TypeConstructor ";
|
||||
Visit(node->type.get());
|
||||
out_ << '\n';
|
||||
for (auto& parameter : node->parameters) {
|
||||
Visit(¶meter.first);
|
||||
out_ << " = ";
|
||||
Visitor::Visit(parameter.second);
|
||||
out_ << '\n';
|
||||
}
|
||||
out_ << ")";
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(TupleType* node) {
|
||||
out_ << "(TupleType ";
|
||||
info::TupleTypeInfo info;
|
||||
|
||||
if (node->type.has_value()) {
|
||||
Visit(&node->type.value());
|
||||
info.name = node->type.value();
|
||||
}
|
||||
out_ << ' ';
|
||||
for (auto& entity : node->entities) {
|
||||
out_ << "& ";
|
||||
info.fields.emplace_back();
|
||||
if (entity.first.has_value()) {
|
||||
Visit(&entity.first.value());
|
||||
out_ << " : ";
|
||||
info.fields.back().first = entity.first.value();
|
||||
}
|
||||
Visitor::Visit(entity.second);
|
||||
auto entity_type_info = std::move(std::any_cast<info::AnyTypeInfo>(current_info_));
|
||||
current_info_.reset();
|
||||
info.fields.back().second = std::move(entity_type_info);
|
||||
|
||||
}
|
||||
out_ << ")";
|
||||
|
||||
current_info_ = info::AnyTypeVariant(std::move(info));
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(VariantType* node) {
|
||||
out_ << "(VariantType ";
|
||||
info::VariantTypeInfo info;
|
||||
|
||||
if (node->type.has_value()) {
|
||||
Visit(&node->type.value());
|
||||
info.name = node->type.value();ParametrizedType
|
||||
}
|
||||
out_ << ' ';
|
||||
for (auto& constructor : node->constructors) {
|
||||
out_ << "| ";
|
||||
if (std::holds_alternative<TypeIdentifierDefinition>(constructor)) {
|
||||
Visit(&std::get<TypeIdentifierDefinition>(constructor));
|
||||
info.constructors.push_back(std::get<TypeIdentifierDefinition>(constructor));
|
||||
} else if (std::holds_alternative<std::unique_ptr<TupleType>>(constructor)) {
|
||||
Visit(std::get<std::unique_ptr<TupleType>>(constructor).get());
|
||||
auto constructor_tuple_info = std::move(std::any_cast<info::TupleTypeInfo>(current_info_));
|
||||
current_info_.reset();
|
||||
info.constructors.push_back(std::move(constructor_tuple_info));
|
||||
} else {
|
||||
// error
|
||||
}
|
||||
}
|
||||
out_ << ")";
|
||||
|
||||
current_info_ = info::AnyTypeVariant(std::move(info));
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(AnnotatedType* node) {
|
||||
out_ << "(AnnotatedType ";
|
||||
Visit(node->type_expression.get());
|
||||
if (!node->annotations.empty()) {
|
||||
out_ << " :";
|
||||
}
|
||||
for (auto& annotation : node->annotations) {
|
||||
out_ << " ";
|
||||
Visit(annotation.get());
|
||||
}
|
||||
out_ << ")";
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(ParametrizedType* node) {
|
||||
out_ << "(ParametrizedType ";
|
||||
Visit(node->type_expression.get());
|
||||
for (auto& parameter : node->parameters) {
|
||||
out_ << ' ';
|
||||
Visitor::Visit(parameter);
|
||||
}
|
||||
out_ << " )";
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(TypeExpression* node) {
|
||||
out_ << "(TypeExpression ";
|
||||
for (auto& type_namespace : node->namespaces) {
|
||||
Visitor::Visit(type_namespace);
|
||||
out_ << '.';
|
||||
}
|
||||
Visit(&node->type);
|
||||
out_ << " )";
|
||||
}
|
||||
|
||||
// Typeclass
|
||||
|
||||
void FindSymbolsVisitor::Visit(AnnotatedTypeclass* node) {
|
||||
out_ << "(AnnotatedTypeclass ";
|
||||
Visit(node->typeclass_expression.get());
|
||||
if (!node->annotations.empty()) {
|
||||
out_ << " :";
|
||||
}
|
||||
for (auto& annotation : node->annotations) {
|
||||
out_ << " ";
|
||||
Visit(annotation.get());
|
||||
}
|
||||
out_ << ")";
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(ParametrizedTypeclass* node) {
|
||||
out_ << "(ParametrizedTypeclass ";
|
||||
Visit(node->typeclass_expression.get());
|
||||
for (auto& paramater : node->parameters) {
|
||||
out_ << ' ';
|
||||
Visitor::Visit(paramater);
|
||||
}
|
||||
out_ << " )";
|
||||
}
|
||||
|
||||
void FindSymbolsVisitor::Visit(TypeclassExpression* node) {
|
||||
out_ << "(TypeclassExpression ";
|
||||
for (auto& typeclass_namespace : node->namespaces) {
|
||||
Visitor::Visit(typeclass_namespace);
|
||||
out_ << '.';
|
||||
}
|
||||
Visit(&node->typeclass);
|
||||
out_ << " )";
|
||||
}
|
||||
|
||||
} // namespace interpreter
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue