Browse Source

tbug744 must fail => moved to webtbf dir

pierre 26 years ago
parent
commit
201af712e4
3 changed files with 5 additions and 20 deletions
  1. 0 9
      tests/webtbs/tbug744.pp
  2. 0 10
      tests/webtbs/tbug744a.pp
  3. 5 1
      tests/webtbs/tbug753.pp

+ 0 - 9
tests/webtbs/tbug744.pp

@@ -1,9 +0,0 @@
-Unit tbug744;
-
-Interface
-
-Uses tbug744a;
-
-Implementation
-
-end.

+ 0 - 10
tests/webtbs/tbug744a.pp

@@ -1,10 +0,0 @@
-Unit tbug744a;
-
-Interface
-
-Uses tbug744;
-
-Implementation
-
-end.
-

+ 5 - 1
tests/webtbs/tbug753.pp

@@ -1,7 +1,11 @@
 {$MODE objfpc}
 {$H+}
 program stackcrash;
-uses sysutils;
+uses 
+{$ifdef go32v2}
+  dpmiexcp,
+{$endif go32v2}
+  sysutils;
 type
   TMyClass = class
   public