Mass typo fixes in strings for tests.

tests/test/tdel1.pp

@@ -99,7 +99,7 @@ begin
   C1.Free;
   C2.Free;
 
-  writeln('Testing GetInteface()...');
+  writeln('Testing GetInterface()...');
   C1 := TC1.Create;
   C2 := TC2.Create;
 

tests/test/tdel2.pp

@@ -136,7 +136,7 @@ begin
  * GetInterface function
  *******************************************************************************)
 
-  writeln('Testing GetInteface()...');
+  writeln('Testing GetInterface()...');
   for T := 0 to High(tests) do
   begin
     C := tests[T].c.Create;

tests/test/tmaclocalprocparam1.pp

@@ -34,7 +34,7 @@ begin
 	if failed then
 		writeln('Failed')
 	else
-		writeln('Succeded');
+		writeln('Succeeded');
 
    {$IFC UNDEFINED THINK_Pascal}
 	if failed then

tests/test/tmaclocalprocparam1a.pp

@@ -37,7 +37,7 @@ begin
 	if failed then
 		writeln('Failed')
 	else
-		writeln('Succeded');
+		writeln('Succeeded');
 
    {$IFC UNDEFINED THINK_Pascal}
 	if failed then

tests/test/tmacnonlocalexit1.pp

@@ -26,7 +26,7 @@ begin
 	if failed then
 		writeln('Failed')
 	else
-		writeln('Succeded');
+		writeln('Succeeded');
 
   {$IFC NOT UNDEFINED FPC}
 	if failed then

tests/test/tmacnonlocalexit2.pp

@@ -32,7 +32,7 @@ begin
 	if failed then
 		writeln('Failed')
 	else
-		writeln('Succeded');
+		writeln('Succeeded');
 
   {$IFC NOT UNDEFINED FPC}
 	if failed then

tests/test/tmacnonlocalgoto.pp

@@ -40,7 +40,7 @@ begin
 	if failed then
 		writeln('Failed')
 	else
-		writeln('Succeded');
+		writeln('Succeeded');
 
   {$IFC NOT UNDEFINED FPC}
 	if failed then

tests/test/tmacpas2.pp

@@ -71,7 +71,7 @@ begin
   TestFourCharCode(myFCCconst);
 
   if success then
-    Writeln('Whole test succeded')
+    Writeln('Whole test succeeded')
   else
     begin
       Writeln('Whole test failed');

tests/test/tmmx1.pp

@@ -79,6 +79,6 @@ begin
      end;
    writeln('Testing basic tmmxword support');
    testmmxword;
-   writeln('Test succesful');
+   writeln('Test successful');
    writeln;
 end.

tests/test/tstring4.pp

@@ -464,7 +464,7 @@ begin
   TestParams;
   Write ('End of Parameter passing test : ');DoMem(StartMem);
 
-  Writeln;Writeln ('Testing comparision operators');
+  Writeln;Writeln ('Testing comparison operators');
   TestCompare;
   Write ('End of compare test : ');DoMem(StartMem);
 

tests/test/tstring6.pp

@@ -461,7 +461,7 @@ begin
   TestParams;
   Write ('End of Parameter passing test : ');DoMem(StartMem);
 
-  Writeln;Writeln ('Testing comparision operators');
+  Writeln;Writeln ('Testing comparison operators');
   TestCompare;
   Write ('End of compare test : ');DoMem(StartMem);
 

tests/test/units/nullable/tnull.pp

@@ -205,7 +205,7 @@ begin
     Exit('Assign not correct');
   A := null;
   if A.HasValue then
-    Exit('Null assignement not correct');
+    Exit('Null assignment not correct');
 end;
 
 Function TestCompareNull : string;

tests/utils/dbdigest.pp

@@ -343,7 +343,7 @@ begin
   Writeln('   --svncompilerrevision=REV      set revision of used compiler');
   Writeln('   --svntestsrevision=REV         set revision of testsuite files');
   Writeln('   --svnrtlrevision=REV           set revision of RTL');
-  Writeln('   --svnpackagesrevision=REV      set revison of packages');
+  Writeln('   --svnpackagesrevision=REV      set revision of packages');
   Writeln('');
   Writeln('If -T is specified, no test run options may be specified');
   Writeln('');

tests/webtbs/tw4240.pp

@@ -36,7 +36,7 @@ then writeln ('  * Wrong Address passed on stack');
 
 writeln(Format('--- Address using Parameter:$%p',[PA]));
 if integer(PA) <> integer (p)
-then writeln ('  * Parameter addresss different from given variable');
+then writeln ('  * Parameter address different from given variable');
 
 Result:=Length(TPointArray(PA));
 writeln('--- Array Length:',Result);
@@ -60,7 +60,7 @@ then writeln ('  * Wrong Address passed on stack');
 
 writeln(Format('--- Address using Parameter:$%p',[pointer(PA)]));
 if integer(PA) <> integer (p)
-then writeln ('  * Parameter addresss different from given variable');
+then writeln ('  * Parameter address different from given variable');
 
 Result:=Length(PA);
 writeln('--- Array Length:',Result);