Unit compiler namespaces

Src/AST/Myc.Ast.Compiler.Binder.Upvalues.pas

@@ -1,4 +1,4 @@
-unit Myc.Ast.Analyzer;
+unit Myc.Ast.Compiler.Binder.Upvalues;
 
 interface
 

Src/AST/Myc.Ast.Compiler.Binder.pas

@@ -1,4 +1,4 @@
-unit Myc.Ast.Binding;
+unit Myc.Ast.Compiler.Binder;
 
 interface
 
@@ -11,7 +11,7 @@ uses
     Myc.Ast.Nodes,
     Myc.Ast.Visitor,
     Myc.Ast.Scope,
-    Myc.Ast.Analyzer,
+    Myc.Ast.Compiler.Binder.Upvalues,
     Myc.Ast;
 
 type

Src/AST/Myc.Ast.Compiler.Lowering.pas

@@ -1,4 +1,4 @@
-unit Myc.Ast.Lowering;
+unit Myc.Ast.Compiler.Lowering;
 
 interface
 
@@ -95,6 +95,7 @@ begin
     if Node.Callee.Kind = akIdentifier then
     begin
         calleeIdentifier := Node.Callee.AsIdentifier;
+        nodeType := Node.StaticType;
 
         if (Length(Node.Arguments) = 2) then
         begin

Src/AST/Myc.Ast.Compiler.Macros.pas

@@ -1,4 +1,4 @@
-unit Myc.Ast.MacroExpander;
+unit Myc.Ast.Compiler.Macros;
 
 interface
 
@@ -100,7 +100,7 @@ implementation
 
 uses
     System.Generics.Defaults,
-    Myc.Ast.Binding, // Required for TAstBinder.Bind
+    Myc.Ast.Compiler.Binder,
     Myc.Ast.Evaluator, // Required for TEvaluatorVisitor.Execute
     Myc.Data.Keyword;
 

Src/AST/Myc.Ast.Compiler.TypeChecker.pas

@@ -1,4 +1,4 @@
-unit Myc.Ast.TypeChecker;
+unit Myc.Ast.Compiler.TypeChecker;
 
 interface
 

Src/AST/Myc.Ast.pas

@@ -301,7 +301,7 @@ type
         constructor Create(const AValue: IKeyword);
         function Accept(const Visitor: IAstVisitor): TDataValue; override;
         function AsKeyword: IKeywordNode; override;
-        property Value: IKeyword read FValue; // Value ist immutable
+        property Value: IKeyword read FValue;
     end;
 
     TMacroDefinitionNode = class(TAstNode, IMacroDefinitionNode)