* unnecessary directives removed

tests/tbf/tb0071.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %FAIL }
 { Old file: tbf0345.pp }
 {  }

tests/tbf/tb0104.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %fail }
 { Old file: tbs0293.pp }
 { no error with variable name = type name }

tests/tbf/tb0111.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 {$ifdef fpc}{$mode objfpc}{$endif}
 
 type

tests/tbf/tb0112.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %FAIL }
 
 { in this mode, typed constants are read-only }

tests/tbf/tb0114.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 { %FAIL }
 

tests/tbf/tb0127.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %fail }
 { Interfaces only supported in v1.1 }
 { Should give the same error as /tbf/tb0125.pp }

tests/tbf/tb0128.pp

@@ -1,5 +1,4 @@
 {%skiptarget=$nothread }
-{ %version=1.1 }
 { %fail }
 
 {$mode delphi}

tests/tbf/tb0129.pp

@@ -1,6 +1,5 @@
 {%skiptarget=$nothread }
 { %fail }
-{ %version=1.1 }
 
 {$ifdef fpc}
   {$mode objfpc}

tests/tbf/tb0143.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %fail }
 
 {$macro on}

tests/tbf/tb0146.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 { %FAIL }
 { %OPT=-Sew -vw }
 {$MODE OBJFPC}

tests/tbf/tb0147.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 { %FAIL }
 { %OPT=-Sew -vw }
 {$MODE OBJFPC}

tests/tbf/tb0148.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 { %FAIL }
 { %OPT=-Sew -vw }
 

tests/tbf/tb0149.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 { %FAIL }
 { %OPT=-Sew -vw }
 

tests/tbs/tb0170.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 { Old file: tbs0203.pp }
 { problem with changed mangledname of procedures after use }

tests/tbs/tb0224.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 { Old file: tbs0262.pp }
 { problems with virtual and overloaded methods }

tests/tbs/tb0295.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 
 { Old file: tbs0353.pp }
 {  }

tests/tbs/tb0328.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 { %OPT=-Or }
 { test for full boolean eval and register usage with b+ }
 

tests/tbs/tb0344.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {$R+}
 var

tests/tbs/tb0346.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {$MODE DELPHI}
 type

tests/tbs/tb0348.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 
   const
      GUID_NULL : TGUID = '{00000000-0000-0000-0000-000000000000}';

tests/tbs/tb0350.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 {$mode objfpc}
 var
    a : longint absolute 0;

tests/tbs/tb0351.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 {$mode objfpc}
 type
    i = interface;

tests/tbs/tb0353.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 
   const
       c1 = widechar(0);

tests/tbs/tb0354.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 {$mode delphi}
 type
    a = function ( ) : boolean;

tests/tbs/tb0357.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {$ifdef fpc}{$MODE OBJFPC}{$endif}
 uses sysutils;

tests/tbs/tb0358.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 type
   __u64 = 0..High(Int64); // Create unsigned Int64 (with 63 bits)
 

tests/tbs/tb0359.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %TARGET=linux,freebsd,darwin,solaris,aix,haiku }
 
 {$linklib c}

tests/tbs/tb0360.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {$mode delphi}
 

tests/tbs/tb0363.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 
 procedure p1(const a:array of byte);
 var

tests/tbs/tb0367.pp

@@ -1,5 +1,4 @@
 { %CPU=i386 }
-{ %VERSION=1.1 }
 
 {$ifdef fpc}
   {$mode delphi}

tests/tbs/tb0370.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 
 {$mode delphi}
 type

tests/tbs/tb0371.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 { %target=win32 }
 
 {$mode delphi}

tests/tbs/tb0372.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 {$ifdef fpc}{$mode objfpc}{$endif}
 {$J+}
 

tests/tbs/tb0373.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 {$ifdef fpc}{$mode delphi}{$endif}
 type
    tmyinterface = interface

tests/tbs/tb0374.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 {$mode delphi}
 type
    tc1 = class

tests/tbs/tb0375.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 {$ifdef fpc}{$mode objfpc}{$endif}
 
 type

tests/tbs/tb0380.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 uses ub0380;
 procedure p1(s:string);overload;

tests/tbs/tb0381.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 var
    w : widechar;
 

tests/tbs/tb0386.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {$ifdef fpc}{$mode objfpc}{$endif}
 uses ub0386;

tests/tbs/tb0387.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 
 {$ifdef fpc}{$mode objfpc}{$endif}
 type

tests/tbs/tb0388.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 
 {$ifdef fpc}{$mode objfpc}{$endif}
 type

tests/tbs/tb0389.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 
 {$ifdef fpc}{$mode objfpc}{$endif}
 type

tests/tbs/tb0391.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {$ifdef fpc}{$mode objfpc}{$endif}
 uses ub0391;

tests/tbs/tb0394.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {$ifdef fpc}{$mode objfpc}{$endif}
 

tests/tbs/tb0396.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 {$ifdef fpc}{$mode objfpc}{$endif}
 type
    to2 = interface

tests/tbs/tb0401.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 var
    b1,b2 : boolean;
    c : char;

tests/tbs/tb0402.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 {$mode objfpc}
 type
    ta = array of longint;

tests/tbs/tb0405.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {$ifdef fpc}{$mode objfpc}{$endif}
 

tests/tbs/tb0407.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {$ifdef fpc}{$mode delphi}{$endif}
 

tests/tbs/tb0409.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 type
    myl = type longint;
 

tests/tbs/tb0410.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 uses
    variants;
 

tests/tbs/tb0421.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %recompile }
 
 uses ub0421a;

tests/tbs/tb0424.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 { %OPT=-Sew -vw }
 
 {$MODE OBJFPC}

tests/tbs/tb0426.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 uses ub0426;
 
 

tests/tbs/tb0429.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 var
   err : boolean;

tests/tbs/tb0442.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 const
   CUnicodeNormal1  : WideChar = WideChar($FEFF);
   CUnicodeNormal2  : WideChar = #12;

tests/tbs/tb0447.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {$R+}
 var

tests/tbs/tb0447a.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 var
   a : cardinal;

tests/tbs/tb0451.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {$mode delphi}
 

tests/tbs/tb0459.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 {$mode objfpc}
 Type
   IMyInterface = Interface

tests/tbs/tb0461.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %recompile }
 
 uses ub0461;

tests/tbs/tb0462.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {$ifdef go32v2}
   {$define USE_INTERNAL_UNICODE}

tests/tbs/tb0464.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 {$mode delphi}
 
 var

tests/tbs/tb0467.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 {$mode objfpc}
 {$M+}
 uses

tests/tbs/ub0426.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 {$MODE OBJFPC}
 Unit ub0426;
 

tests/test/cg/tcalcst5.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 {****************************************************************}
 {  CODE GENERATOR TEST PROGRAM                                   }
 {  By Carl Eric Codere                                           }

tests/test/cg/tcalfun4.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
  {****************************************************************}
  {  CODE GENERATOR TEST PROGRAM                                   }

tests/test/cg/tcalobj4.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {****************************************************************}
 {  CODE GENERATOR TEST PROGRAM                                   }

tests/test/cg/tcalpvr4.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {****************************************************************}
 {  CODE GENERATOR TEST PROGRAM                                   }

tests/test/cg/tcalval5.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {****************************************************************}
 {  CODE GENERATOR TEST PROGRAM                                   }

tests/test/cg/tcalvar5.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {****************************************************************}
 {  CODE GENERATOR TEST PROGRAM                                   }

tests/test/cg/tprintf.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %NOTE=This test requires a C library }
 
 {$mode objfpc}

tests/test/cg/tprintf2.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %NOTE=This test requires a C library }
 
 {$mode objfpc}

tests/test/cg/tprintf3.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %cpu=i386,powerpc,powerpc64,x86_64,arm }
 { %NOTE=This test requires a C library }
 

tests/test/jvm/trange1.pp

@@ -1,6 +1,5 @@
 program trange1;
 
-{ %VERSION=1.1 }
 
 {$ifdef fpc}
   {$mode objfpc}

tests/test/jvm/tw24089.pp

@@ -1,6 +1,5 @@
 program tw24089;
 
-{ %VERSION=1.1 }
 
 {$ifdef fpc}
   {$mode objfpc}
@@ -57,5 +56,5 @@ end;
 
 begin
   with TMyClasstw24089.Create do
-   Test;  
+   Test;
 end.

tests/test/talign2.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 {%OPT=-Og}
 { This verifies if the strings are
   correctly aligned, normally the generated assembler

tests/test/tclass1.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 {$mode objfpc}
 
 type

tests/test/tclass2.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 {$mode objfpc}
 
 type

tests/test/tclass6.pp

@@ -1,6 +1,5 @@
 { %fail }
 { %opt=-CR }
-{ %version=1.1 }
 
 {$mode objfpc}
 program test_class;

tests/test/tclass7.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {$ifdef fpc}
  {$mode delphi}

tests/test/tclass8.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 
 {$mode objfpc}
 

tests/test/testv1.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 program testv1;
 
 uses varutils;

tests/test/testv2.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 program testv2;
 
 uses variants,varutils;

tests/test/testv3.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 program testv3;
 
 uses variants,varutils;

tests/test/testv4.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 program testv3;
 
 uses variants,varutils;

tests/test/testv5.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 program testv5;
 
 {$ifopt R+}

tests/test/testv6.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 program testv6;
 
 uses variants,varutils;

tests/test/testv7.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 program testv2;
 
 uses variants,varutils;

tests/test/testv8.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 program testv8;
 
 uses variants,varutils;

tests/test/texception6.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %result=231 }
 
 uses

tests/test/texception7.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %result=231 }
 
 uses

tests/test/texception8.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %fail }
 uses
   sysutils;

tests/test/texception9.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %fail }
 uses
   sysutils;

tests/test/tfpu2.pp

@@ -1,5 +1,4 @@
 { %skiptarget=go32v2 }
-{ %version=1.1 }
 
 {$ifdef fpc}{$mode objfpc}{$endif}
 program test_fpu_excpetions;

tests/test/thintdir.pp

@@ -1,4 +1,3 @@
-{ %version=1.1 }
 { %NORUN }
 
 program thintdir;

tests/test/tinivar.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 
 program tinivar;
 

tests/test/tinterface1.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 { %SKIPTARGET=macos }
 { On macos it crashes when run.}
 

tests/test/tinterface2.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 
 {$ifdef fpc}
 {$mode objfpc}

tests/test/tinterface3.pp

@@ -1,4 +1,3 @@
-{ %VERSION=1.1 }
 
 {$mode objfpc}
 type