X-Git-Url: https://git.openssl.org/gitweb/?p=openssl.git;a=blobdiff_plain;f=demos%2Ftunala%2Fsm.c;h=ee661c5197679483697fbdc853ad2796656a36b7;hp=05bd7b94594241e7af29f78b804580c8b5e2cde6;hb=b984cd2b016bd37eabf41ef34a573208c5661685;hpb=adcc64cd9e9eb81b5d9ef70b532806147d718f97

diff --git a/demos/tunala/sm.c b/demos/tunala/sm.c
index 05bd7b9459..ee661c5197 100644
--- a/demos/tunala/sm.c
+++ b/demos/tunala/sm.c
@@ -119,7 +119,8 @@ int state_machine_close_clean(state_machine_t *machine)
 	buffer_close(&machine->clean_in);
 	buffer_close(&machine->clean_out);
 	/* And start an SSL shutdown */
-	SSL_shutdown(machine->ssl);
+	if(machine->ssl)
+		SSL_shutdown(machine->ssl);
 	/* This is an "event", so flush the SSL of any generated traffic */
 	state_machine_churn(machine);
 	if(buffer_empty(&machine->dirty_in) &&