From 776d00c6cd7cabc16f13a18eee54fa2f3f36bf21 Mon Sep 17 00:00:00 2001
From: Peter Bex <peter@more-magic.net>
Date: Sun, 29 Jul 2018 19:39:39 +0200
Subject: Port to CHICKEN 5

---
 tests/testweb/spiffy-access | 4 ++++
 1 file changed, 4 insertions(+)
 create mode 100644 tests/testweb/spiffy-access

(limited to 'tests/testweb/spiffy-access')

diff --git a/tests/testweb/spiffy-access b/tests/testweb/spiffy-access
new file mode 100644
index 0000000..a4ffff5
--- /dev/null
+++ b/tests/testweb/spiffy-access
@@ -0,0 +1,4 @@
+(lambda (continue)
+  (let ((counter (with-input-from-file "root-counter" read)))
+    (with-output-to-file "root-counter" (lambda () (write (add1 counter)))))
+  (continue))
-- 
cgit v1.2.3