* fixed compile issues

tests/webtbf/tw2242.pp

@@ -1,5 +1,5 @@
 { %fail }
-{ %target=go32v2,win32 }
+{ %target=go32v2 }
 { %opt=-Sc }
 VAR s : ansistring;
 BEGIN

tests/webtbs/tw2883.pp

@@ -3,6 +3,8 @@
 { e-mail: [email protected] }
 unit tw2883;
 
+{$mode objfpc}
+
 interface
    type TRec = record
       Field1 : smallint;

tests/webtbs/tw2899.pp

@@ -22,7 +22,7 @@ begin
   writeln('Before NestedProc: "',s,'"');
   NestedProc(s);
   writeln('After NestedProc: "',s,'"'); // s is now emtpy
-  if s<>'WhatAStrangeBug' then
+  if s<>'AStrangeBug' then
     halt(1);
 end;
 

tests/webtbs/tw2904.pp

@@ -3,6 +3,7 @@
 { e-mail: [email protected] }
 program Project2;
 {$mode objfpc}
+{$goto on}
 {$APPTYPE CONSOLE}
 uses SysUtils;
 

tests/webtbs/tw2908.pp

@@ -1,10 +1,16 @@
+{ %cpu=i386 }
+
 { Source provided for Free Pascal Bug Report 2908 }
 { Submitted by "marcov (gory bugs department)" on  2004-01-19 }
 { e-mail:  }
 
 {$mode delphi}
+procedure p;
 asm
-//and [eax],$ff0000000
-and [edx + ebx + 3], $0000ffff
-and [edx + 3], $00ffffff
+  and [eax],$ff0000000
+  and [edx + ebx + 3], $0000ffff
+  and [edx + 3], $00ffffff
+end;
+
+begin
 end.