From d8b3e15bec60f58defad13e961f80354d250235d Mon Sep 17 00:00:00 2001
From: polwex <polwex@sortug.com>
Date: Sat, 14 Jun 2025 23:30:34 +0700
Subject: aaaaaa

---
 bs5/server/middleware/counter.ml | 5 +++++
 1 file changed, 5 insertions(+)
 create mode 100644 bs5/server/middleware/counter.ml

(limited to 'bs5/server/middleware/counter.ml')

diff --git a/bs5/server/middleware/counter.ml b/bs5/server/middleware/counter.ml
new file mode 100644
index 0000000..85aa26f
--- /dev/null
+++ b/bs5/server/middleware/counter.ml
@@ -0,0 +1,5 @@
+let count = ref 0
+
+let count_requests inner_handler request =
+  count := !count + 1;
+  inner_handler request
-- 
cgit v1.2.3