Index: generic/tlsDigest.c
==================================================================
--- generic/tlsDigest.c
+++ generic/tlsDigest.c
@@ -293,14 +293,16 @@
     case TYPE_HMAC:
 	res = HMAC_Final(statePtr->hctx, md_buf, &ulen);
 	md_len = (int) ulen;
 	break;
     case TYPE_CMAC:
-	size_t size;
-	res = CMAC_Final(statePtr->cctx, md_buf, &size);
-	md_len = (int) size;
-	break;
+	{
+	    size_t size;
+	    res = CMAC_Final(statePtr->cctx, md_buf, &size);
+	    md_len = (int) size;
+	    break;
+	}
     }
 
     if (!res) {
 	if (resultObj == NULL) {
 	    Tcl_AppendResult(interp, "Finalize failed: ", GET_ERR_REASON(), (char *) NULL);