...
This commit is contained in:
@@ -1,22 +1,25 @@
|
||||
namespace Compiler;
|
||||
using System.Data.Common;
|
||||
using System.Diagnostics.CodeAnalysis;
|
||||
|
||||
namespace Compiler;
|
||||
|
||||
public class TypeChecker
|
||||
{
|
||||
public static TypedNodeDefinitionFunc? CheckFunction(string fileName, string moduleName, NodeDefinitionFunc function, ModuleGraph moduleGraph, out List<Diagnostic> diagnostics)
|
||||
public static TypedNodeDefinitionFunc? CheckFunction(string fileName, string currentModule, NodeDefinitionFunc function, ModuleGraph moduleGraph, out List<Diagnostic> diagnostics)
|
||||
{
|
||||
return new TypeChecker(fileName, moduleName, function, moduleGraph).CheckFunction(out diagnostics);
|
||||
return new TypeChecker(fileName, currentModule, function, moduleGraph).CheckFunction(out diagnostics);
|
||||
}
|
||||
|
||||
private TypeChecker(string fileName, string moduleName, NodeDefinitionFunc function, ModuleGraph moduleGraph)
|
||||
private TypeChecker(string fileName, string currentModule, NodeDefinitionFunc function, ModuleGraph moduleGraph)
|
||||
{
|
||||
this.fileName = fileName;
|
||||
this.moduleName = moduleName;
|
||||
this.currentModule = currentModule;
|
||||
this.function = function;
|
||||
this.moduleGraph = moduleGraph;
|
||||
}
|
||||
|
||||
private readonly string fileName;
|
||||
private readonly string moduleName;
|
||||
private readonly string currentModule;
|
||||
private readonly NodeDefinitionFunc function;
|
||||
private readonly ModuleGraph moduleGraph;
|
||||
private readonly Scope scope = new();
|
||||
@@ -72,7 +75,7 @@ public class TypeChecker
|
||||
if (body == null || returnType is null || invalidParameter)
|
||||
return null;
|
||||
|
||||
return new TypedNodeDefinitionFunc(function.Tokens, moduleName, function.Name, parameters, body, returnType);
|
||||
return new TypedNodeDefinitionFunc(function.Tokens, currentModule, function.Name, parameters, body, returnType);
|
||||
}
|
||||
}
|
||||
|
||||
@@ -329,15 +332,9 @@ public class TypeChecker
|
||||
|
||||
private TypedNodeExpressionModuleIdent CheckExpressionModuleIdent(NodeExpressionModuleIdent expression)
|
||||
{
|
||||
if (!moduleGraph.TryResolveModule(expression.Module.Ident, out var module))
|
||||
throw new CompileException(Diagnostic.Error($"Module '{expression.Module.Ident}' not found").At(fileName, expression.Module).Build());
|
||||
|
||||
var includePrivate = expression.Module.Ident == moduleName;
|
||||
|
||||
if (!module.TryResolveIdentifier(expression.Value.Ident, includePrivate, out var identifierType))
|
||||
throw new CompileException(Diagnostic.Error($"Identifier '{expression.Module.Ident}::{expression.Value.Ident}' not found").At(fileName, expression.Value).Build());
|
||||
|
||||
return new TypedNodeExpressionModuleIdent(expression.Tokens, identifierType.Type, expression.Module, expression.Value);
|
||||
var module = ResolveModule(expression.Module);
|
||||
var info = ResolveModuleIdentifier(module, expression.Value);
|
||||
return new TypedNodeExpressionModuleIdent(expression.Tokens, info.Type, expression.Module, expression.Value);
|
||||
}
|
||||
|
||||
private TypedNodeExpressionIntLiteral CheckExpressionIntLiteral(NodeExpressionIntLiteral expression)
|
||||
@@ -356,7 +353,7 @@ public class TypeChecker
|
||||
if (!moduleGraph.TryResolveModule(structType.Module, out var module))
|
||||
throw new CompileException(Diagnostic.Error($"Module '{structType.Module}' not found").At(fileName, expression.Target).Build());
|
||||
|
||||
if (!module.TryResolveType(structType.Name, moduleName == structType.Module, out var typeDef))
|
||||
if (!module.TryResolveType(structType.Name, currentModule == structType.Module, out var typeDef))
|
||||
throw new CompileException(Diagnostic.Error($"Type '{structType.Name}' not found in module '{structType.Module}'").At(fileName, expression.Target).Build());
|
||||
|
||||
if (typeDef is not Module.TypeInfoStruct structDef)
|
||||
@@ -373,7 +370,7 @@ public class TypeChecker
|
||||
if (!moduleGraph.TryResolveModule(enumVariantType.EnumType.Module, out var module))
|
||||
throw new CompileException(Diagnostic.Error($"Module '{enumVariantType.EnumType.Module}' not found").At(fileName, expression.Target).Build());
|
||||
|
||||
if (!module.TryResolveType(enumVariantType.EnumType.Name, moduleName == enumVariantType.EnumType.Module, out var typeDef))
|
||||
if (!module.TryResolveType(enumVariantType.EnumType.Name, currentModule == enumVariantType.EnumType.Module, out var typeDef))
|
||||
throw new CompileException(Diagnostic.Error($"Type '{enumVariantType.EnumType.Name}' not found in module '{enumVariantType.EnumType.Module}'").At(fileName, expression.Target).Build());
|
||||
|
||||
if (typeDef is not Module.TypeInfoEnum enumDef)
|
||||
@@ -412,21 +409,12 @@ public class TypeChecker
|
||||
|
||||
private TypedNodeExpressionStructLiteral CheckExpressionStructLiteral(NodeExpressionStructLiteral expression)
|
||||
{
|
||||
if (!moduleGraph.TryResolveModule(expression.Module.Ident, out var module))
|
||||
throw new CompileException(Diagnostic.Error($"Module '{expression.Module.Ident}' not found").At(fileName, expression.Module).Build());
|
||||
|
||||
var includePrivate = expression.Module.Ident == moduleName;
|
||||
|
||||
if (!module.TryResolveType(expression.Name.Ident, includePrivate, out var typeDef))
|
||||
throw new CompileException(Diagnostic.Error($"Struct '{expression.Module.Ident}::{expression.Name.Ident}' not found").At(fileName, expression.Name).Build());
|
||||
|
||||
if (typeDef is not Module.TypeInfoStruct structDef)
|
||||
throw new CompileException(Diagnostic.Error($"Cannot create struct literal of non-struct type '{expression.Module.Ident}::{expression.Name.Ident}'").At(fileName, expression.Name).Build());
|
||||
var info = ResolveModuleStruct(ResolveModule(expression.Module), expression.Name);
|
||||
|
||||
var initializers = new List<TypedNodeExpressionStructLiteral.Initializer>();
|
||||
foreach (var initializer in expression.Initializers)
|
||||
{
|
||||
var field = structDef.Fields.FirstOrDefault(x => x.Name == initializer.Name.Ident);
|
||||
var field = info.Fields.FirstOrDefault(x => x.Name == initializer.Name.Ident);
|
||||
if (field == null)
|
||||
throw new CompileException(Diagnostic.Error($"Field '{initializer.Name.Ident}' does not exist on struct '{expression.Module.Ident}::{expression.Name.Ident}'").At(fileName, initializer.Name).Build());
|
||||
|
||||
@@ -442,18 +430,9 @@ public class TypeChecker
|
||||
|
||||
private TypedNodeExpressionEnumLiteral CheckExpressionEnumLiteral(NodeExpressionEnumLiteral expression)
|
||||
{
|
||||
if (!moduleGraph.TryResolveModule(expression.Module.Ident, out var module))
|
||||
throw new CompileException(Diagnostic.Error($"Module '{expression.Module.Ident}' not found").At(fileName, expression.Module).Build());
|
||||
var info = ResolveModuleEnum(ResolveModule(expression.Module), expression.EnumName);
|
||||
|
||||
var includePrivate = expression.Module.Ident == moduleName;
|
||||
|
||||
if (!module.TryResolveType(expression.EnumName.Ident, includePrivate, out var typeDef))
|
||||
throw new CompileException(Diagnostic.Error($"Enum '{expression.Module.Ident}::{expression.EnumName.Ident}' not found").At(fileName, expression.EnumName).Build());
|
||||
|
||||
if (typeDef is not Module.TypeInfoEnum enumDef)
|
||||
throw new CompileException(Diagnostic.Error($"Cannot create enum literal of non-enum type '{expression.Module.Ident}::{expression.EnumName.Ident}'").At(fileName, expression.EnumName).Build());
|
||||
|
||||
var variant = enumDef.Variants.FirstOrDefault(x => x.Name == expression.VariantName.Ident);
|
||||
var variant = info.Variants.FirstOrDefault(x => x.Name == expression.VariantName.Ident);
|
||||
if (variant == null)
|
||||
throw new CompileException(Diagnostic.Error($"Enum '{expression.Module.Ident}::{expression.EnumName.Ident}' does not have a variant '{expression.VariantName.Ident}'").At(fileName, expression.VariantName).Build());
|
||||
|
||||
@@ -479,7 +458,7 @@ public class TypeChecker
|
||||
return node switch
|
||||
{
|
||||
NodeTypeBool => NubTypeBool.Instance,
|
||||
NodeTypeCustom type => ResolveCustomType(type),
|
||||
NodeTypeNamed type => ResolveNamedType(type),
|
||||
NodeTypeFunc type => NubTypeFunc.Get(type.Parameters.Select(ResolveType).ToList(), ResolveType(type.ReturnType)),
|
||||
NodeTypePointer type => NubTypePointer.Get(ResolveType(type.To)),
|
||||
NodeTypeSInt type => NubTypeSInt.Get(type.Width),
|
||||
@@ -490,24 +469,127 @@ public class TypeChecker
|
||||
};
|
||||
}
|
||||
|
||||
private NubType ResolveCustomType(NodeTypeCustom type)
|
||||
private NubType ResolveNamedType(NodeTypeNamed type)
|
||||
{
|
||||
if (!moduleGraph.TryResolveModule(type.Module.Ident, out var module))
|
||||
throw new CompileException(Diagnostic.Error($"Module '{type.Module.Ident}' not found").At(fileName, type.Module).Build());
|
||||
|
||||
var includePrivate = type.Module.Ident == moduleName;
|
||||
|
||||
if (!module.TryResolveType(type.Name.Ident, includePrivate, out var customType))
|
||||
throw new CompileException(Diagnostic.Error($"Custom type '{type.Module.Ident}::{type.Name.Ident}' not found").At(fileName, type.Name).Build());
|
||||
|
||||
return customType switch
|
||||
return type.Sections.Count switch
|
||||
{
|
||||
Module.TypeInfoStruct => NubTypeStruct.Get(type.Module.Ident, type.Name.Ident),
|
||||
Module.TypeInfoEnum => NubTypeEnum.Get(type.Module.Ident, type.Name.Ident),
|
||||
_ => throw new ArgumentOutOfRangeException(nameof(customType))
|
||||
3 => ResolveThreePartType(type.Sections[0], type.Sections[1], type.Sections[2]),
|
||||
2 => ResolveTwoPartType(type.Sections[0], type.Sections[1]),
|
||||
1 => ResolveOnePartType(type.Sections[0]),
|
||||
_ => throw BasicError("Invalid type name", type)
|
||||
};
|
||||
}
|
||||
|
||||
private NubType ResolveThreePartType(TokenIdent first, TokenIdent second, TokenIdent third)
|
||||
{
|
||||
if (TryResolveEnumVariant(currentModule, second.Ident, third.Ident, out var variantType))
|
||||
return variantType;
|
||||
|
||||
throw BasicError($"Enum '{first.Ident}::{second.Ident}::{third.Ident}' does not have a variant named '{third.Ident}'", third);
|
||||
}
|
||||
|
||||
private NubType ResolveTwoPartType(TokenIdent first, TokenIdent second)
|
||||
{
|
||||
if (TryResolveEnumVariant(currentModule, first.Ident, second.Ident, out var variantType))
|
||||
return variantType;
|
||||
|
||||
var typeInfo = ResolveModuleTypeInfo(ResolveModule(first), second);
|
||||
return typeInfo switch
|
||||
{
|
||||
Module.TypeInfoStruct => NubTypeStruct.Get(first.Ident, second.Ident),
|
||||
Module.TypeInfoEnum => NubTypeEnum.Get(first.Ident, second.Ident),
|
||||
_ => throw new ArgumentOutOfRangeException(nameof(typeInfo))
|
||||
};
|
||||
}
|
||||
|
||||
private NubType ResolveOnePartType(TokenIdent name)
|
||||
{
|
||||
if (!moduleGraph.TryResolveModule(currentModule, out var module))
|
||||
throw BasicError($"Module '{currentModule}' not found", name);
|
||||
|
||||
var typeInfo = ResolveModuleTypeInfo(module, name);
|
||||
return typeInfo switch
|
||||
{
|
||||
Module.TypeInfoStruct => NubTypeStruct.Get(currentModule, name.Ident),
|
||||
Module.TypeInfoEnum => NubTypeEnum.Get(currentModule, name.Ident),
|
||||
_ => throw new ArgumentOutOfRangeException(nameof(typeInfo))
|
||||
};
|
||||
}
|
||||
|
||||
private Module ResolveModule(TokenIdent name)
|
||||
{
|
||||
if (!moduleGraph.TryResolveModule(name.Ident, out var module))
|
||||
throw BasicError($"Module '{name.Ident}' not found", name);
|
||||
|
||||
return module;
|
||||
}
|
||||
|
||||
private Module.IdentifierInfo ResolveModuleIdentifier(Module module, TokenIdent name)
|
||||
{
|
||||
if (!module.TryResolveIdentifier(name.Ident, currentModule == module.Name, out var type))
|
||||
throw BasicError($"Identifier '{module.Name}::{name.Ident}' not found", name);
|
||||
|
||||
return type;
|
||||
}
|
||||
|
||||
private Module.TypeInfo ResolveModuleTypeInfo(Module module, TokenIdent name)
|
||||
{
|
||||
if (!module.TryResolveType(name.Ident, currentModule == module.Name, out var type))
|
||||
throw BasicError($"Named type '{module.Name}::{name.Ident}' not found", name);
|
||||
|
||||
return type;
|
||||
}
|
||||
|
||||
private Module.TypeInfoEnum ResolveModuleEnum(Module module, TokenIdent name)
|
||||
{
|
||||
var type = ResolveModuleTypeInfo(module, name);
|
||||
if (type is not Module.TypeInfoEnum info)
|
||||
throw BasicError($"'{module.Name}::{name.Ident}' is not an enum", name);
|
||||
|
||||
return info;
|
||||
}
|
||||
|
||||
private Module.TypeInfoStruct ResolveModuleStruct(Module module, TokenIdent name)
|
||||
{
|
||||
var type = ResolveModuleTypeInfo(module, name);
|
||||
if (type is not Module.TypeInfoStruct info)
|
||||
throw BasicError($"'{module.Name}::{name.Ident}' is not a struct", name);
|
||||
|
||||
return info;
|
||||
}
|
||||
|
||||
private bool TryResolveEnumVariant(string moduleName, string enumName, string variantName, [NotNullWhen(true)] out NubType? result)
|
||||
{
|
||||
result = null;
|
||||
|
||||
if (!moduleGraph.TryResolveModule(moduleName, out var module))
|
||||
return false;
|
||||
|
||||
if (!module.TryResolveType(enumName, true, out var type))
|
||||
return false;
|
||||
|
||||
if (type is not Module.TypeInfoEnum enumInfo)
|
||||
return false;
|
||||
|
||||
var variant = enumInfo.Variants.FirstOrDefault(v => v.Name == variantName);
|
||||
|
||||
if (variant == null)
|
||||
return false;
|
||||
|
||||
result = NubTypeEnumVariant.Get(NubTypeEnum.Get(moduleName, enumName), variantName);
|
||||
return true;
|
||||
}
|
||||
|
||||
private CompileException BasicError(string message, TokenIdent ident)
|
||||
{
|
||||
return new CompileException(Diagnostic.Error(message).At(fileName, ident).Build());
|
||||
}
|
||||
|
||||
private CompileException BasicError(string message, Node node)
|
||||
{
|
||||
return new CompileException(Diagnostic.Error(message).At(fileName, node).Build());
|
||||
}
|
||||
|
||||
private sealed class Scope
|
||||
{
|
||||
private readonly Stack<Dictionary<string, NubType>> scopes = new();
|
||||
|
||||
Reference in New Issue
Block a user