Changeset 101 for branches/interpreter/Source3.pas

Timestamp:

Feb 11, 2017, 4:35:08 PM (8 years ago)

Author:

chronos

Message:

• Modified: Improved interpeter. Better handling of execution of functions and passing value of parameters.

File:

• branches/interpreter/Source3.pas (modified) (2 diffs)

branches/interpreter/Source3.pas

@@ -17 +17 @@
   TOperator = (opNone, opAdd, opSubtract, opAnd, opOr, opNot, opEqual, opNotEqual);
 
-  TBaseType = (btBoolean, btInteger, btChar, btShortString, btArray);
+  TBaseType = (btNone, btBoolean, btInteger, btChar, btShortString, btArray);
 
   TType = record
@@ -84 +84 @@
   TFunctionCall = procedure ;
 
-  TCmdType = (ctWhileDo, ctIfThenElse, ctBeginEnd, ctAssignment, ctExecution);
+  TCmdType = (ctNone, ctWhileDo, ctIfThenElse, ctBeginEnd, ctAssignment, ctExecution);
   TCommand = record
     CmdType: TCmdType;