Check method before access and release ctx in error paths

[openssl.git] / ms / uplink-x86.pl

diff --git a/ms/uplink-x86.pl b/ms/uplink-x86.pl
index 0dffc14fcd2ead24fc4c110b928ac17cc3c4b18f..53b998d2708a9b19b67a09f5a4323ce6b7c4c534 100755 (executable)
--- a/ms/uplink-x86.pl
+++ b/ms/uplink-x86.pl
@@ -14,11 +14,11 @@ require "uplink-common.pl";
 for ($i=1;$i<=$N;$i++) {
 &function_begin_B("_\$lazy${i}");
        &lea    ("eax",&DWP(&label("OPENSSL_UplinkTable")));
-       &push   ("eax");
        &push   ($i);
+       &push   ("eax");
        &call   (&label("OPENSSL_Uplink"));
-       &add    ("esp",8);
        &pop    ("eax");
+       &add    ("esp",4);
        &jmp_ptr(&DWP(4*$i,"eax"));
 &function_end_B("_\$lazy${i}");
 }