Browse Source

* fixed runtime checks

peter 23 years ago
parent
commit
a099086fe4
2 changed files with 4 additions and 3 deletions
  1. 2 0
      tests/webtbs/tw1910.pp
  2. 2 3
      tests/webtbs/tw2004.pp

+ 2 - 0
tests/webtbs/tw1910.pp

@@ -1,3 +1,5 @@
+{$mode delphi}
+
 type
 type
   tprocedure = procedure;
   tprocedure = procedure;
 
 

+ 2 - 3
tests/webtbs/tw2004.pp

@@ -1,5 +1,3 @@
- {%interactive }
-
  {
  {
  ide 0.9.2 dos/win32 2002/05/31
  ide 0.9.2 dos/win32 2002/05/31
 press F7 or F8 more times:
 press F7 or F8 more times:
@@ -29,7 +27,7 @@ within a macro. Merged to 1.1 branch. }
 
 
 
 
 
 
-{$include tw2004i.inc}
+{$include uw2004.inc}
 
 
 
 
 
 
@@ -51,4 +49,5 @@ x;
 write('ppppp');
 write('ppppp');
 y;
 y;
 x;
 x;
+writeln;
 end.
 end.