X-Git-Url: https://www.bearssl.org/gitweb//home/git/?p=BearSSL;a=blobdiff_plain;f=src%2Fssl%2Fssl_hs_server.t0;h=817642901a957ba335c1f9099ba33b092f33d016;hp=206e4ee01ac4400b98775425382d0a102aa2cf1f;hb=292f43357850dbadd1f7e8a343415a707af3a800;hpb=d16eee962a72a600c370f18f2ae25b36b4f532df

diff --git a/src/ssl/ssl_hs_server.t0 b/src/ssl/ssl_hs_server.t0
index 206e4ee..8176429 100644
--- a/src/ssl/ssl_hs_server.t0
+++ b/src/ssl/ssl_hs_server.t0
@@ -685,6 +685,7 @@ cc: save-session ( -- ) {
 
 	\ We are not resuming, so a new session ID should be generated.
 	addr-session_id 32 mkrand
+	32 addr-session_id_len set8
 
 	\ Translate common cipher suites, then squeeze out holes: there
 	\ may be holes because of the way we fill the list when the