AST development

Src/AST/Myc.Ast.Evaluator.pas

@@ -273,9 +273,9 @@ begin
     end;
 
     if boolResult then
-        Result := TAstValue.FromScalar(TScalar.FromInt64(1))
+        Result := TAstValue.FromScalar(TScalar.FromBoolean(true))
     else
-        Result := TAstValue.FromScalar(TScalar.FromInt64(0));
+        Result := TAstValue.FromScalar(TScalar.FromBoolean(false));
 end;
 
 function TEvaluatorVisitor.VisitUnaryExpression(const Node: IUnaryExpressionNode): TAstValue;

Src/AST/Myc.Ast.Nodes.pas

@@ -313,7 +313,7 @@ begin
     case Self of
         boAdd: Result := '+';
         boSubtract: Result := '-';
-        boMultiply: Result := '*';
+        boMultiply: Result := #$2A2F;
         boDivide: Result := '/';
         boEqual: Result := '==';
         boNotEqual: Result := '!=';