rem: meth = check_encrypt_and_convert("ssl-make-context", argc, argv, 0, 1, 0);
add: meth = check_encrypt_and_convert("ssl-make-client-context", argc, argv, 0, 1, 0);
context: ssl_mk_ctx(int argc, Scheme_Object *argv[]){  mzssl_ctx_t *c;  SSL_METHOD *meth;  SSL_CTX *ctx;  meth = check_encrypt_and_convert("ssl-make-context", argc, argv, 0, 1, 0);  c = (mzssl_ctx_t *)scheme_malloc_tagged(sizeof(mzssl_ctx_t));  c->so.type = ssl_ctx_type;  ctx = SSL_CTX_new(meth);  if (!ctx) {     const char *errstr;    int errid;    errid = get_ssl_error_msg(ERR_get_error(), &errstr, 0, 0);    scheme_raise_exn(MZEXN_FAIL_NETWORK,		     "sll-make-context: context creation failed (%Z)",		     errid, errstr);    return scheme_void;  }  c->ctx = ctx;    scheme_add_finalizer(c, release_ctx, NULL);  return (Scheme_Object *)c;}