more bugfixes, SSL variant works now

[xonotic/d0_blind_id.git] / d0_bignum-openssl.c

diff --git a/d0_bignum-openssl.c b/d0_bignum-openssl.c
index 9e45f7f329ab0a02a1679bd27cc425896e01b1ba..1dcec8780775e5afcc6ffd7dca00ce3f95afa00f 100644 (file)
--- a/d0_bignum-openssl.c
+++ b/d0_bignum-openssl.c
@@ -210,7 +210,7 @@ d0_bignum_t *d0_bignum_shl(d0_bignum_t *r, const d0_bignum_t *a, ssize_t n)
        if(n > 0)
                BN_lshift(&r->z, &a->z, n);
        else if(n < 0)
        if(n > 0)
                BN_lshift(&r->z, &a->z, n);
        else if(n < 0)

-               BN_rshift(&r->z, &a->z, n);
+               BN_rshift(&r->z, &a->z, -n);

        else if(r != a)
                BN_copy(&r->z, &a->z);
        return r;
        else if(r != a)
                BN_copy(&r->z, &a->z);
        return r;