Änderungen dass Async-Funktionen wieder synchron laufen. Das ändert nichts an geschwidnigkeit da es eh schon lanes in argon2 gibt, welche mehr Kerne oder threads zur Hasung benutzen.

App_Code/TestPerformance.vb

@@ -139,7 +139,7 @@ Public Class TestPerformance
         Dim pw As String = "q~^Vd$fS§§nS4!q"
         For zahl As Integer = 0 To zahlint
             sw2.Start()
-            hashbytes.Add(Await VERAG_VARIABLES.HashPassword(pw, arrkeys(zahl), arrzahl_iterats(zahl), arrzahl(zahl)))
+            hashbytes.Add(VERAG_VARIABLES.HashPassword(pw, arrkeys(zahl), arrzahl_iterats(zahl), arrzahl(zahl)))
             sw2.Stop()
             arrzeitp2.Add(sw2.ElapsedMilliseconds)
             sw2.Reset()