Changeset 57 for trunk/Compiler/Target/Interpretter/UTargetInterpretter.pas

Timestamp:

Jul 16, 2012, 4:11:47 PM (12 years ago)

Author:

chronos

Message:

• Modified: Testing interpretter.

File:

• trunk/Compiler/Target/Interpretter/UTargetInterpretter.pas (modified) (2 diffs)

trunk/Compiler/Target/Interpretter/UTargetInterpretter.pas

@@ -128 +128 @@
 
 function TExecutorInterpretter.Evaluate(Expression: TExpression): TValue;
+var
+  I: Integer;
 begin
   with Expression do
@@ -149 +151 @@
     end;
     ntVariable: Result := Variable.Value;
+    ntValue: Result := Value;
   end;
 end;