summaryrefslogtreecommitdiff
path: root/tests/testweb/once.scm
blob: f7259036c16428a4d751a94e586fdb05285d73f4 (plain)
1
2
(let ((counter (with-input-from-file "counter" read)))
  (with-output-to-file "counter" (lambda () (write (add1 counter)))))