Commit 355417eb authored by Dr. Matthias St. Pierre's avatar Dr. Matthias St. Pierre
Browse files

VMS: only use the high precision on VMS v8.4 and up 



Fixes #8487
Amends #7230

Reviewed-by: default avatarTim Hudson <tjh@openssl.org>
Reviewed-by: default avatarRichard Levitte <levitte@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/8488)
parent 503d4745

crypto/rand/rand_vms.c

+4 −0
Original line number Diff line number Diff line
@@ -507,7 +507,11 @@ int rand_pool_add_additional_data(RAND_POOL *pool) 
     * concurrently (which is the case for the <master> drbg).

     */

    data.tid = CRYPTO_THREAD_get_current_id();

#if __CRTL_VER >= 80400000

    sys$gettim_prec(&data.time);

#else

    sys$gettim((void*)&data.time);

#endif



    return rand_pool_add(pool, (unsigned char *)&data, sizeof(data), 0);

}