Changeset 80 for branches/Transpascal/Compiler/USourceCode.pas

Timestamp:

Oct 22, 2010, 3:39:58 PM (14 years ago)

Author:

george

Message:

• Modified: Better parse righ assignment side with expression.

File:

• branches/Transpascal/Compiler/USourceCode.pas (modified) (2 diffs)

branches/Transpascal/Compiler/USourceCode.pas

@@ -250 +250 @@
     NodeType: TNodeType;
     Variable: TVariable;
-    Method: TFunction;
+    Constant: TConstant;
+    FunctionCall: TFunction;
     Value: TValue;
     OperatorName: string;
@@ -583 +584 @@
   CommonBlock := Source.CommonBlock;
   NodeType := Source.NodeType;
-  Method := Source.Method;
+  FunctionCall := Source.FunctionCall;
   Value := Source.Value;
   Associated := Source.Associated;