Changeset 202 for branches/interpreter2/Test.pas

Timestamp:

Apr 17, 2020, 12:09:15 AM (5 years ago)

Author:

chronos

Message:

• Added: Support for String, Integer and Boolean types.
• Added: Support for more system defined functions..
• Added: Support for line comments.
• Added: For-To-Do construction.
• Added: Defined function parameters and and parsing function calls with parameters.
• Modified: Improved handling of expressions.

File:

• branches/interpreter2/Test.pas (modified) (1 diff)

branches/interpreter2/Test.pas

@@ +1 @@
+// Line comment
 program Test;
 var
-  A;
-  B;
+  A: string;
+  B: string;
+  X: string;
+  I: Integer;
 const
-  C = 1;
+  C: Integer = 1;
 begin  
-  A := 2;
-  B := C;
+  X := 'A' + 'B';
+  WriteLn(X);
+  A := IntToStr(2);
+  B := IntToStr(C);
   A := B;
-  if A then begin
+  
+  // If-Then-Else
+  if A = '2' then begin
     WriteLn('DoThen');
   end else WriteLn('DoElse');
 
-  A := '';
-  while A do begin
-    WriteLn(A);
+  // While-Do
+  I := 5;
+  while I <> 0 do begin
+    WriteLn(IntToStr(I));
+    I := I - 1;
+  end;
+  
+  // For-To-Do
+  for I := 0 to 5 do begin
+    WriteLn(IntToStr(I));    
   end;
     
+  // Begin-End
   begin
     WriteLn('Hello World!');