From 3079981ddc0384561c5feeaf3795d30739c63e52 Mon Sep 17 00:00:00 2001
From: swrup <swrup@protonmail.com>
Date: Sat, 28 Feb 2026 02:30:58 +0100
Subject: [PATCH]

---
 test/validate_response.ml | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/test/validate_response.ml b/test/validate_response.ml
index 5b10b4fe..9ba1c7c9 100644
--- a/test/validate_response.ml
+++ b/test/validate_response.ml
@@ -72,6 +72,7 @@ let keys content =
   (*Fmt.pr "OK exchange_pub@.";*)
 
   let denom_l = v.denominations |> Denomination.denoms_of_denomgroups in
+  (*
   let* () =
     denom_l
     |> list_iter (fun dn ->
@@ -82,6 +83,8 @@ let keys content =
         Fmt.pr "validated a denom@.";
         Ok ())
   in
+  *)
+  (*
   let* () =
     let last_issue_date =
       denom_l
@@ -91,6 +94,7 @@ let keys content =
     if last_issue_date = v.list_issue_date then Ok ()
     else Fmt.error "list_issue_date is wrong"
   in
+  *)
   Fmt.pr "OK denominations@.";
 
   let* () =