Changeset 43 for branches/DelphiToC/Example.pas

Timestamp:

Aug 5, 2010, 4:17:18 PM (14 years ago)

Author:

george

Message:

End parsing process on reaching data end.

File:

• branches/DelphiToC/Example.pas (modified) (2 diffs)

branches/DelphiToC/Example.pas

@@ -1 +1 @@
 program Test;
+
+uses System, Crt;
 
 procedure Pokus(A: Byte);
@@ -26 +28 @@
   end;
   while A < 1 do A := A + 1;
+  
+ 
+  {
+  Block comment 2
+  }
+  WriteLn;
 end.