Function s7_hash_code 

pub unsafe extern "C" fn s7_hash_code(
    sc: *mut s7_scheme,
    obj: s7_pointer,
    eqfunc: s7_pointer,
) -> s7_int