Changeset 100 for branches/interpreter/Execute3.pas

Timestamp:

Feb 11, 2017, 12:47:38 PM (8 years ago)

Author:

chronos

Message:

• Modified: Better expression parsing.
• Added: Executor function call context for storing local variables.

File:

• branches/interpreter/Execute3.pas (modified) (1 diff)

branches/interpreter/Execute3.pas

@@ -109 +109 @@
 begin
   case Command^.CmdType of
-    ctBeginEnd: ExecuteBeginEnd(PBeginEnd(Command^.Ptr));
-    ctWhileDo: ExecuteWhileDo(PWhileDo(Command^.Ptr));
-    ctIfThenElse: ExecuteIfThenElse(PIfThenElse(Command^.Ptr));
-    ctExecution: ExecuteExecution(PExecution(Command^.Ptr));
-    ctAssignment: ExecuteAssignment(PAssignment(Command^.Ptr));
+    ctBeginEnd: ExecuteBeginEnd(Command^.BeginEnd);
+    ctWhileDo: ExecuteWhileDo(Command^.WhileDo);
+    ctIfThenElse: ExecuteIfThenElse(Command^.IfThenElse);
+    ctExecution: ExecuteExecution(Command^.Execution);
+    ctAssignment: ExecuteAssignment(Command^.Assignment);
   end;
 end;