diff --git a/packages/rtl/sysutils.pas b/packages/rtl/sysutils.pas
index 1222bbe..fe9cd56 100644
--- a/packages/rtl/sysutils.pas
+++ b/packages/rtl/sysutils.pas
@@ -33,9 +33,9 @@ Const
 type
   { TFloatRec }
   TFloatRec = Record
-     Exponent: Integer;
-     Negative: Boolean;
-     Digits: Array[0..FloatRecDigits-1] Of Char;
+    Exponent: Integer;
+    Negative: Boolean;
+    Digits: Array[0..FloatRecDigits-1] of Char;
   End;
   TEndian = (Little,Big);
   TFileName = String;
@@ -167,7 +167,6 @@ type
 
   ENoConstructException = class(Exception);
 
-
 //function GetTickCount: Integer;
 
 
@@ -176,10 +175,10 @@ type
 *****************************************************************************}
 
 Const
-   EmptyStr = '';
-   EmptyWideStr = ''; // No difference here.
-   HexDisplayPrefix: string = '$';
-   LeadBytes = [] unimplemented;
+  EmptyStr = '';
+  EmptyWideStr = ''; // No difference here.
+  HexDisplayPrefix: string = '$';
+  LeadBytes = [] unimplemented;
 
 Function CharInSet(Ch: Char;Const CSet : array of char) : Boolean;
 
@@ -1413,7 +1412,7 @@ end;
 function AnsiCompareStr(const s1, s2: String): Integer;
 begin
   {$IFDEF ECMAScript6}
-  Result:=CompareText(TJSString(s1).normalize(),TJSString(s1).normalize());
+  Result:=CompareText(TJSString(s1).normalize(),TJSString(s2).normalize());
   {$ELSE}
   Result:=CompareText(s1,s2);
   {$ENDIF}
@@ -1432,8 +1431,6 @@ Const
   feInvalidArgIndex = 3;
 
 Procedure DoFormatError (ErrCode : Longint;const fmt: String);
-
-
 begin
   //!! must be changed to contain format string...
   Case ErrCode of