Changeset 66 for trunk/Demos/Simple/System.pas

Timestamp:

Jul 19, 2012, 8:16:57 AM (12 years ago)

Author:

chronos

Message:

• Added: Information text about completion of build process including elapsed time.

File:

• trunk/Demos/Simple/System.pas (modified) (1 diff)

trunk/Demos/Simple/System.pas

@@ -4 +4 @@
 
 type
-  Integer = type;
+  Integer = type; internal;
+  String = type; internal;
   
-procedure ReadLn;
+function ReadLn: string; internal;
+procedure WriteLn(Text: string); internal;
 
 implementation
 
-procedure ReadLn;
+function ReadLn: string;
+begin
+  Result := '';
+end;
+
+procedure WriteLn(Text: string);
 begin
 end;