push the flags too

diff --git a/crypto/perlasm/x86unix.pl b/crypto/perlasm/x86unix.pl
index bb9c6925d8d8ec62d01e1ce58452f3412303817a..61b0311c921e88ad93b5ced006bfde12b90115f9 100644 (file)
--- a/crypto/perlasm/x86unix.pl
+++ b/crypto/perlasm/x86unix.pl
@@ -523,6 +523,7 @@ sub main'printf
 
 sub pushvars
        {
+       &out0("pushf");
        &main'push("edx");
        &main'push("ecx");
        &main'push("eax");
@@ -533,4 +534,5 @@ sub popvars
        &main'pop("eax");
        &main'pop("ecx");
        &main'pop("edx");
+       &out0("popf");
        }