Explorar o código

tbug744 must fail => moved to webtbf dir

pierre %!s(int64=26) %!d(string=hai) anos
pai
achega
201af712e4
Modificáronse 3 ficheiros con 5 adicións e 20 borrados
  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