From 9c0cd729b5c1bf3eb6dae70f636d707e5058fafa Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Tue, 21 Apr 2020 00:23:46 +0200 Subject: Remove define-quick-record macros. --- module/vcomponent/recurrence/generate.scm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'module/vcomponent/recurrence/generate.scm') diff --git a/module/vcomponent/recurrence/generate.scm b/module/vcomponent/recurrence/generate.scm index c03a935a..1ff3cc49 100644 --- a/module/vcomponent/recurrence/generate.scm +++ b/module/vcomponent/recurrence/generate.scm @@ -128,8 +128,7 @@ ((e r) (list (next-event e r) (if (count r) - ;; Note that this doesn't modify, since r is immutable. - (mod! (count r) 1-) + (set (count r) = (- 1)) r )))) ;; Seed -- cgit v1.2.3