Rebased on develop & remove test code from Kernel main.

src/kernel.pas

@@ -105,9 +105,6 @@ var
    dds             : uint32;
    keyboard_layout : array [0..1] of TKeyInfo;
    i : uint32;
-   sha1ctx         : TSHA1Context;
-   sha1dig         : TSHA1Digest;
-   sha1msg         : array[0..9] of uint8;
    
 begin
      { Init the base system unit }
@@ -268,25 +265,6 @@ begin
      maxh.UnitTest;
      prio.UnitTest;
 
-     { SHA1 test: hash 'Helloworld' }
-     sha1msg[0] := $48; { H }
-     sha1msg[1] := $65; { e }
-     sha1msg[2] := $6C; { l }
-     sha1msg[3] := $6C; { l }
-     sha1msg[4] := $6F; { o }
-     sha1msg[5] := $77; { w }
-     sha1msg[6] := $6F; { o }
-     sha1msg[7] := $72; { r }
-     sha1msg[8] := $6C; { l }
-     sha1msg[9] := $64; { d }
-     SHA1Init(@sha1ctx);
-     SHA1Update(@sha1ctx, @sha1msg[0], 10);
-     SHA1Final(@sha1ctx, @sha1dig);
-     syslog.log('SHA1', 'Helloworld = ');
-     for i := 0 to 19 do
-         syslog.writehexpair(sha1dig[i]);
-     syslog.writestringln('');
-
      { Register timer-driven tasks }
      graphicsrefresh.init;
      usbhotplug.init;