From 6c5a08de1bbf7aad08ad543d261bbef865450831 Mon Sep 17 00:00:00 2001
From: Hans Dijkema <hans@dijkewijk.nl>
Date: Sun, 12 Apr 2026 12:15:56 +0200
Subject: [PATCH] Debug bio get mem

---
 private/self-signed-cert.rkt | 1 +
 1 file changed, 1 insertion(+)

diff --git a/private/self-signed-cert.rkt b/private/self-signed-cert.rkt
index 11cf06e..d645afb 100644
--- a/private/self-signed-cert.rkt
+++ b/private/self-signed-cert.rkt
@@ -212,6 +212,7 @@
 (version-define 1
    (BIO_get_mem_data (λ (bio-ptr)
                        (let ((r (BIO_ctrl bio-ptr BIO_CTRL_INFO 0)))
+                         (displayln r)
                          (cadr r))))
    (ASN1_OCTET_STRING_new (λ ()
                             (ASN1_STRING_type_new V_ASN1_OCTET_STRING)))