* updated

tests/tbs0170.pp

@@ -1,6 +1,13 @@
+procedure free1;
 begin
-asm
-	call {$ifdef dummy}freemem{$else}fpc_freemem{$endif}
 end;
 
+procedure free2;
+begin
+end;
+
+begin
+asm
+        call {$ifdef dummy}free1{$else}free2{$endif}
+end;
 end.

tests/tbs0187.pp

@@ -1,6 +1,8 @@
 { $OPT=-St -Cr }
 program test;
 
+{$static on}
+
 {$ifdef go32v2}
   uses dpmiexcp;
 {$endif go32v2}

tests/tbs0198.pp

@@ -6,5 +6,9 @@ type
        function GetCaps : Longint;virtual;stdcall;abstract;
    end;
 
+function to1.GetCaps2 : Longint;
+begin
+end;
+
 begin
 end.

tests/tbs0202.pp

@@ -24,7 +24,7 @@ begin
   compare(45,2);
   if not greater then
     error;
-  compare(-5,26)
+  compare(-5,26);
   if greater then
     error;
 end.

tests/ts010002.pp

@@ -1,4 +1,4 @@
-{ $OPT=-S2 -al -s }
+{ $OPT=-S2 }
 
 {
     $Id$