anchor.diff:      j:=0;
       while j<16 do
        begin
  -      e[j]:=SwapEndian(d[i]);
  +      e[j]:=SwapEndian32(d[i]);
         inc(i);
         inc(j);
        end;
  
positive.code: 
  implementation
  
  function SwapEndian(Value: integer): integer; register; overload;
  asm
    bswap eax
  end;
  
  function SHA1Hash(x:UTF8String):UTF8String;
  const
  
negative.code:     x[j]:=#0;
     end;
    Move(x[1],d[0],i);
    d[dl-1]:=SwapEndian32(a shl 3);
    h[0]:=$67452301;
    h[1]:=$efcdab89;
    h[2]:=$98badcfe;
  