New function to set compression methods so they can be safely freed.
diff --git a/ssl/ssl.h b/ssl/ssl.h
index da777e9..aa3be29 100644
--- a/ssl/ssl.h
+++ b/ssl/ssl.h
@@ -2492,6 +2492,7 @@
 const COMP_METHOD *SSL_get_current_expansion(SSL *s);
 const char *SSL_COMP_get_name(const COMP_METHOD *comp);
 STACK_OF(SSL_COMP) *SSL_COMP_get_compression_methods(void);
+void SSL_COMP_set0_compression_methods(STACK_OF(SSL_COMP) *meths);
 int SSL_COMP_add_compression_method(int id,COMP_METHOD *cm);
 #else
 const void *SSL_get_current_compression(SSL *s);
diff --git a/ssl/ssl_ciph.c b/ssl/ssl_ciph.c
index 1a2849a..33b7d08 100644
--- a/ssl/ssl_ciph.c
+++ b/ssl/ssl_ciph.c
@@ -1892,6 +1892,11 @@
 	return(ssl_comp_methods);
 	}
 
+void SSL_COMP_set0_compression_methods(STACK_OF(SSL_COMP) *meths)
+	{
+	ssl_comp_methods = meths;
+	}
+
 int SSL_COMP_add_compression_method(int id, COMP_METHOD *cm)
 	{
 	SSL_COMP *comp;