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/once.scm | 2 ++
 1 file changed, 2 insertions(+)
 create mode 100644 tests/testweb/once.scm

(limited to 'tests/testweb/once.scm')

diff --git a/tests/testweb/once.scm b/tests/testweb/once.scm
new file mode 100644
index 0000000..f725903
--- /dev/null
+++ b/tests/testweb/once.scm
@@ -0,0 +1,2 @@
+(let ((counter (with-input-from-file "counter" read)))
+  (with-output-to-file "counter" (lambda () (write (add1 counter)))))
-- 
cgit v1.2.3