fix breakage for Perl versions that do boolean operations on long words
authorUlf Möller <ulf@openssl.org>
Sat, 19 Mar 2005 11:13:30 +0000 (11:13 +0000)
committerUlf Möller <ulf@openssl.org>
Sat, 19 Mar 2005 11:13:30 +0000 (11:13 +0000)
crypto/aes/asm/aes-586.pl

index ee02ded463c0a71e5d57f8f2d98e6fe13ee578b2..d5f53f45d89a07f0acc782742512499544dee1f0 100755 (executable)
@@ -1245,7 +1245,7 @@ sub declast()
        &mov    ($acc,&wparam(0));              # load inp
        &mov    ($key,&wparam(4));              # load ivp
 
-       &test   ($s2,~15);
+       &test   ($s2,0xFFFFFFF0);
        &jz     (&label("enc_tail"));           # short input...
 
        &mov    ($s0,&DWP(0,$key));             # load iv
@@ -1281,7 +1281,7 @@ sub declast()
                &mov    (&wparam(1),$s3);               # save out
 
                &sub    ($s2,16);
-               &test   ($s2,~15);
+               &test   ($s2,0xFFFFFFF0);
                &mov    (&wparam(2),$s2);               # save len
        &jnz    (&label("enc_loop"));
        &test   ($s2,15);